debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-25 04:18:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: Enable FCC (to a directory named "sent") by default.

Browse source 
Now that the FCC code is fixed to use the notmuch database path, we can
actually enable this by default, which should be highly useful for all
new users of notmuch.
This commit is contained in:
Carl Worth 2010-10-27 16:35:53 -07:00
parent 8b6f3e3f45
commit a3883a7e17
2 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
emacs/notmuch-maildir-fcc.el
View file

@ -22,7 +22,7 @@
(defvar notmuch-maildir-fcc-count 0) (defvar notmuch-maildir-fcc-count 0)
(defcustom notmuch-fcc-dirs nil (defcustom notmuch-fcc-dirs "sent"
"Determines the maildir directory to save outgoing mails in. "Determines the maildir directory to save outgoing mails in.
If set to non-nil, this will cause message mode to file your If set to non-nil, this will cause message mode to file your

6
test/emacs
View file

@ -57,6 +57,12 @@ output=$(notmuch search 'id:"123..456@example"' | notmuch_search_sanitize)
test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Message with .. in Message-Id (inbox search-add show-add)" test_expect_equal "$output" "thread:XXX 2001-01-05 [1/1] Notmuch Test Suite; Message with .. in Message-Id (inbox search-add show-add)"
test_begin_subtest "Sending a message via (fake) SMTP" test_begin_subtest "Sending a message via (fake) SMTP"
# Before we can send a message, we have to prepare the FCC maildir
mkdir -p mail/sent/cur
mkdir -p mail/sent/new
mkdir -p mail/sent/tmp
../smtp-dummy sent_message & ../smtp-dummy sent_message &
smtp_dummy_pid=$! smtp_dummy_pid=$!
test_emacs "(setq message-send-mail-function 'message-smtpmail-send-it) (setq smtpmail-smtp-server \"localhost\") (setq smtpmail-smtp-service \"25025\") (notmuch-hello) (notmuch-mua-mail) (message-goto-to) (insert \"user@example.com\") (message-goto-subject) (insert \"Testing message sent via SMTP\") (message-goto-body) (insert \"This is a test that messages are sent via SMTP\") (message-send-and-exit)" >/dev/null 2>&1 test_emacs "(setq message-send-mail-function 'message-smtpmail-send-it) (setq smtpmail-smtp-server \"localhost\") (setq smtpmail-smtp-service \"25025\") (notmuch-hello) (notmuch-mua-mail) (message-goto-to) (insert \"user@example.com\") (message-goto-subject) (insert \"Testing message sent via SMTP\") (message-goto-body) (insert \"This is a test that messages are sent via SMTP\") (message-send-and-exit)" >/dev/null 2>&1