mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(change-log-font-lock-keywords) <function>: Add

Browse source 
pattern for function of change.
(change-log-font-lock-keywords) <acknowledgements>: Amalgamate
acknowledgements patterns.
This commit is contained in:
Dave Love 2000-05-31 17:41:51 +00:00
parent a50192e7ed
commit a8d693d899
2 changed files with 13 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/ChangeLog
View file

@ -1,3 +1,10 @@
2000-05-31 Dave Love <fx@gnu.org>
* add-log.el (change-log-font-lock-keywords) <function>: Add
pattern for function of change.
(change-log-font-lock-keywords) <acknowledgements>: Amalgamate
acknowledgements patterns.
2000-05-31 Kenichi Handa <handa@etl.go.jp>
* isearch.el (isearch-printing-char): If keyboard coding system is

11
lisp/add-log.el
View file

@ -173,11 +173,12 @@ Note: The search is conducted only within 10%, at the beginning of the file."
;; Conditionals.
("\\[!?\\([^]\n]+\\)\\]\\(:\\| (\\)" (1 font-lock-variable-name-face))
;;
;; Function of change.
("<\\([^>\n]+\\)>\\(:\\| (\\)" (1 font-lock-variable-name-face))
;;
;; Acknowledgements.
("^\t\\(From\\|Patch\\(es\\)? by\\|Report\\(ed by\\| from\\)\\|Suggest\\(ed by\\|ion from\\)\\)"
1 font-lock-comment-face)
(" \\(From\\|Patch\\(es\\)? by\\|Report\\(ed by\\| from\\)\\|Suggest\\(ed by\\|ion from\\)\\)"
1 font-lock-comment-face))
("\\(^\t\\| \\)\\(From\\|Patch\\(es\\)? by\\|Report\\(ed by\\| from\\)\\|Suggest\\(ed by\\|ion from\\)\\)"
2 font-lock-comment-face))
"Additional expressions to highlight in Change Log mode.")
(defvar change-log-mode-map (make-sparse-keymap)
@ -536,7 +537,7 @@ Prefix arg means justify as well."
t))
(defcustom add-log-current-defun-header-regexp
"^\\([A-Z][A-Z_ ]*[A-Z_]\\|[-_a-zA-Z]+\\)[ \t]*[:=]"
"^\\([[:upper:]][[:upper:]_ ]*[[:upper:]_]\\|[-_[:alpha:]]+\\)[ \t]*[:=]"
"*Heuristic regexp used by `add-log-current-defun' for unknown major modes."
:type 'regexp
:group 'change-log)