diff options
author | Robert Fenk <fenk@users.sourceforge.net> | 2001-05-17 17:12:55 +0000 |
---|---|---|
committer | Robert Fenk <fenk@users.sourceforge.net> | 2001-05-17 17:12:55 +0000 |
commit | fe159fb6741a5b3d6fe43f960261cc4a6b092f07 (patch) | |
tree | 44fce2a17654d37d337b9a864c404bcbbae6ecb8 /lisp/bbdb-gnus.el | |
parent | 63ec3c29c41e65c257b7e8d484a9cec3f0ec86b3 (diff) |
(bbdb/gnus-update-records-mode): Removed extra quote from the defcustom arguments.
(bbdb/gnus-update-records): Fixed documentation.
Diffstat (limited to 'lisp/bbdb-gnus.el')
-rw-r--r-- | lisp/bbdb-gnus.el | 17 |
1 files changed, 12 insertions, 5 deletions
diff --git a/lisp/bbdb-gnus.el b/lisp/bbdb-gnus.el index c457d03..dd0def6 100644 --- a/lisp/bbdb-gnus.el +++ b/lisp/bbdb-gnus.el @@ -107,9 +107,9 @@ the right net. The default is to annotate only new messages." :group 'bbdb-mua-specific-gnus :type '(choice (const :tag "annotating all messages" - 'annotating) + annotating) (const :tag "annotating no messages" - 'searching) + searching) (const :tag "annotating only new messages" (if (equal "" (gnus-summary-article-mark @@ -133,9 +133,16 @@ the user confirms the creation." (defun bbdb/gnus-update-records (&optional offer-to-create) "Return the records corresponding to the current GNUS message, creating or modifying it as necessary. A record will be created if -bbdb/news-auto-create-p is non-nil, or if OFFER-TO-CREATE is true and -the user confirms the creation." - (let ((bbdb-update-records-mode (or bbdb/gnus-update-records-mode +bbdb/news-auto-create-p is non-nil or if OFFER-TO-CREATE is true +and the user confirms the creation. + +The variable `bbdb/gnus-update-records-mode' controls what actions +are performed and it might override `bbdb-update-records-mode'. + +When hitting C-g once you will not be asked anymore for new people listed +in this message, but it will search only for existing records. When hitting +C-g again it will stop scanning." +(let ((bbdb-update-records-mode (or bbdb/gnus-update-records-mode bbdb-update-records-mode)) (bbdb/gnus-offer-to-create offer-to-create) ;; here we may distiguish between different type of messages |