Refactoring: fix according to naming convention.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Wed, 16 Apr 2014 20:15:01 +0300
changeset 1137 b260dc221119
parent 1136 26996dddc80f
child 1138 1e363722e775
Refactoring: fix according to naming convention.
log4-hi-mode.el
--- a/log4-hi-mode.el	Wed Apr 16 20:12:22 2014 +0300
+++ b/log4-hi-mode.el	Wed Apr 16 20:15:01 2014 +0300
@@ -24,13 +24,13 @@
     ("WARN\\|SEVERE" . 'log4-hi-warn-face)
     ("INFO\\|DEBUG\\|TRACE" . 'log4-hi-info-face) ))
 
-(defvar log4-func-hi-keywords
+(defvar log4-hi-func-keywords
   '(("at [[:alnum:].]+\\.\\([[:alnum:]$]+\\.[[:alnum:]$<>]+\\)([[:alnum:]]+\\.java:[0-9]+)" 1 'log4-hi-func-face) ))
 
 (defvar log4-hi-time-keywords
   '(("\\<[0-9]?[0-9]:[0-9][0-9]:[0-9][0-9]\\>" . 'log4-hi-time-face)))
 
-(defvar log4-func-hi t
+(defvar log4-hi-func t
   "Mark to use hilighting of function names in stacktraces. Currently only Java supported.")
 
 ;;;###autoload
@@ -43,11 +43,11 @@
       (font-lock-mode 1)
       (font-lock-add-keywords nil log4-hi-keywords)
       (font-lock-add-keywords nil log4-hi-time-keywords)
-      (when log4-func-hi (font-lock-add-keywords nil log4-func-hi-keywords))
+      (when log4-hi-func (font-lock-add-keywords nil log4-hi-func-keywords))
       (throw 'exit nil))
     (font-lock-remove-keywords nil log4-hi-keywords)
     (font-lock-remove-keywords nil log4-hi-time-keywords)
-    (font-lock-remove-keywords nil log4-func-hi-keywords))
+    (font-lock-remove-keywords nil log4-hi-func-keywords))
   (font-lock-fontify-buffer))
 
 (provide 'log4-hi-mode)