aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1996-01-25 06:19:47 +0000
committerKarl Heuer1996-01-25 06:19:47 +0000
commit44a75d487a92ec8413901f8272845e1a03038acd (patch)
tree5dbec4ebd8e162098a75b272abe0d5f542f87893
parent60a37dc67dc98ce7aeeae4eacc29f3bde0333536 (diff)
downloademacs-44a75d487a92ec8413901f8272845e1a03038acd.tar.gz
emacs-44a75d487a92ec8413901f8272845e1a03038acd.zip
(toggle-save-place): Fix message text.
-rw-r--r--lisp/saveplace.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/saveplace.el b/lisp/saveplace.el
index 903862e4405..f86c48a6f7c 100644
--- a/lisp/saveplace.el
+++ b/lisp/saveplace.el
@@ -91,12 +91,12 @@ To save places automatically in all files, put this in your `.emacs' file:
91\(setq-default save-place t\)" 91\(setq-default save-place t\)"
92 (interactive "P") 92 (interactive "P")
93 (if (not buffer-file-name) 93 (if (not buffer-file-name)
94 (message "Buffer \"%s\" not visiting a file." (buffer-name)) 94 (message "Buffer `%s' not visiting a file" (buffer-name))
95 (if (and save-place (or (not parg) (<= parg 0))) 95 (if (and save-place (or (not parg) (<= parg 0)))
96 (progn 96 (progn
97 (message "No place will be saved in this file.") 97 (message "No place will be saved in this file")
98 (setq save-place nil)) 98 (setq save-place nil))
99 (message "Place will be saved.") 99 (message "Place will be saved")
100 (setq save-place t)))) 100 (setq save-place t))))
101 101
102(defun save-place-to-alist () 102(defun save-place-to-alist ()