Mercurial > emacs
changeset 104541:f54e4dfe90e2
(makefile-browser-toggle): Use forward-line rather than goto-line.
(makefile-browser-insert-selection): Use goto-char rather than goto-line.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sat, 22 Aug 2009 19:20:27 +0000 |
| parents | fc0ed6b4a2b2 |
| children | 5986db97372e |
| files | lisp/progmodes/make-mode.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/make-mode.el Sat Aug 22 19:14:37 2009 +0000 +++ b/lisp/progmodes/make-mode.el Sat Aug 22 19:20:27 2009 +0000 @@ -1486,9 +1486,10 @@ (let ((this-line (count-lines (point-min) (point)))) (setq this-line (max 1 this-line)) (makefile-browser-toggle-state-for-line this-line) - (goto-line this-line) + (goto-char (point-min)) + (forward-line (1- this-line)) (let ((inhibit-read-only t)) - (beginning-of-line) + (beginning-of-line) ; redundant? (if (makefile-browser-on-macro-line-p) (let ((macro-name (makefile-browser-this-line-macro-name))) (delete-region (point) (progn (end-of-line) (point))) @@ -1528,7 +1529,7 @@ Insertion takes place at point." (interactive) (save-excursion - (goto-line 1) + (goto-char (point-min)) (let ((current-line 1)) (while (not (eobp)) (if (makefile-browser-get-state-for-line current-line)