# HG changeset patch # User Oleksandr Gavenko # Date 1397668501 -10800 # Node ID b260dc2211190edc7961c78eed48594f6b9e446d # Parent 26996dddc80febe4687d7562d0e79396a996547b Refactoring: fix according to naming convention. diff -r 26996dddc80f -r b260dc221119 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)