Lines Matching +defs:auto +defs:mode +defs:list
82 ;; (setq hilit-mode-enable-list '(not text-mode)
83 ;; hilit-background-mode 'light
90 ;; If you like font-lock-mode and want to use both packages, then you can
92 ;; said modes in hilit-mode-enable-list.
147 ;; * hilit-toggle-highlight is flaky when auto-rehighlight is neither t nor nil.
183 ;; minor mods to lisp-mode and c/c++ mode patterns
186 ;; work-around for bug in next-overlay-change that caused dired and jargon-mode
200 ;; twiddled the calendar-mode patterns a bit.
203 ;; hilit-set-mode-patterns was screwing up two part patterns. it doesn't now.
216 ;; no longer use vm-summary-mode-hooks.
218 ;; some code moved from hilit-highlight-region to hilit-set-mode-patterns.
220 ;; hilit-highlight-region....use a pseudo-mode instead.
227 ;; diverged lisp-mode and emacs-lisp-mode...also added lisp keywords.
230 ;; added calendar-mode, icon-mode and pascal-mode patterns
235 ;; added optional case-fold argument to hilit-set-mode-patterns, this case-fold
249 ;; NEW FUNCTION: hilit-add-mode-pattern... kinda like add-hook for patterns
251 ;; fixed minor pattern bugs for latex-mode and emacs-lisp-mode
254 ;; added const to the list of modifiers for C/C++ types
276 ;; added hook for mh-show-mode
285 ;; hilit-auto-rehighlight is 'visible
286 ;; added hilit-predefined-face-list...
287 ;; changed name of hilit-mode-alist to hilit-patterns-alist
292 ;; message header patterns to message bodies in mail-mode and its kin.
293 ;; hilit-set-mode-patterns now takes a list of modes and an optional parse-fn
305 ;; ! (and w vm-auto-center-summary (vm-auto-center-summary))))
313 ;; ! (and w vm-auto-center-summary (vm-auto-center-summary))
329 (defvar hilit-auto-highlight t
333 (defvar hilit-auto-highlight-maxout 60000 ; hilit19 keeps getting bigger...
334 "* auto-highlight is disabled in buffers larger than this")
336 (defvar hilit-auto-rehighlight t
343 (make-variable-buffer-local 'hilit-auto-rehighlight)
345 (defvar hilit-auto-rehighlight-fallback '(20000 . 100)
347 hilit-auto-rehighlight if the size of a newly opened buffer is larger than
364 (defvar hilit-background-mode 'light
367 (defvar hilit-mode-enable-list nil
368 "If a list of modes to exclusively enable or specifically disable.
369 The sense of the list is negated if it begins with the symbol 'not'.
372 Ex: (perl-mode jargon-mode c-mode) ; just perl, C, and jargon modes
373 (not text-mode) ; all modes except text mode")
378 "alist of major-mode values and parsers called by hilit-rehighlight-buffer.
380 Parsers for a given mode are IGNORED for partial rehighlights...maybe you'd
384 "alist of major-mode values and default highlighting patterns
386 A highlighting pattern is a list of the form (start end face), where
392 (mode . (case-fold pattern [pattern ...]))
396 (defvar hilit-predefined-face-list (face-list)
419 hilit-background-mode hilit-mode-enable-list
420 hilit-auto-highlight hilit-auto-highlight-maxout
421 hilit-auto-rehighlight hilit-auto-rehighlight-fallback
428 hilit-predefined-face-list
489 ;; VM, GNUS and Text mode
509 ;; dired mode
516 ;; Info-mode, and jargon-mode.el and prep.ai.mit.edu:/pub/gnu/jargon*
531 (cdr (assq hilit-background-mode
555 cmdl (cons (list 'hilit-associate ''hilit-face-translation-table
556 (list 'quote from) to)
593 (memq face hilit-predefined-face-list))
597 (not (memq face (face-list)))
701 major-mode is used. If PATTERNS is a symbol, then the patterns associated
706 (setq patterns (cdr (assq major-mode hilit-patterns-alist))))
778 (let ((parse-fn (cdr (assq major-mode hilit-parser-alist))))
792 ;; the message separator line in mail-mode)
806 ;; ;; FIXME -- this loses numeric information in hilit-auto-rehighlight
807 ;; (setq hilit-auto-rehighlight
808 ;; (and (not arg) (not hilit-auto-rehighlight)))
809 ;; (if hilit-auto-rehighlight
812 ;; (message "Rehighlighting is set to %s" hilit-auto-rehighlight))
819 "Find-file hook for hilit package. See the variable hilit-auto-highlight."
820 (cond ((and hilit-auto-highlight
821 (assq major-mode hilit-patterns-alist))
822 (if (> buffer-saved-size (car hilit-auto-rehighlight-fallback))
823 (setq hilit-auto-rehighlight
824 (cdr hilit-auto-rehighlight-fallback)))
825 (if (> buffer-saved-size hilit-auto-highlight-maxout)
832 "Rehighlights according to the value of hilit-auto-rehighlight, or the
834 \t\\[hilit-repaint-command]\t\trepaint according to hilit-auto-rehighlight
840 (or arg (setq arg hilit-auto-rehighlight))
852 "Recenter, then rehighlight according to hilit-auto-rehighlight. If called
864 (let ((transient-mark-mode nil))
866 (and hilit-auto-rehighlight
873 (let ((transient-mark-mode nil))
875 (and hilit-auto-rehighlight
948 (define-minor-mode hilit-mode
949 "Obsolete minor mode. Use `global-font-lock-mode' instead."
952 (unless (and hilit-inhibit-rebinding hilit-mode)
954 (if hilit-mode 'yank 'hilit-yank)
955 (if hilit-mode 'hilit-yank 'yank)
958 (if hilit-mode 'yank-pop 'hilit-yank-pop)
959 (if hilit-mode 'hilit-yank-pop 'yank-pop)
962 (if hilit-mode 'recenter 'hilit-recenter)
963 (if hilit-mode 'hilit-recenter 'recenter)
966 (if hilit-mode
970 (if hilit-mode
974 (unless (and hilit-inhibit-hooks hilit-mode)
980 (if hilit-mode
986 ;; runs too early vm-summary-mode-hooks
993 mh-show-mode-hook
1020 (defun hilit-set-mode-patterns (modelist patterns
1023 See the variable hilit-mode-enable-list.
1034 (or (consp modelist) (setq modelist (list modelist)))
1035 (let (ok (flip (eq (car hilit-mode-enable-list) 'not)))
1038 (setq ok (or (null hilit-mode-enable-list)
1039 (memq m hilit-mode-enable-list)))
1048 (defun hilit-add-pattern (pstart pend face &optional mode first)
1049 "Highlight pstart with face for the current major-mode.
1050 Optionally, place the new pattern first in the pattern list"
1056 (or mode (setq mode major-mode))
1057 (let ((old-patterns (cdr (assq mode hilit-patterns-alist)))
1058 (new-pat (list pstart pend face)))
1060 (hilit-set-mode-patterns mode (list new-pat)))
1064 (nconc old-patterns (list new-pat)))))
1104 (hilit-set-mode-patterns
1105 '(c-mode c++-c-mode elec-c-mode)
1118 (hilit-set-mode-patterns
1119 'c++-mode
1133 (hilit-set-mode-patterns
1134 '(objc-mode objective-C-mode)
1150 (hilit-set-mode-patterns
1151 'perl-mode
1161 (hilit-set-mode-patterns
1162 'ada-mode
1189 (hilit-set-mode-patterns
1190 'fortran-mode
1204 (hilit-set-mode-patterns
1205 '(m2-mode modula-2-mode)
1213 (hilit-set-mode-patterns 'prolog-mode
1223 (hilit-set-mode-patterns
1225 LaTeX-mode japanese-LaTeX-mode SliTeX-mode
1226 japanese-SliTeX-mode FoilTeX-mode latex-mode
1280 (hilit-set-mode-patterns
1281 'bibtex-mode
1288 (hilit-set-mode-patterns
1289 'compilation-mode
1295 (hilit-set-mode-patterns
1296 'makefile-mode
1317 (hilit-set-mode-patterns 'msg-header header-patterns)
1318 (hilit-set-mode-patterns 'msg-body body-patterns)
1319 (hilit-set-mode-patterns '(vm-mode text-mode mail-mode rmail-mode
1320 gnus-article-mode news-reply-mode mh-show-mode)
1324 (hilit-set-mode-patterns
1325 'gnus-group-mode
1331 (hilit-set-mode-patterns
1332 'vm-summary-mode
1346 (hilit-set-mode-patterns
1347 '(emacs-lisp-mode lisp-interaction-mode)
1359 ("^\\s *(\\(provide\\|require\\|\\(auto\\)?load\\).*$" nil include)
1364 (hilit-set-mode-patterns
1365 '(lisp-mode ilisp-mode)
1379 ("^\\s *(\\(provide\\|require\\|\\(auto\\)?load\\).*$" nil include)
1381 ("(\\(let\\*?\\|locally\\|cond\\|if\\*?\\|or\\|and\\|map\\(car\\|c[ao]n\\)?\\|prog[nv1*]?\\|while\\|when\\|unless\\|do\\(\\*\\|list\\|times\\)\\|list\\|lambda\\|function\\|values\\|set\\([qf]\\|car\\|cdr\\)?\\|rplac[ad]\\|nconc\\|block\\|go\\|return\\(-from\\)?\\|[ec]?\\(type\\)?case\\|multiple-value-\\(bind\\|setq\\|list\\|call\\|prog1\\)\\|unwind-protect\\|handler-case\\|catch\\|throw\\|eval-when\\(-compile\\)?\\)[ \t\n]" 1 keyword)
1385 (hilit-set-mode-patterns
1386 'plain-tex-mode
1401 (hilit-set-mode-patterns
1402 'nroff-mode
1413 (hilit-set-mode-patterns
1414 'texinfo-mode
1427 (hilit-set-mode-patterns
1428 'dired-mode
1435 (list (cons
1441 (hilit-set-mode-patterns
1442 'jargon-mode
1446 (hilit-set-mode-patterns
1447 'Info-mode
1454 (hilit-set-mode-patterns
1455 'calendar-mode
1459 (hilit-set-mode-patterns
1460 'asm-mode
1473 (hilit-set-mode-patterns
1474 'pascal-mode
1489 (hilit-set-mode-patterns
1490 'icon-mode