diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 60986010df8..0ddf95c3a0d 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,11 @@ 2010-09-25 Lars Magne Ingebrigtsen + * gnus.el (gnus-local-domain): Put gnus-local-domain back again, since + apparently third-party libraries depend on it. + + * nnimap.el (nnimap-open-connection): Wait for the response to STARTTLS + before starting negotiation. + * gnus-art.el (gnus-treat-from-gravatar): Change default to nil for privacy reasons. (gnus-treat-mail-gravatar): Ditto. diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el index 2a5533db079..c3bf47b9533 100644 --- a/lisp/gnus/gnus.el +++ b/lisp/gnus/gnus.el @@ -1428,6 +1428,15 @@ you could set this variable: "Default default new newsgroups the first time Gnus is run. Should be set in paths.el, and shouldn't be touched by the user.") +(defcustom gnus-local-domain nil + "Local domain name without a host name. +The DOMAINNAME environment variable is used instead if it is defined. +If the function `system-name' returns the full Internet name, there is +no need to set this variable." + :group 'gnus-message + :type '(choice (const :tag "default" nil) + string)) + (defvar gnus-local-organization nil "String with a description of what organization (if any) the user belongs to. Obsolete variable; use `message-user-organization' instead.") diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index 16a43423bfb..000855db8da 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -310,7 +310,7 @@ not done by default on servers that doesn't support that command.") (gnus-set-process-query-on-exit-flag (nnimap-process nnimap-object) nil) (when (setq connection-result (nnimap-wait-for-connection)) (when (eq nnimap-stream 'starttls) - (nnimap-send-command "STARTTLS") + (nnimap-command "STARTTLS") (starttls-negotiate (nnimap-process nnimap-object))) (unless (equal connection-result "PREAUTH") (if (not (setq credentials