# HG changeset patch # User Dave Love # Date 936398743 0 # Node ID e42d6599cade83b0350eab7ce2e25ca14a15937a # Parent 2b059707aa220044482d7ab1751b17d949524258 (double-mode): Customize the variable. diff -r 2b059707aa22 -r e42d6599cade lisp/double.el --- a/lisp/double.el Fri Sep 03 18:50:06 1999 +0000 +++ b/lisp/double.el Fri Sep 03 22:45:43 1999 +0000 @@ -157,9 +157,19 @@ ;;; Mode -(defvar double-mode nil) -;; Indicator for the double mode. - (make-variable-buffer-local 'double-mode) +;;;###autoload +(defcustom double-mode nil + "Toggle Double mode. +Setting this variable directly does not take effect; +use either \\[customize] or the function `double-mode'." + :set (lambda (symbol value) + (double-mode (if value 1 0))) + :initialize 'custom-initialize-default + :link '(emacs-commentary-link "double") + :type 'boolean + :require 'double + :group 'double) +(make-variable-buffer-local 'double-mode) (or (assq 'double-mode minor-mode-alist) (setq minor-mode-alist