(gnus-subscribe-newsgroup): Notify the backend.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5409d3e..9aa553c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2010-12-16  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-start.el (gnus-subscribe-newsgroup): Notify the backend.
+
        * gnus-group.el (gnus-group-kill-group): Notify the backend that the
        group has been killed.
        (gnus-group-yank-group): Ditto.

diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el
index d9e4327..4c475ae 100644 (file)
--- a/lisp/gnus-start.el
+++ b/lisp/gnus-start.el
@@ -645,6 +645,7 @@ the first newsgroup."
     (gnus-group-change-level
      newsgroup gnus-level-default-subscribed
      gnus-level-killed (gnus-group-entry (or next "dummy.group")))
+    (gnus-request-update-group-status group 'subscribe)
     (gnus-message 5 "Subscribe newsgroup: %s" newsgroup)
     (run-hook-with-args 'gnus-subscribe-newsgroup-hooks newsgroup)
     t))