comparison lisp/obsolete/fast-lock.el @ 85503:59ee4068f60b

* progmodes/gud.el (gud-target-name): Move definition before use. * progmodes/dcl-mode.el: Require imenu at compile time. * progmodes/cc-engine.el (c-maybe-stale-found-type): Pacify byte-compiler. * obsolete/fast-lock.el: Use featurep test instead of string-match. * eshell/esh-mode.el (eshell-handle-ansi-color): Require ansi-color at compile time too. * eshell/em-unix.el (eshell/info): Require info at compile time too. * w32-fns.el: Require w32-vars. * diff-mode.el (diff-refine-hunk): Require smerge-mode at compile time too.
author Dan Nicolaescu <dann@ics.uci.edu>
date Sun, 21 Oct 2007 07:33:32 +0000
parents f115fe871253
children f873840f9fea
comparison
equal deleted inserted replaced
85502:0b3f2c1b1178 85503:59ee4068f60b
766 (add-text-properties (nth 0 regions) (nth 1 regions) plist) 766 (add-text-properties (nth 0 regions) (nth 1 regions) plist)
767 (setq regions (nthcdr 2 regions))))))) 767 (setq regions (nthcdr 2 regions)))))))
768 768
769 ;; Functions for XEmacs: 769 ;; Functions for XEmacs:
770 770
771 (when (save-match-data (string-match "XEmacs" (emacs-version))) 771 (when (featurep 'xemacs)
772 ;; 772 ;;
773 ;; It would be better to use XEmacs' `map-extents' over extents with a 773 ;; It would be better to use XEmacs' `map-extents' over extents with a
774 ;; `font-lock' property, but `face' properties are on different extents. 774 ;; `font-lock' property, but `face' properties are on different extents.
775 (defun fast-lock-get-face-properties () 775 (defun fast-lock-get-face-properties ()
776 "Return a list of `face' text properties in the current buffer. 776 "Return a list of `face' text properties in the current buffer.