diff options
| author | Stefan Monnier | 2010-08-12 12:46:44 +0200 |
|---|---|---|
| committer | Stefan Monnier | 2010-08-12 12:46:44 +0200 |
| commit | dc94fc858f547a4f78b04c17c4a4dec8c0d55fe1 (patch) | |
| tree | 0810390b14f6b8972381f0732d4354e1961a189c | |
| parent | b695bedabef0c0ca6b092319a83d90d4698324aa (diff) | |
| download | emacs-dc94fc858f547a4f78b04c17c4a4dec8c0d55fe1.tar.gz emacs-dc94fc858f547a4f78b04c17c4a4dec8c0d55fe1.zip | |
* lisp/progmodes/octave-mod.el (octave-mode-map): Use comment-dwim.
(octave-mode): Set comment-add.
Fixes: debbugs:6829
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/progmodes/octave-mod.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 02b380e1bb2..99829566bb5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2010-08-12 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * progmodes/octave-mod.el (octave-mode-map): Use comment-dwim (bug#6829). | ||
| 4 | (octave-mode): Set comment-add. | ||
| 5 | |||
| 1 | 2010-08-12 Antoine Levitt <antoine.levitt@gmail.com> (tiny change) | 6 | 2010-08-12 Antoine Levitt <antoine.levitt@gmail.com> (tiny change) |
| 2 | 7 | ||
| 3 | * cus-edit.el (custom-save-variables, custom-save-faces): Fix up | 8 | * cus-edit.el (custom-save-variables, custom-save-faces): Fix up |
diff --git a/lisp/progmodes/octave-mod.el b/lisp/progmodes/octave-mod.el index 12f561c6814..4951ac153d9 100644 --- a/lisp/progmodes/octave-mod.el +++ b/lisp/progmodes/octave-mod.el | |||
| @@ -194,7 +194,6 @@ parenthetical grouping.") | |||
| 194 | (define-key map ";" 'octave-electric-semi) | 194 | (define-key map ";" 'octave-electric-semi) |
| 195 | (define-key map " " 'octave-electric-space) | 195 | (define-key map " " 'octave-electric-space) |
| 196 | (define-key map "\n" 'octave-reindent-then-newline-and-indent) | 196 | (define-key map "\n" 'octave-reindent-then-newline-and-indent) |
| 197 | (define-key map "\e;" 'octave-indent-for-comment) | ||
| 198 | (define-key map "\e\n" 'octave-indent-new-comment-line) | 197 | (define-key map "\e\n" 'octave-indent-new-comment-line) |
| 199 | (define-key map "\e\t" 'octave-complete-symbol) | 198 | (define-key map "\e\t" 'octave-complete-symbol) |
| 200 | (define-key map "\M-\C-a" 'octave-beginning-of-defun) | 199 | (define-key map "\M-\C-a" 'octave-beginning-of-defun) |
| @@ -507,6 +506,7 @@ including a reproducible test case and send the message." | |||
| 507 | (setq comment-start-skip "\\s<+\\s-*") | 506 | (setq comment-start-skip "\\s<+\\s-*") |
| 508 | (make-local-variable 'comment-indent-function) | 507 | (make-local-variable 'comment-indent-function) |
| 509 | (setq comment-indent-function 'octave-comment-indent) | 508 | (setq comment-indent-function 'octave-comment-indent) |
| 509 | (set (make-local-variable 'comment-add) 1) | ||
| 510 | 510 | ||
| 511 | (make-local-variable 'parse-sexp-ignore-comments) | 511 | (make-local-variable 'parse-sexp-ignore-comments) |
| 512 | (setq parse-sexp-ignore-comments t) | 512 | (setq parse-sexp-ignore-comments t) |