aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2010-08-12 12:46:44 +0200
committerStefan Monnier2010-08-12 12:46:44 +0200
commitdc94fc858f547a4f78b04c17c4a4dec8c0d55fe1 (patch)
tree0810390b14f6b8972381f0732d4354e1961a189c
parentb695bedabef0c0ca6b092319a83d90d4698324aa (diff)
downloademacs-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/ChangeLog5
-rw-r--r--lisp/progmodes/octave-mod.el2
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 @@
12010-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
12010-08-12 Antoine Levitt <antoine.levitt@gmail.com> (tiny change) 62010-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)