From 58ee38cab88f4558ac3e5cd1d6acff2da7000aba Mon Sep 17 00:00:00 2001 From: Noah Friedman Date: Sun, 14 Jul 1996 16:46:25 +0000 Subject: [PATCH] (eldoc-mode): Toggle eldoc-mode if no prefix given. --- lisp/emacs-lisp/eldoc.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index 26f6ce751ff..5c4683d4138 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el @@ -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 @@ It is probably best to manipulate this data structure with the commands '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") -- 2.39.2