When using the development version of Gnus, load the gnus-load file.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c115bba..f32b3b8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,8 @@
        * gnus.el (gnus-similar-server-opened): Refactor a bit and add
        comments.
        (gnus-methods-sloppily-equal): New function.
+       (gnus): When using the development version of Gnus, load the gnus-load
+       file.
 
        * gnus-start.el (gnus-get-unread-articles): Make sure that we call
        `gnus-open-server' on each method before trying to scan them etc.  This

diff --git a/lisp/gnus.el b/lisp/gnus.el
index a02c6be..222992e 100644 (file)
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -4437,6 +4437,10 @@ If ARG is non-nil and a positive number, Gnus will use that as the
 startup level.  If ARG is non-nil and not a positive number, Gnus will
 prompt the user for the name of an NNTP server to use."
   (interactive "P")
+  ;; When using the development version of Gnus, load the gnus-load
+  ;; file.
+  (unless (string-match "^Gnus" gnus-version)
+    (load "gnus-load"))
   (unless (byte-code-function-p (symbol-function 'gnus))
     (message "You should byte-compile Gnus")
     (sit-for 2))