comparison lisp/font-lock.el @ 61039:acd9df2cf3e5

Bind `font-lock-fontify-block' to M-o M-o.
author Luc Teirlinck <teirllm@auburn.edu>
date Mon, 28 Mar 2005 16:45:43 +0000
parents f36a881a67e2
children 43b4f51d1049 360860a0006f 4da4a09e8b1b
comparison
equal deleted inserted replaced
61038:f7f0c6eb075b 61039:acd9df2cf3e5
1095 (funcall font-lock-mark-block-function) 1095 (funcall font-lock-mark-block-function)
1096 (font-lock-fontify-region (point) (mark))) 1096 (font-lock-fontify-region (point) (mark)))
1097 ((error quit) (message "Fontifying block...%s" error-data))))))) 1097 ((error quit) (message "Fontifying block...%s" error-data)))))))
1098 1098
1099 (if (boundp 'facemenu-keymap) 1099 (if (boundp 'facemenu-keymap)
1100 (define-key facemenu-keymap "\M-g" 'font-lock-fontify-block)) 1100 (define-key facemenu-keymap "\M-o" 'font-lock-fontify-block))
1101 1101
1102 ;;; End of Fontification functions. 1102 ;;; End of Fontification functions.
1103 1103
1104 ;;; Additional text property functions. 1104 ;;; Additional text property functions.
1105 1105