Commit b0e069c2 authored by Leo Liu's avatar Leo Liu
Browse files

* progmodes/octave.el (octave-indent-comment): Fix indentation for %!.

(octave-comment-start-skip): Include %!.
(octave-mode): Set comment-start-skip to octave-comment-start-skip.
parent bb8eb357
2013-05-13 Leo Liu <>
* progmodes/octave.el (octave-indent-comment): Fix the indentation
of ### or %%%.
* progmodes/octave.el (octave-indent-comment): Fix indentation for
###, and %!.
(octave-mode-map): Bind octave-indent-defun to C-c C-q instead of
(octave-comment-start-skip): Include %!.
(octave-mode): Set comment-start-skip to octave-comment-start-skip.
2013-05-12 Leo Liu <>
......@@ -64,7 +64,7 @@ Used in `octave-mode' and `inferior-octave-mode' buffers.")
(string octave-comment-char ?\s)
"String to insert to start a new Octave in-line comment.")
(defvar octave-comment-start-skip "\\s<+\\s-*"
(defvar octave-comment-start-skip "\\(?:%!\\|\\s<+\\)\\s-*"
"Regexp to match the start of an Octave comment up to its body.")
(defvar octave-begin-keywords
......@@ -439,7 +439,8 @@ Non-nil means always go to the next Octave code line after sending."
((octave-in-string-or-comment-p) nil)
((looking-at-p "\\s<\\{3,\\}")
((and (looking-at-p "\\s<\\(?:[^{}]\\|$\\)")
;; Exclude %{, %} and %!.
((and (looking-at-p "\\s<\\(?:[^{}!]\\|$\\)")
(not (looking-at-p "\\s<\\s<")))
......@@ -532,10 +533,7 @@ definitions can also be stored in files and used in batch mode."
(setq-local comment-start octave-comment-start)
(setq-local comment-end "")
;; Don't set it here: it's not really a property of the language,
;; just a personal preference of the author.
;; (setq-local comment-column 32)
(setq-local comment-start-skip "\\s<+\\s-*")
(setq-local comment-start-skip octave-comment-start-skip)
(setq-local comment-add 1)
(setq-local parse-sexp-ignore-comments t)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment