diff options
| author | Richard M. Stallman | 2004-11-07 03:57:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2004-11-07 03:57:24 +0000 |
| commit | fc49c9c623f4684cf9e3c0c03cd46d6cabccf2f0 (patch) | |
| tree | b4c725e30b0193b91ba51d9481c1c2dd8e7e774a | |
| parent | af866d845e6ddf3563f49e51ad8acb8ff7fc5a8e (diff) | |
| download | emacs-fc49c9c623f4684cf9e3c0c03cd46d6cabccf2f0.tar.gz emacs-fc49c9c623f4684cf9e3c0c03cd46d6cabccf2f0.zip | |
(cperl-info-on-command): Use goto-char instead of beginning-of-buffer.
| -rw-r--r-- | lisp/progmodes/cperl-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index 94458df56e8..38cc167d942 100644 --- 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', | |||
| 5292 | iniwin (selected-window) | 5292 | iniwin (selected-window) |
| 5293 | fr1 (window-frame iniwin)) | 5293 | fr1 (window-frame iniwin)) |
| 5294 | (set-buffer buf) | 5294 | (set-buffer buf) |
| 5295 | (beginning-of-buffer) | 5295 | (goto-char (point-min)) |
| 5296 | (or isvar | 5296 | (or isvar |
| 5297 | (progn (re-search-forward "^-X[ \t\n]") | 5297 | (progn (re-search-forward "^-X[ \t\n]") |
| 5298 | (forward-line -1))) | 5298 | (forward-line -1))) |