[Emacs-diffs] Changes to emacs/lisp/progmodes/octave-mod.el,v

[Glenn Morris]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       06/12/05 05:25:17

Index: octave-mod.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/octave-mod.el,v
retrieving revision 1.33
retrieving revision 1.34
diff -u -b -r1.33 -r1.34
--- octave-mod.el       11 Mar 2006 15:10:32 -0000      1.33
+++ octave-mod.el       5 Dec 2006 05:25:17 -0000       1.34
@@ -61,8 +61,9 @@
 Used in `octave-mode' and inferior-octave-mode buffers.
 All Octave abbrevs start with a grave accent (`).")
 (unless octave-abbrev-table
-  (let ((ac abbrevs-changed))
-    (define-abbrev-table 'octave-abbrev-table ())
+  (define-abbrev-table 'octave-abbrev-table ()))
+
+(let ((ac abbrevs-changed))
     (define-abbrev octave-abbrev-table "`a" "all_va_args" nil 0 t)
     (define-abbrev octave-abbrev-table "`b" "break" nil 0 t)
     (define-abbrev octave-abbrev-table "`cs" "case" nil 0 t)
@@ -91,7 +92,7 @@
     (define-abbrev octave-abbrev-table "`up" "unwind_protect" nil 0 t)
     (define-abbrev octave-abbrev-table "`upc" "unwind_protect_cleanup" nil 0 t)
     (define-abbrev octave-abbrev-table "`w" "while ()" nil 0 t)
-    (setq abbrevs-changed ac)))
+  (setq abbrevs-changed ac))
 
 (defvar octave-comment-char ?#
   "Character to start an Octave comment.")