From 217425d076de888d0c0de987fba32a3aba7dc3fe Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 15 Sep 1999 23:46:29 +0000 Subject: [PATCH] (whitespace-mode, whitespace-mode-line): Add defvars. --- lisp/whitespace.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/whitespace.el b/lisp/whitespace.el index 459383a17bf..2e648f1b2c8 100644 --- a/lisp/whitespace.el +++ b/lisp/whitespace.el @@ -175,13 +175,15 @@ To disable timer scans, set this to zero." :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) -- 2.39.5