aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJulien Danjou2010-09-23 07:59:12 +0000
committerKatsumi Yamaoka2010-09-23 07:59:12 +0000
commit7228f056909af1ffe9d8f611b959638bc9544d2f (patch)
treeb392a2f58bfde5f6d926e8f871455b048ca76341
parent7a16788be4efbd68b44db1507d963377c96b07ee (diff)
downloademacs-7228f056909af1ffe9d8f611b959638bc9544d2f.tar.gz
emacs-7228f056909af1ffe9d8f611b959638bc9544d2f.zip
gnus-group.el (gnus-group-update-hook): Add missing version.
gnus-group.el (gnus-group-highlight-line): Docstring fix. nnimap.el (nnimap-stream): Fix docstring.
-rw-r--r--lisp/gnus/gnus-group.el3
-rw-r--r--lisp/gnus/nnimap.el2
2 files changed, 3 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index 5aa64e8eed7..399eb2adf45 100644
--- a/lisp/gnus/gnus-group.el
+++ b/lisp/gnus/gnus-group.el
@@ -295,6 +295,7 @@ If you want to modify the group buffer, you can use this hook."
295(defcustom gnus-group-update-hook nil 295(defcustom gnus-group-update-hook nil
296 "Hook called when a group line is changed." 296 "Hook called when a group line is changed."
297 :group 'gnus-group-visual 297 :group 'gnus-group-visual
298 :version "24.1"
298 :type 'hook) 299 :type 'hook)
299 300
300(defcustom gnus-useful-groups 301(defcustom gnus-useful-groups
@@ -1673,7 +1674,7 @@ Some value are bound so the form can use them."
1673 1674
1674(defun gnus-group-highlight-line (group beg end) 1675(defun gnus-group-highlight-line (group beg end)
1675 "Highlight the current line according to `gnus-group-highlight'. 1676 "Highlight the current line according to `gnus-group-highlight'.
1676GROUP is current group, and the line to highlight starts at START 1677GROUP is current group, and the line to highlight starts at BEG
1677and ends at END." 1678and ends at END."
1678 (let ((face (cdar (gnus-group-update-eval-form 1679 (let ((face (cdar (gnus-group-update-eval-form
1679 group 1680 group
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 74deaf30e33..fcf501d8dd0 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -51,7 +51,7 @@ it will default to `imap'.")
51 51
52(defvoo nnimap-stream 'ssl 52(defvoo nnimap-stream 'ssl
53 "How nnimap will talk to the IMAP server. 53 "How nnimap will talk to the IMAP server.
54Values are `ssl' and `network'.") 54Values are `ssl', `network' or `shell'.")
55 55
56(defvoo nnimap-shell-program (if (boundp 'imap-shell-program) 56(defvoo nnimap-shell-program (if (boundp 'imap-shell-program)
57 (if (listp imap-shell-program) 57 (if (listp imap-shell-program)