Commit 516aa569 authored by Gnus developers's avatar Gnus developers Committed by Katsumi Yamaoka

proto-stream.el (proto-stream-open-tls): Return nil if we don't get any stream.

gnus.texi (Server Commands): Point to the rest of the server commands.
parent b31b26b4
2010-12-06 Tassilo Horn <tassilo@member.fsf.org>
* gnus.texi (Server Commands): Point to the rest of the server
commands.
2010-12-04 Lars Magne Ingebrigtsen <larsi@gnus.org>
* gnus.texi (Paging the Article): Note the reverse meanings of `C-u C-u
......
......@@ -13885,6 +13885,9 @@ hence getting a correct total article count.
@end table
Some more commands for closing, disabling, and re-opening servers are
listed in @ref{Unavailable Servers}.
@node Example Methods
@subsection Example Methods
2010-12-06 Lars Magne Ingebrigtsen <larsi@gnus.org>
* proto-stream.el (proto-stream-open-tls): Return nil if we don't get
any stream.
* shr.el (shr-tag-font): Colorize the region.
(shr-tag-body): Ditto.
(shr-tag-font): Actually let the styles be inherited instead of
......
......@@ -219,16 +219,18 @@ command to switch on STARTTLS otherwise."
'open-gnutls-stream
'open-tls-stream)
name buffer host service)))
;; If we're using tls.el, we have to delete the output from
;; openssl/gnutls-cli.
(unless (fboundp 'open-gnutls-stream)
(proto-stream-get-response
stream start (proto-stream-eoc parameters))
(goto-char (point-min))
(when (re-search-forward (proto-stream-eoc parameters) nil t)
(goto-char (match-beginning 0))
(delete-region (point-min) (line-beginning-position))))
(proto-stream-capability-open start stream parameters))))
(if (null stream)
nil
;; If we're using tls.el, we have to delete the output from
;; openssl/gnutls-cli.
(unless (fboundp 'open-gnutls-stream)
(proto-stream-get-response
stream start (proto-stream-eoc parameters))
(goto-char (point-min))
(when (re-search-forward (proto-stream-eoc parameters) nil t)
(goto-char (match-beginning 0))
(delete-region (point-min) (line-beginning-position))))
(proto-stream-capability-open start stream parameters)))))
(defun proto-stream-open-shell (name buffer host service parameters)
(proto-stream-capability-open
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment