[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r105377: (starttls-available-p): Rena
From: |
Lars Magne Ingebrigtsen |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r105377: (starttls-available-p): Renamed from `starttls-any-program-available' and changed return convention. |
Date: |
Tue, 02 Aug 2011 15:30:46 +0200 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 105377
committer: Lars Magne Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Tue 2011-08-02 15:30:46 +0200
message:
(starttls-available-p): Renamed from `starttls-any-program-available' and
changed return convention.
modified:
lisp/gnus/ChangeLog
lisp/gnus/starttls.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2011-07-31 22:15:44 +0000
+++ b/lisp/gnus/ChangeLog 2011-08-02 13:30:46 +0000
@@ -1,3 +1,8 @@
+2011-08-02 Lars Magne Ingebrigtsen <address@hidden>
+
+ * starttls.el (starttls-available-p): Renamed from
+ `starttls-any-program-available' and changed return convention.
+
2011-07-31 Lars Ingebrigtsen <address@hidden>
* nnmaildir.el (nnmaildir-request-accept-article): Don't call
=== modified file 'lisp/gnus/starttls.el'
--- a/lisp/gnus/starttls.el 2011-01-25 04:08:28 +0000
+++ b/lisp/gnus/starttls.el 2011-08-02 13:30:46 +0000
@@ -295,18 +295,11 @@
(starttls-set-process-query-on-exit-flag process nil)
process)))
-(defun starttls-any-program-available ()
- (let ((program (if starttls-use-gnutls
- starttls-gnutls-program
- starttls-program)))
- (condition-case ()
- (progn
- (call-process program)
- program)
- (error (progn
- (message "No STARTTLS program was available (tried '%s')"
- program)
- nil)))))
+(defun starttls-available-p ()
+ "Say whether the STARTTLS programs are available."
+ (executable-find (if starttls-use-gnutls
+ starttls-gnutls-program
+ starttls-program)))
(provide 'starttls)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r105377: (starttls-available-p): Renamed from `starttls-any-program-available' and changed return convention.,
Lars Magne Ingebrigtsen <=