(cperl-info-on-command): Use goto-char instead of beginning-of-buffer.

2004-11-07 03:57:24 +00:00
parent af866d845e
commit fc49c9c623
1 changed files with 1 additions and 1 deletions
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -5292,7 +5292,7 @@ Customized by setting variables `cperl-shrink-wrap-info-frame',
 	  iniwin (selected-window)
 	  fr1 (window-frame iniwin))
    (set-buffer buf)
-    (beginning-of-buffer)
+    (goto-char (point-min))
    (or isvar
 	(progn (re-search-forward "^-X[ \t\n]")
 	       (forward-line -1)))