Mercurial > emacs
changeset 78683:96cf59afcbbc
(m2-definition, m2-module): Don't use previous-line.
author | Thien-Thi Nguyen <ttn@gnuvola.org> |
---|---|
date | Mon, 27 Aug 2007 13:40:27 +0000 |
parents | bf0e628b88cc |
children | 68b1f44209a9 |
files | lisp/progmodes/modula2.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/modula2.el Mon Aug 27 08:33:57 2007 +0000 +++ b/lisp/progmodes/modula2.el Mon Aug 27 13:40:27 2007 +0000 @@ -295,7 +295,7 @@ (insert "DEFINITION MODULE ") (let ((name (read-string "Name: "))) (insert name ";\n\n\n\nEND " name ".\n")) - (previous-line 3)) + (forward-line -3)) (defun m2-else () "Insert ELSE keyword and indent for next line." @@ -364,7 +364,7 @@ (insert "IMPLEMENTATION MODULE ") (let ((name (read-string "Name: "))) (insert name ";\n\n\n\nEND " name ".\n") - (previous-line 3) + (forward-line -3) (m2-header) (m2-type) (newline)