remember.el: Add additional items to some defcustom options

2 files changed, 12 insertions, 5 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 43656726e3..6ded079f8a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,12 @@
 	* vc.el (vc-annotate): Fix omission bug:
 	Specify value for vc-sentinel-movepoint.
 
+2007-10-30  Michael Olson  <[email protected]>
+
+	* 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  <[email protected]>
 
 	* doc-view.el: Remove cl-dependency.
diff --git a/lisp/textmodes/remember.el b/lisp/textmodes/remember.el
index ac9931ff32..a55992dd7d 100644
--- a/lisp/textmodes/remember.el
+++ b/lisp/textmodes/remember.el
@@ -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.