comparison lisp/help.el @ 57678:289e10822308

Clean whitespace.
author Kim F. Storm <storm@cua.dk>
date Sun, 24 Oct 2004 21:07:38 +0000
parents 5ee6ba47682f
children fd2c192afcd3
comparison
equal deleted inserted replaced
57677:04c673ad566a 57678:289e10822308
649 (not (eq indicator (symbol-value indicator)))) 649 (not (eq indicator (symbol-value indicator))))
650 (setq indicator (symbol-value indicator))) 650 (setq indicator (symbol-value indicator)))
651 (push (list pretty-minor-mode mode indicator) 651 (push (list pretty-minor-mode mode indicator)
652 minor-modes)))) 652 minor-modes))))
653 (if auto-fill-function 653 (if auto-fill-function
654 ;; copy pure string so we can add face property to it below. 654 ;; copy pure string so we can add face property to it below.
655 (push (list (copy-sequence "Auto Fill") 'auto-fill-mode " Fill") 655 (push (list (copy-sequence "Auto Fill") 'auto-fill-mode " Fill")
656 minor-modes)) 656 minor-modes))
657 (setq minor-modes 657 (setq minor-modes
658 (sort minor-modes 658 (sort minor-modes
659 (lambda (a b) (string-lessp (car a) (car b))))) 659 (lambda (a b) (string-lessp (car a) (car b)))))
660 (when minor-modes 660 (when minor-modes