summaryrefslogtreecommitdiff
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2014-02-18 00:09:51 -0800
committerGlenn Morris <rgm@gnu.org>2014-02-18 00:09:51 -0800
commita73fae1ffa16e60f5ddc3a5536d322edc10a8a83 (patch)
treec385145c21090a9d5e28d07a24476e902ad22b35 /lisp/textmodes
parent1825653e3dd0c9f1d6361f0afc62301b68015acc (diff)
downloademacs-a73fae1ffa16e60f5ddc3a5536d322edc10a8a83.tar.gz
Some remember doc
* doc/misc/remember.texi (copying): Bump remember mode version. (Installation): Remove unnecessary chapter. (Quick Start): No need to explicitly load remember.el. (Separate Text Files): New section. * lisp/textmodes/remember.el (remember-data-directory) (remember-directory-file-name-format, remember-store-in-files) (remember-notes-initial-major-mode, remember-notes-bury-on-kill) (remember-notes-save-and-bury-buffer) (remember-notes--kill-buffer-query): Doc fixes. * etc/NEWS: Related edit.
Diffstat (limited to 'lisp/textmodes')
-rw-r--r--lisp/textmodes/remember.el30
1 files changed, 19 insertions, 11 deletions
diff --git a/lisp/textmodes/remember.el b/lisp/textmodes/remember.el
index 33e44c05c33..a9eb7ad4ec8 100644
--- a/lisp/textmodes/remember.el
+++ b/lisp/textmodes/remember.el
@@ -442,21 +442,24 @@ If you want to remember a region, supply a universal prefix to
(remember-destroy))))
(defcustom remember-data-directory "~/remember"
- "The directory in which to store remember data as files."
+ "The directory in which to store remember data as files.
+Used by `remember-store-in-files'."
:type 'directory
:version "24.4"
:group 'remember)
(defcustom remember-directory-file-name-format "%Y-%m-%d_%T-%z"
- "Format string for the file name in which to store unprocessed data."
+ "Format string for the file name in which to store unprocessed data.
+This is passed to `format-time-string'.
+Used by `remember-store-in-files'."
:type 'string
:version "24.4"
:group 'remember)
(defun remember-store-in-files ()
"Store remember data in a file in `remember-data-directory'.
-The file is named after `remember-directory-file-name-format' fed through
-`format-time-string'."
+The file is named by calling `format-time-string' using
+`remember-directory-file-name-format' as the format string."
(let ((name (format-time-string
remember-directory-file-name-format (current-time)))
(text (buffer-string)))
@@ -572,20 +575,19 @@ purpose of storing notes."
:version "24.4")
(defcustom remember-notes-initial-major-mode nil
- "Major mode to set to notes buffer when it's created.
-If set to nil will use the same mode as `initial-major-mode'."
- :type '(choice (const :tag "Same as `initial-major-mode'" nil)
+ "Major mode to use in the notes buffer when it's created.
+If this is nil, use `initial-major-mode'."
+ :type '(choice (const :tag "Use `initial-major-mode'" nil)
(function :tag "Major mode" text-mode))
:version "24.4")
(defcustom remember-notes-bury-on-kill t
- "Whether to bury notes buffer instead of killing."
+ "Non-nil means `kill-buffer' will bury the notes buffer instead of killing."
:type 'boolean
:version "24.4")
(defun remember-notes-save-and-bury-buffer ()
- "Saves and buries current buffer.
-Buffer is saved only if `buffer-modified-p' returns non-nil."
+ "Save (if it is modified) and bury the current buffer."
(interactive)
(when (buffer-modified-p)
(save-buffer))
@@ -648,10 +650,16 @@ preserve across Emacs restarts. The notes will be stored in the
buf))
(defun remember-notes--kill-buffer-query ()
+ "Function that `remember-notes-mode' adds to `kill-buffer-query-functions'.
+Save the current buffer if modified. If `remember-notes-bury-on-kill'
+is non-nil, bury it and return nil; otherwise return t."
(when (buffer-modified-p)
(save-buffer))
(if remember-notes-bury-on-kill
- (bury-buffer)
+ (progn
+ ;; bury-buffer always returns nil, but let's be explicit.
+ (bury-buffer)
+ nil)
t))
;;; remember.el ends here