[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/gnus-mock 35692d0 26/27: [gnus-mock] Add guard around s
From: |
Stefan Monnier |
Subject: |
[elpa] externals/gnus-mock 35692d0 26/27: [gnus-mock] Add guard around setting sendmail-program |
Date: |
Tue, 1 Dec 2020 10:11:42 -0500 (EST) |
branch: externals/gnus-mock
commit 35692d055fc83a2bf69665ae4278f1d9d5374b43
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>
[gnus-mock] Add guard around setting sendmail-program
* packages/gnus-mock/gnus-mock.el (gnus-mock-start): If
gnus-mock-sendmail-program is nil this code would error. Check first.
---
gnus-mock.el | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/gnus-mock.el b/gnus-mock.el
index bfa7f92..2c7604f 100644
--- a/gnus-mock.el
+++ b/gnus-mock.el
@@ -148,9 +148,6 @@ will start a mock Gnus session."
(prin1
`(setq gnus-home-directory ,mock-tmp-dir
init-file-user "mockturtle"
- sendmail-program
- ,(expand-file-name gnus-mock-sendmail-program
- mock-tmp-dir)
message-directory ,mock-tmp-dir
gnus-startup-file
,(expand-file-name ".newsrc" mock-tmp-dir)
@@ -162,6 +159,12 @@ will start a mock Gnus session."
,(expand-file-name "agent/" mock-tmp-dir)
gnus-directory
,(expand-file-name "News/" mock-tmp-dir)))
+ (when gnus-mock-sendmail-program
+ (princ "\n\n")
+ (prin1
+ `(setq sendmail-program
+ ,(expand-file-name gnus-mock-sendmail-program
+ mock-tmp-dir))))
(princ "\n\n")
;; Constant that can be checked if we need to know it's a mock
;; session.
- [elpa] externals/gnus-mock 9a13623 09/27: * gnus-mock.el: Make sure the 'data' subdir is included, (continued)
- [elpa] externals/gnus-mock 9a13623 09/27: * gnus-mock.el: Make sure the 'data' subdir is included, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 6beed29 07/27: packages/gnus-mock: Adjust copyright, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock d499861 04/27: Warn user if sendmail-program is unavailable, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 88de2e8 05/27: Maybe clean up dirs if the start process fails, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock a21fb5d 08/27: gnus-mock/data/.gnus.el: Fix comment, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 9cf301f 10/27: [gnus-mock] Zoop the condition-case up around the whole function, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 5431bdd 13/27: [gnus-mock] Fix two small bugs, bump version to 0.2.1, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 5564ed9 15/27: [gnus-mock] Don't completely swallow errors, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock de629d1 20/27: [gnus-mock] Add Paul Eggert's misencoded Gnus message, bump to 0.4.2, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock adbd14e 24/27: [gnus-mock] Improvement to previous patch, bump to 0.4.4, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 35692d0 26/27: [gnus-mock] Add guard around setting sendmail-program,
Stefan Monnier <=
- [elpa] externals/gnus-mock 9196a0f 11/27: [gnus-mock] Instead of inserting strings, use princ and prin1, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock ab39a00 12/27: [gnus-mock] Conditionally add nnimap server, bump to 0.2.0, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 0e8663e 14/27: [gnus-mock] Add Cyrillic group to the nnimap server, bump to 0.3.0, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 5c2d129 19/27: [gnus-mock] Create empty draft/queue directories in advance, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 91b3515 25/27: [gnus-mock] Munge maildir article filenames, bump to 0.4.5, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock d6b2564 18/27: Add nnml server with non-ASCII group name, bump to 0.4.1, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 5e503c7 21/27: [gnus-mock] Skeleton code for Gnus Mock interactive tests, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 4d53dcf 22/27: * gnus-mock.el: Remove redundant :group args, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 84c6b96 27/27: * .gitignore: New file, Stefan Monnier, 2020/12/01
- [elpa] externals/gnus-mock 7c1d7b1 16/27: [gnus-mock] Set a value of default-directory for child Emacs process, Stefan Monnier, 2020/12/01