aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2006-02-02 12:02:14 +0000
committerJuanma Barranquero2006-02-02 12:02:14 +0000
commitd33544d3796f2b63df17299ebdaca3481c14e32d (patch)
tree5a582cb111408a11cb2ad551da5071d52db677ae
parent2e398771804d98af576295f35070f6e0f0319d93 (diff)
downloademacs-d33544d3796f2b63df17299ebdaca3481c14e32d.tar.gz
emacs-d33544d3796f2b63df17299ebdaca3481c14e32d.zip
(savehist-loaded, savehist-load, savehist-install, savehist-autosave,
savehist-trim-history): Fix typos in docstrings.
-rw-r--r--lisp/savehist.el20
1 files changed, 10 insertions, 10 deletions
diff --git a/lisp/savehist.el b/lisp/savehist.el
index ef75369c761..6c6d936af6a 100644
--- a/lisp/savehist.el
+++ b/lisp/savehist.el
@@ -1,6 +1,6 @@
1;;; savehist.el --- Save minibuffer history. 1;;; savehist.el --- Save minibuffer history.
2 2
3;; Copyright (C) 1997,2005 Free Software Foundation 3;; Copyright (C) 1997, 2005 Free Software Foundation
4 4
5;; Author: Hrvoje Niksic <hniksic@xemacs.org> 5;; Author: Hrvoje Niksic <hniksic@xemacs.org>
6;; Keywords: minibuffer 6;; Keywords: minibuffer
@@ -171,7 +171,7 @@ buffer text.")
171 171
172(defvar savehist-loaded nil 172(defvar savehist-loaded nil
173 "Whether the history has already been loaded. 173 "Whether the history has already been loaded.
174This prevents toggling savehist-mode from destroying existing 174This prevents toggling `savehist-mode' from destroying existing
175minibuffer history.") 175minibuffer history.")
176 176
177(when (featurep 'xemacs) 177(when (featurep 'xemacs)
@@ -226,9 +226,9 @@ which is probably undesirable."
226Don't call this from new code, use (savehist-mode 1) instead. 226Don't call this from new code, use (savehist-mode 1) instead.
227 227
228This function loads the variables stored in `savehist-file' and turns on 228This function loads the variables stored in `savehist-file' and turns on
229savehist-mode. If savehist-file is in the old format that doesn't record 229`savehist-mode'. If `savehist-file' is in the old format that doesn't
230the value of `savehist-minibuffer-history-variables', that value is 230record the value of `savehist-minibuffer-history-variables', that value
231deducted from the contents of the file." 231is deducted from the contents of the file."
232 (savehist-mode 1) 232 (savehist-mode 1)
233 ;; Old versions of savehist distributed with XEmacs didn't save 233 ;; Old versions of savehist distributed with XEmacs didn't save
234 ;; savehist-minibuffer-history-variables. If that variable is nil 234 ;; savehist-minibuffer-history-variables. If that variable is nil
@@ -250,8 +250,8 @@ deducted from the contents of the file."
250(defun savehist-install () 250(defun savehist-install ()
251 "Hook savehist into Emacs. 251 "Hook savehist into Emacs.
252Normally invoked by calling `savehist-mode' to set the minor mode. 252Normally invoked by calling `savehist-mode' to set the minor mode.
253Installs `savehist-autosave' in `kill-emacs-hook' and on a timer. To 253Installs `savehist-autosave' in `kill-emacs-hook' and on a timer.
254undo this, call `savehist-uninstall'." 254To undo this, call `savehist-uninstall'."
255 (add-hook 'minibuffer-setup-hook 'savehist-minibuffer-hook) 255 (add-hook 'minibuffer-setup-hook 'savehist-minibuffer-hook)
256 (add-hook 'kill-emacs-hook 'savehist-autosave) 256 (add-hook 'kill-emacs-hook 'savehist-autosave)
257 ;; Install an invocation of savehist-autosave on a timer. This 257 ;; Install an invocation of savehist-autosave on a timer. This
@@ -333,14 +333,14 @@ If AUTO-SAVE is non-nil, compare the saved contents to the one last saved,
333 333
334(defun savehist-autosave () 334(defun savehist-autosave ()
335 "Save the minibuffer history if it has been modified since the last save. 335 "Save the minibuffer history if it has been modified since the last save.
336Does nothing if savehist-mode is off." 336Does nothing if `savehist-mode' is off."
337 (when savehist-mode 337 (when savehist-mode
338 (savehist-save t))) 338 (savehist-save t)))
339 339
340(defun savehist-trim-history (value) 340(defun savehist-trim-history (value)
341 "Retain only the first history-length items in VALUE. 341 "Retain only the first `history-length' items in VALUE.
342Only used under XEmacs, which doesn't (yet) implement automatic 342Only used under XEmacs, which doesn't (yet) implement automatic
343trimming of history lists to history-length items." 343trimming of history lists to `history-length' items."
344 (if (and (featurep 'xemacs) 344 (if (and (featurep 'xemacs)
345 (natnump history-length) 345 (natnump history-length)
346 (> (length value) history-length)) 346 (> (length value) history-length))