Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-20 03:47:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

remember.el: Add additional items to some defcustom options

Browse source
This commit is contained in:
Michael Olson 2007-10-30 13:47:24 +00:00
parent b617318246
commit e06280609c
2 changed files with 12 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -3,6 +3,12 @@
* vc.el (vc-annotate): Fix omission bug:
Specify value for vc-sentinel-movepoint.
2007-10-30 Michael Olson <mwolson@gnu.org>
* textmodes/remember.el (remember-mode-hook)
(remember-handler-functions, remember-annotation-functions): Add
additional items as options, including some Org functions.
2007-10-30 Tassilo Horn <tassilo@member.fsf.org>
* doc-view.el: Remove cl-dependency.

11
lisp/textmodes/remember.el
View file

@ -177,7 +177,7 @@
(defcustom remember-mode-hook nil
"Functions run upon entering `remember-mode'."
:type 'hook
:options '(flyspell-mode turn-on-auto-fill)
:options '(flyspell-mode turn-on-auto-fill org-remember-apply-template)
:group 'remember)
(defcustom remember-in-new-frame nil
@ -203,6 +203,10 @@ user wants remembered.
If any function returns non-nil, the data is assumed to have been
recorded somewhere by that function. "
:type 'hook
:options '(remember-store-in-mailbox
remember-append-to-file
remember-diary-extract-entries
org-remember-handler)
:group 'remember)
(defcustom remember-all-handler-functions nil
@ -234,6 +238,7 @@ called."
If you have planner.el, it's nice to set this to
`planner-annotation-functions'."
:type 'hook
:options '(org-remember-annotation buffer-file-name)
:group 'remember)
(defvar remember-annotation nil
@ -368,8 +373,6 @@ Subject: %s\n\n"
(append-to-file (point-min) (point-max) remember-mailbox)
t)))
(custom-add-option 'remember-handler-functions 'remember-store-in-mailbox)
;; Remembering to plain files
(defcustom remember-data-file "~/.notes"
@ -400,8 +403,6 @@ Subject: %s\n\n"
(when remember-save-after-remembering (save-buffer))))
(append-to-file (point-min) (point-max) remember-data-file)))))
(custom-add-option 'remember-handler-functions 'remember-append-to-file)
;;;###autoload
(defun remember-region (&optional beg end)
"Remember the data from BEG to END.