(blink-cursor-mode): Replace `emacs-quick-startup' with `no-blinking-cursor'.

[gnu-emacs] / lisp / saveplace.el

diff --git a/lisp/saveplace.el b/lisp/saveplace.el
index 3e40f118a41b0d7cc27c7d2cb888fca148ef59a1..e536e3c323718203bbdb75d339e5cafa9813bf8a 100644 (file)
--- a/lisp/saveplace.el
+++ b/lisp/saveplace.el
@@ -61,7 +61,10 @@ This variable is automatically buffer-local.
 If you wish your place in any file to always be automatically saved,
 simply put this in your `~/.emacs' file:
 
-\(setq-default save-place t\)"
+\(setq-default save-place t)
+\(require 'saveplace)
+
+or else use the Custom facility to set this option."
   :type 'boolean
   :require 'saveplace
   :group 'save-place)
@@ -207,7 +210,9 @@ may have changed\) back to `save-place-alist'."
       (delete-region (point-min) (point-max))
       (when save-place-forget-unreadable-files
        (save-place-forget-unreadable-files))
-      (print save-place-alist (current-buffer))
+      (let ((print-length nil)
+            (print-level nil))
+        (print save-place-alist (current-buffer)))
       (let ((version-control
              (cond
               ((null save-place-version-control) nil)