bug#7709: [PATCH] emacs-lisp/eldoc.el (turn-off-eldoc-mode): New function

[Jari Aalto <jari.aalto@cante.net>]

[-- Attachment #1: Type: text/plain, Size: 853 bytes --]

Package: emacs
Version: 23.2+1-5.1
Severity: normal

There is interactive function M-x turn-on-eldoc-mode; this patch
complements it with respective user callable "off" function.

2010-12-22  Jari Aalto  <jari.aalto@cante.net>

       * emacs-lisp/eldoc.el (turn-on-eldoc-mode): New function.

-- System Information
Debian Release: squeeze/sid
  APT Prefers testing
  APT policy: (990, testing) (500, unstable) (1, experimental)
Architecture: amd64
Kernel: Linux picasso 2.6.32-5-amd64 #1 SMP Fri Sep 17 21:50:19 UTC 2010 x86_64 GNU/Linux
Locale: LANG=en_DK.UTF-8

-- Versions of packages `emacs depends on'.
Depends:
emacs23         23.2+1-5.1      GNU Emacs is the extensible self-documenting 
emacs23-lucid   23.2+1-5.1      GNU Emacs is the extensible self-documenting 
emacs23-nox     23.2+1-5.1      GNU Emacs is the extensible self-documenting 


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-eldoc.el-turn-off-eldoc-mode-New-function.patch --]
[-- Type: text/x-diff, Size: 950 bytes --]

From 02fc915eb33a9fa52a9eac06b2f4bc2b2e9866cc Mon Sep 17 00:00:00 2001
From: Jari Aalto <jari.aalto@cante.net>
Date: Wed, 22 Dec 2010 15:37:37 +0200
Subject: [PATCH] eldoc.el: (turn-off-eldoc-mode): New function
Organization: Private
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: 8bit


Signed-off-by: Jari Aalto <jari.aalto@cante.net>
---
 lisp/emacs-lisp/eldoc.el |    6 ++++++
 1 files changed, 6 insertions(+), 0 deletions(-)

diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el
index b484549..0d8d6b4 100644
--- a/lisp/emacs-lisp/eldoc.el
+++ b/lisp/emacs-lisp/eldoc.el
@@ -173,6 +173,12 @@ With prefix ARG, turn ElDoc mode on if and only if ARG is positive."
   (interactive)
   (eldoc-mode 1))
 
+;;;###autoload
+(defun turn-off-eldoc-mode ()
+  "Turn off ElDoc mode (see command `eldoc-mode')."
+  (interactive)
+  (eldoc-mode -1))
+
 \f
 (defun eldoc-schedule-timer ()
   (or (and eldoc-timer
-- 
1.7.2.3