# HG changeset patch
# User jwe
# Date 832777631 0
# Node ID 40e70a680c0a9e19bec48998d62b30b3e594ccef
# Parent  2e4be59df9f96f2ee2af69e16ebff9e82699c232
[project @ 1996-05-22 15:07:11 by jwe]

diff -r 2e4be59df9f9 -r 40e70a680c0a emacs/octave.el
--- a/emacs/octave.el	Wed May 22 07:54:27 1996 +0000
+++ b/emacs/octave.el	Wed May 22 15:07:11 1996 +0000
@@ -849,7 +849,12 @@
 
 (defun octave-electric-semi ()
   (interactive)
-  (if (and (not (octave-is-in-string-p (point))) octave-auto-newline)
+  (if (and (not (octave-is-in-string-p (point)))
+	   octave-auto-newline
+	   (not (save-excursion
+		  (and
+		   (re-search-backward "\\s<" (octave-point 'bol) t)
+		   (not (octave-is-in-string-p (point)))))))
       (progn
 	(insert ";")
 	(octave-indent-line)