Add highlighting for time.
--- a/log4-hi-mode.el Fri Apr 11 12:02:49 2014 +0300
+++ b/log4-hi-mode.el Wed Apr 16 20:12:22 2014 +0300
@@ -15,6 +15,10 @@
'((t :inherit font-lock-function-name-face))
"Face for functions in trace.")
+(defface log4-hi-time-face
+ '((t :inherit font-lock-builtin-face))
+ "Face for time.")
+
(defvar log4-hi-keywords
'(("FATAL\\|ERROR" . 'log4-hi-error-face)
("WARN\\|SEVERE" . 'log4-hi-warn-face)
@@ -23,6 +27,9 @@
(defvar log4-func-hi-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
"Mark to use hilighting of function names in stacktraces. Currently only Java supported.")
@@ -35,9 +42,11 @@
(when log4-hi-mode
(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))
(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-fontify-buffer))