diff options
| author | Thien-Thi Nguyen <ttn@gnuvola.org> | 2007-08-27 13:38:50 +0000 |
|---|---|---|
| committer | Thien-Thi Nguyen <ttn@gnuvola.org> | 2007-08-27 13:38:50 +0000 |
| commit | 2503f22288aa87e0ce77af4d45f7ef6e7b6eeab7 (patch) | |
| tree | 45c57919fd56f1c58dbe347895e8be84618266ed /lisp/progmodes/modula2.el | |
| parent | 970a31dd849125f9d98bbc5519276338d1ddff28 (diff) | |
| download | emacs-2503f22288aa87e0ce77af4d45f7ef6e7b6eeab7.tar.gz emacs-2503f22288aa87e0ce77af4d45f7ef6e7b6eeab7.tar.bz2 emacs-2503f22288aa87e0ce77af4d45f7ef6e7b6eeab7.zip | |
(m2-definition, m2-module): Don't use previous-line.
Diffstat (limited to 'lisp/progmodes/modula2.el')
| -rw-r--r-- | lisp/progmodes/modula2.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/modula2.el b/lisp/progmodes/modula2.el index fde526ab303..f2530a7f502 100644 --- a/lisp/progmodes/modula2.el +++ b/lisp/progmodes/modula2.el @@ -295,7 +295,7 @@ followed by the first character of the construct. (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 @@ followed by the first character of the construct. (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) |