comparison lisp/eshell/em-ls.el @ 37326:19d97e9f6689

(eshell-ls-insert-directory): Set font-lock-defaults to nil, to prevent fontification in dired buffers, if Eshell's ls is being used.
author John Wiegley <johnw@newartisans.com>
date Wed, 11 Apr 2001 21:51:53 +0000
parents 96d933eb13f4
children 6d7c89c79996
comparison
equal deleted inserted replaced
37325:56555e5142a2 37326:19d97e9f6689
253 eshell-current-subjob-p) 253 eshell-current-subjob-p)
254 ;; use the fancy highlighting in `eshell-ls' rather than font-lock 254 ;; use the fancy highlighting in `eshell-ls' rather than font-lock
255 (when (and eshell-ls-use-colors 255 (when (and eshell-ls-use-colors
256 (featurep 'font-lock)) 256 (featurep 'font-lock))
257 (font-lock-mode -1) 257 (font-lock-mode -1)
258 (setq font-lock-defaults nil)
258 (if (boundp 'font-lock-buffers) 259 (if (boundp 'font-lock-buffers)
259 (set 'font-lock-buffers 260 (set 'font-lock-buffers
260 (delq (current-buffer) 261 (delq (current-buffer)
261 (symbol-value 'font-lock-buffers))))) 262 (symbol-value 'font-lock-buffers)))))
262 (let ((insert-func 'insert) 263 (let ((insert-func 'insert)