Mercurial > emacs

diff lisp/gnus/nnimap.el @ 110679:400dd9dfdb7b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Give up on using gnutls-cli for starttls.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Fri, 01 Oct 2010 12:56:44 +0000
parents 3b9bd3888ee9
children 42815c76b976
line wrap: on
line diff
--- a/lisp/gnus/nnimap.el	Fri Oct 01 05:25:21 2010 -0700
+++ b/lisp/gnus/nnimap.el	Fri Oct 01 12:56:44 2010 +0000
@@ -404,7 +404,11 @@
     (unless (consp programs)
       (setq programs (list programs)))
     (dolist (program programs)
-      (push (concat program " " "%s") result))
+      (when (assoc (car (split-string program)) tls-starttls-switches)
+	(push (if (not (string-match "%s" program))
+		  (concat program " " "%s")
+		program)
+	      result)))
     (nreverse result)))
 
 (defun nnimap-find-parameter (parameter elems)