[Emacs-diffs] master 2c6d035 4/5: [Gnus] Make `M-g' in the group buffer work again

[Katsumi Yamaoka]

branch: master
commit 2c6d035968e865d70512086c310f0584b1d6eadc
Author: Vincent Bernat <address@hidden>
Commit: Katsumi Yamaoka <address@hidden>

    [Gnus] Make `M-g' in the group buffer work again
    
    * gnus-int.el (gnus-request-group-scan): Use the correct function name.
    * nnimap.el (nnimap-request-group-scan): Fix the function name.
---
 lisp/gnus/ChangeLog   |    6 ++++++
 lisp/gnus/gnus-int.el |    2 +-
 lisp/gnus/nnimap.el   |    2 +-
 3 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index e373581..0de7af4 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,9 @@
+2015-02-05  Vincent Bernat  <address@hidden>  (tiny change)
+
+       * nnimap.el (nnimap-request-group-scan): Fix the function name.
+
+       * gnus-int.el (gnus-request-group-scan): Use the correct function name.
+
 2015-02-05  Lars Ingebrigtsen  <address@hidden>
 
        * gnus-sum.el (gnus-select-newsgroup): Pass the group info along so
diff --git a/lisp/gnus/gnus-int.el b/lisp/gnus/gnus-int.el
index dd938ce..4e870bb 100644
--- a/lisp/gnus/gnus-int.el
+++ b/lisp/gnus/gnus-int.el
@@ -442,7 +442,7 @@ If it is down, start it up (again)."
 (defun gnus-request-group-scan (group info)
   "Request that GROUP get a complete rescan."
   (let ((gnus-command-method (gnus-find-method-for-group group))
-       (func 'request-group-description))
+       (func 'request-group-scan))
     (when (gnus-check-backend-function func group)
       (funcall (gnus-get-function gnus-command-method func)
               (gnus-group-real-name group) (nth 1 gnus-command-method) info))))
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index e619c0f..cdbc2a6 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -820,7 +820,7 @@ textual parts.")
                        group))
        t))))
 
-(deffoo nnimap-request-scan-group (group &optional server info)
+(deffoo nnimap-request-group-scan (group &optional server info)
   (setq group (nnimap-decode-gnus-group group))
   (let (marks high low)
     (with-current-buffer (nnimap-buffer)