diff lisp/menu-bar.el @ 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 1b765542e16e
children 695cf19ef79e
line wrap: on
line diff
--- 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