From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 30 Oct 2007 08:24:30 +0000 (+0000)
Subject: (savehist-save): Obey savehist-ignored-variables.
X-Git-Tag: emacs-pretest-22.1.90~474
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e2295672e81cde202fc81a5bb53b0400f11727c1;p=emacs.git

(savehist-save): Obey savehist-ignored-variables.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 56125595bd7..d456bedce15 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-10-30  Richard Stallman  <rms@gnu.org>
+
+	* savehist.el (savehist-save): Obey savehist-ignored-variables.
+
 2007-10-30  Nick Roberts  <nickrob@snap.net.nz>
 
 	* progmodes/gdb-ui.el (gdb-delete-out-of-scope): New option.
diff --git a/lisp/savehist.el b/lisp/savehist.el
index b28bd476933..355762d9f3e 100644
--- a/lisp/savehist.el
+++ b/lisp/savehist.el
@@ -308,7 +308,8 @@ If AUTO-SAVE is non-nil, compare the saved contents to the one last saved,
 	       (current-buffer))
 	(insert ?\n)
 	(dolist (symbol savehist-minibuffer-history-variables)
-	  (when (boundp symbol)
+	  (when (and (boundp symbol)
+		     (not (memq symbol savehist-ignored-variables)))
 	    (let ((value (savehist-trim-history (symbol-value symbol)))
 		  excess-space)
 	      (when value		; Don't save empty histories.