changeset 52178:b5ad3c78162a

* menu-bar.el (menu-bar-options-menu): Supply a body for the [save-place] binding in the Options menu. Have it require 'saveplace' and then toggle the variable manually, to avoid an an unbound variable error. Thanks to <Sebastien.Kirche@sage.com> for the bug report.
author Karl Fogel <kfogel@red-bean.com>
date Tue, 12 Aug 2003 05:14:49 +0000
parents 57a5b7571acc
children 73faa15ff855
files lisp/ChangeLog lisp/menu-bar.el
diffstat 2 files changed, 14 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon Aug 11 21:55:20 2003 +0000
+++ b/lisp/ChangeLog	Tue Aug 12 05:14:49 2003 +0000
@@ -1,3 +1,11 @@
+2003-08-11  Karl Fogel  <kfogel@red-bean.com>
+
+	* menu-bar.el (menu-bar-options-menu): Supply a body for the
+	[save-place] binding in the Options menu.  Have it require
+	'saveplace' and then toggle the variable manually, to avoid an an
+	unbound variable error.  Thanks to <Sebastien.Kirche@sage.com>
+	for the bug report.
+
 2003-08-11  Nick Roberts  <nick@nick.uklinux.net>
 
 	* gdb-ui.el (gdb-insert-field, gdb-array-format1)
--- a/lisp/menu-bar.el	Mon Aug 11 21:55:20 2003 +0000
+++ b/lisp/menu-bar.el	Tue Aug 12 05:14:49 2003 +0000
@@ -870,7 +870,12 @@
   (menu-bar-make-toggle toggle-save-place-globally save-place
 			"Save Place in Files between Sessions"
 			"Saving place in files %s"
-			"Visit files of previous session when restarting Emacs"))
+			"Visit files of previous session when restarting Emacs"
+                        (require 'saveplace)
+                        ;; Do it by name, to avoid a free-variable
+                        ;; warning during byte compilation.
+                        (set-default
+                         'save-place (not (symbol-value 'save-place)))))
 
 (define-key menu-bar-options-menu [uniquify]
   (menu-bar-make-toggle toggle-uniquify-buffer-names uniquify-buffer-name-style