(verilog-highlight-grouping-keywords):

Fix typo.
(verilog-type-font-keywords): Reindent.

2 files changed, 15 insertions, 9 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 22862b3e8bf..7dfe88d5778 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2008-03-03  Dan Nicolaescu  <dann@ics.uci.edu>
+
+        * progmodes/verilog-mode.el (verilog-highlight-grouping-keywords):
+        Fix typo.
+        (verilog-type-font-keywords): Reindent.
+
 2008-03-03  Michael McNamara  <mac@mail.brushroad.com>
 
         * verilog-mode.el (verilog-font-grouping-keywords): Fix bug in the
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index 78376f861f0..b24ccdc5bad 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -538,7 +538,7 @@ If false, these words are in the font-lock-type-face; if True then they are in
 grouping constructs allow the structure of the code to be understood at a glance."
   :group 'verilog-mode-indent
   :type 'boolean)
-(put 'verilog-highlight-p1800-keywords 'safe-local-variable verilog-booleanp)
+(put 'verilog-highlight-grouping-keywords 'safe-local-variable 'verilog-booleanp)
 
 (defcustom verilog-auto-endcomments t
   "*True means insert a comment /* ... */ after 'end's.
@@ -1910,15 +1910,15 @@ See also `verilog-font-lock-extra-types'.")
                        ;; And user/system tasks and functions
               "\\$[a-zA-Z][a-zA-Z0-9_\\$]*"
               "\\)\\>")
-    ;; Fontify all types
-     (if verilog-highlight-grouping-keywords
-         (cons (concat "\\<\\(" verilog-font-grouping-keywords "\\)\\>")
-           'verilog-font-lock-ams-face)
-       (cons (concat "\\<\\(" verilog-font-grouping-keywords "\\)\\>")
-         'font-lock-type-face))
-    (cons (concat "\\<\\(" verilog-type-font-keywords "\\)\\>")
+         ;; Fontify all types
+         (if verilog-highlight-grouping-keywords
+             (cons (concat "\\<\\(" verilog-font-grouping-keywords "\\)\\>")
+                   'verilog-font-lock-ams-face)
+           (cons (concat "\\<\\(" verilog-font-grouping-keywords "\\)\\>")
+                 'font-lock-type-face))
+         (cons (concat "\\<\\(" verilog-type-font-keywords "\\)\\>")
           'font-lock-type-face)
-    ;; Fontify IEEE-P1800 keywords appropriately
+         ;; Fontify IEEE-P1800 keywords appropriately
          (if verilog-highlight-p1800-keywords
              (cons (concat "\\<\\(" verilog-p1800-keywords "\\)\\>")
                    'verilog-font-lock-p1800-face)