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

[Glenn Morris]

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

Index: f90.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/f90.el,v
retrieving revision 1.92
retrieving revision 1.93
diff -u -b -r1.92 -r1.93
--- f90.el      23 Nov 2006 07:26:52 -0000      1.92
+++ f90.el      5 Dec 2006 05:24:24 -0000       1.93
@@ -674,8 +674,12 @@
 
 ;; Abbrevs have generally two letters, except standard types `c, `i, `r, `t.
 (defvar f90-mode-abbrev-table
-  (let (abbrevs-changed)
+  (progn
     (define-abbrev-table 'f90-mode-abbrev-table nil)
+    f90-mode-abbrev-table)
+  "Abbrev table for F90 mode.")
+
+(let (abbrevs-changed)
     ;; Use the 6th arg (SYSTEM-FLAG) of define-abbrev if possible.
     ;; A little baroque to quieten the byte-compiler.
     (mapcar
@@ -739,9 +743,7 @@
        ("`tr"  ".true."       )
        ("`t"   "type"         )
        ("`wh"  "where"        )
-       ("`wr"  "write"        )))
-    f90-mode-abbrev-table)
-  "Abbrev table for F90 mode.")
+     ("`wr"  "write"        ))))
 
 
 ;;;###autoload