564 |
(hi-lock-current-line))))))) |
(hi-lock-current-line))))))) |
565 |
(when hi-lock-mode (hi-lock-set-file-patterns all-patterns)) |
(when hi-lock-mode (hi-lock-set-file-patterns all-patterns)) |
566 |
(if (interactive-p) |
(if (interactive-p) |
567 |
(message (format "Hi-lock added %d patterns." (length all-patterns))))))) |
(message "Hi-lock added %d patterns." (length all-patterns)))))) |
568 |
|
|
569 |
(defun hi-lock-font-lock-hook () |
(defun hi-lock-font-lock-hook () |
570 |
"Add hi lock patterns to font-lock's." |
"Add hi lock patterns to font-lock's." |