Mercurial > emacs
changeset 15671:27e6b6f4f1b6
(eldoc-mode): Toggle eldoc-mode if no prefix given.
| author | Noah Friedman <friedman@splode.com> |
|---|---|
| date | Sun, 14 Jul 1996 16:46:25 +0000 |
| parents | 6101ab54d20a |
| children | d91ddc424d9a |
| files | lisp/emacs-lisp/eldoc.el |
| diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/eldoc.el Sun Jul 14 14:42:27 1996 +0000 +++ b/lisp/emacs-lisp/eldoc.el Sun Jul 14 16:46:25 1996 +0000 @@ -11,9 +11,9 @@ ;; LCD Archive Entry: ;; eldoc|Noah Friedman|friedman@prep.ai.mit.edu| ;; show function arglist or variable docstring in echo area| -;; $Date: 1995/11/21 15:21:34 $|$Revision: 1.4 $|~/misc/eldoc.el.gz| +;; $Date: 1995/11/25 03:45:25 $|$Revision: 1.5 $|~/misc/eldoc.el.gz| -;; $Id: eldoc.el,v 1.4 1995/11/21 15:21:34 friedman Exp friedman $ +;; $Id: eldoc.el,v 1.5 1995/11/25 03:45:25 friedman Exp friedman $ ;; This program is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by @@ -147,8 +147,10 @@ 'post-command-hook) 'eldoc-mode-print-current-symbol-info) - (setq eldoc-mode - (>= (prefix-numeric-value prefix) 0)) + (setq eldoc-mode (if prefix + (>= (prefix-numeric-value prefix) 0) + (not eldoc-mode))) + (and (interactive-p) (if eldoc-mode (message "eldoc-mode is enabled")