From 2fb0b7ac1adacec45fd50f7aa7de5ea57fda4d19 Mon Sep 17 00:00:00 2001 From: Dave Abrahams Date: Fri, 31 Aug 2012 20:26:19 -0700 Subject: [PATCH] Document result value of nnimap-change-group --- lisp/ChangeLog | 1 + lisp/nnimap.el | 10 +++++++--- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 77baac15b..900b18aa9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -6,6 +6,7 @@ Change (random t) to (random), now that the latter is more random. 2012-08-31 Dave Abrahams + * nnimap.el (nnimap-change-group): Document result value * auth-source.el (auth-sources): Fix macos keychain access. diff --git a/lisp/nnimap.el b/lisp/nnimap.el index 970e6b464..9b460f326 100644 --- a/lisp/nnimap.el +++ b/lisp/nnimap.el @@ -1683,10 +1683,14 @@ textual parts.") nil t)))))) (defun nnimap-change-group (group &optional server no-reconnect read-only) - "Change group to GROUP. + "Change group to GROUP if non-nil. If SERVER is set, check that server is connected, otherwise retry -to reconnect, unless NO-RECONNECT is set to t. -if READ-ONLY is set, send EXAMINE rather than SELECT to the server." +to reconnect, unless NO-RECONNECT is set to t. Return nil if +unsuccessful in connecting. +If GROUP is nil, return t. +If READ-ONLY is set, send EXAMINE rather than SELECT to the server. +Return the server's response to the SELECT or EXAMINE command. +" (let ((open-result t)) (when (and server (not (nnimap-server-opened server))) -- 2.25.1