master 6df8900: Make gnus-mailing-list-archive recognize https

[Filipp Gunbin]

branch: master
commit 6df8900af625f5375e6970eaf86d5d296f15022a
Author: Filipp Gunbin <address@hidden>
Commit: Filipp Gunbin <address@hidden>

    Make gnus-mailing-list-archive recognize https
    
    * /lisp/gnus/gnus-ml.el (gnus-mailing-list-archive): Accept https in
    regexp.
---
 lisp/gnus/gnus-ml.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/gnus/gnus-ml.el b/lisp/gnus/gnus-ml.el
index 488c01c..d68d077 100644
--- a/lisp/gnus/gnus-ml.el
+++ b/lisp/gnus/gnus-ml.el
@@ -150,7 +150,7 @@ If FORCE is non-nil, replace the old ones."
         (with-current-buffer gnus-original-article-buffer
           (gnus-fetch-field "list-archive"))))
     (cond (list-archive
-          (if (string-match "<\\(http:[^>]*\\)>" list-archive)
+          (if (string-match "<\\(https?:[^>]*\\)>" list-archive)
               (browse-url (match-string 1 list-archive))
             (browse-url list-archive)))
          (t (gnus-message 1 "no list-archive in this group")))))