# HG changeset patch # User Richard M. Stallman # Date 937439189 0 # Node ID 5e14fd494b83b1de8063df5460c98bc7cbcf397a # Parent 62a49653ef3888e97f305d75786adde8fe55aa05 (whitespace-mode, whitespace-mode-line): Add defvars. diff -r 62a49653ef38 -r 5e14fd494b83 lisp/whitespace.el --- a/lisp/whitespace.el Wed Sep 15 23:29:16 1999 +0000 +++ b/lisp/whitespace.el Wed Sep 15 23:46:29 1999 +0000 @@ -175,13 +175,15 @@ :group 'whitespace) ;; Tell Emacs about this new kind of minor mode +(defvar whitespace-mode nil + "Non-nil when Whitespace mode (a minor mode) is enabled.") (make-variable-buffer-local 'whitespace-mode) (put 'whitespace-mode 'permanent-local nil) -(set-default 'whitespace-mode nil) +(defvar whitespace-mode-line nil + "String to display in the mode line for Whitespace mode.") (make-variable-buffer-local 'whitespace-mode-line) (put 'whitespace-mode-line 'permanent-local nil) -(set-default 'whitespace-mode-line nil) (if (not (assoc 'whitespace-mode minor-mode-alist)) (setq minor-mode-alist (cons '(whitespace-mode whitespace-mode-line)