# HG changeset patch
# User Karl Fogel <kfogel@red-bean.com>
# Date 1060665289 0
# Node ID b5ad3c78162a71d1593c038a22d60651654ba395
# Parent  57a5b7571acc685810f8a7c0a831ba6106c829e1
* 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.

diff -r 57a5b7571acc -r b5ad3c78162a lisp/ChangeLog
--- 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)
diff -r 57a5b7571acc -r b5ad3c78162a lisp/menu-bar.el
--- 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