(octave-indent-for-comment): Behave according to do string.

2 files changed, 9 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7bc82634547..cf9ecfee24f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-03-11  Kurt Hornik  <Kurt.Hornik@wu-wien.ac.at>
+
+        * progmodes/octave-mod.el (octave-indent-for-comment): Behave
+        according to do string.
+
 2006-03-11  Agustin Martin  <agustin.martin@hispalinux.es>
 
         * textmodes/flyspell.el (flyspell-external-point-words)
diff --git a/lisp/progmodes/octave-mod.el b/lisp/progmodes/octave-mod.el
index 5f52e6f4d3c..57941db9691 100644
--- a/lisp/progmodes/octave-mod.el
+++ b/lisp/progmodes/octave-mod.el
@@ -732,7 +732,10 @@ If there is no comment already on this line, create a code-level comment
 comment (started by one comment character) otherwise.
 Point is left after the start of the comment which is properly aligned."
   (interactive)
-  (indent-for-comment)
+  (beginning-of-line)
+  (if (looking-at "^\\s-*$")
+      (insert octave-block-comment-start)
+    (indent-for-comment))
   (indent-according-to-mode))
 
 (defun octave-indent-line (&optional arg)