From c85cb874ede7d8caa6d0740e72f3f8d247668e45 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 19 Jul 2002 06:41:59 +0000 Subject: [PATCH] * pop3.el: Don't autoload "ssl". (pop3-open-ssl-stream-1): Require `ssl' before binding ssl-* vars. --- ChangeLog | 5 +++++ lisp/pop3.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 64e87b5..bd9dfea 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2002-07-19 Katsumi Yamaoka + + * lisp/pop3.el: Don't autoload "ssl". + (pop3-open-ssl-stream-1): Require `ssl' before binding ssl-* vars. + 2002-07-18 Katsumi Yamaoka * lisp/gnus-namazu.el (gnus-namazu/truncate-article-list): Remove diff --git a/lisp/pop3.el b/lisp/pop3.el index fb34cc2..78038c3 100644 --- a/lisp/pop3.el +++ b/lisp/pop3.el @@ -100,7 +100,6 @@ Nil means no, t means yes, not-nil-or-t means yet to be determined.") (defvar pop3-debug nil) (eval-and-compile - (autoload 'open-ssl-stream "ssl") (autoload 'starttls-open-stream "starttls") (autoload 'starttls-negotiate "starttls")) @@ -224,6 +223,7 @@ Argument PORT specifies connecting port." process))) (defun pop3-open-ssl-stream-1 (name buffer host service extra-arg) + (require 'ssl) (let* ((ssl-program-name pop3-ssl-program-name) (ssl-program-arguments -- 1.7.10.4