Fixed regexp.
authorDaiki Ueno <ueno@unixuser.org>
Fri, 30 May 2003 05:27:02 +0000 (05:27 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Fri, 30 May 2003 05:27:02 +0000 (05:27 +0000)
lisp/riece-highlight.el

index 8360379..a9715ef 100644 (file)
 
 (defcustom riece-highlight-font-lock-keywords
   (append
-   (list
-    `(,(concat
-       "^" riece-time-prefix-regexp 
-       "\\(<[^>]+>\\|>[^<]+<\\|-[^-]+-\\|([^)]+)\\|=[^=]+=\\)")
-      (1 riece-prefix-face append t)))
+   (list (list (concat "^" riece-time-prefix-regexp
+                      "\\(<[^>]+>\\|>[^<]+<\\|([^)]+)\\|-[^ ]+ [^-]+-\\|=[^ ]+ [^=]+=\\|\\([+-]\\)[^ ]+\\2\\)")
+              '(1 riece-prefix-face append t)))
    ;; set property to the whole line
    (mapcar
     (lambda (line)