mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-25 04:18:08 +01:00
test: Don't mess with user's HOME directory
This was too rude of a thing to do and could easily introduce problems, (as reported by Rob Browning whose environment required some HOME-specific things for shell startup). Instead, implement more focused changes to ensure that particular file in $HOME don't cause problems. Specifically, we fix known problems with ~/.signature and ~/.mailrc here.
This commit is contained in:
parent
484639453a
commit
fd16b37dc1
2 changed files with 25 additions and 5 deletions
|
@ -100,7 +100,9 @@ output=$(notmuch search 'subject:"testing message sent via SMTP"' | notmuch_sear
|
|||
test_expect_equal "$output" "thread:XXX 1974-03-29 [1/1] Notmuch Test Suite; Testing message sent via SMTP (inbox unread)"
|
||||
|
||||
test_begin_subtest "Reply within emacs"
|
||||
output=$(test_emacs '(notmuch-search "subject:\"testing message sent via SMTP\"") (notmuch-test-wait) (notmuch-search-reply-to-thread) (message (buffer-string))' 2>&1 | sed -e 's/^In-Reply-To: <.*>$/In-Reply-To: <XXX>/')
|
||||
# We sed away everything before the ^From in the output to avoid getting
|
||||
# confused by messages such as "Parsing /home/cworth/.mailrc... done"
|
||||
output=$(test_emacs '(notmuch-search "subject:\"testing message sent via SMTP\"") (notmuch-test-wait) (notmuch-search-reply-to-thread) (message (buffer-string))' 2>&1 | sed -ne '/^From/,$ p' | sed -e 's/^In-Reply-To: <.*>$/In-Reply-To: <XXX>/')
|
||||
test_expect_equal "$output" "From: Notmuch Test Suite <test_suite@notmuchmail.org>
|
||||
To: user@example.com
|
||||
Subject: Re: Testing message sent via SMTP
|
||||
|
|
|
@ -748,7 +748,6 @@ test_emacs () {
|
|||
cat <<EOF > run_emacs
|
||||
#!/bin/sh
|
||||
export PATH=$PATH
|
||||
export HOME=$HOME
|
||||
export NOTMUCH_CONFIG=$NOTMUCH_CONFIG
|
||||
|
||||
# We assume that the user will give a command-line argument only if
|
||||
|
@ -757,10 +756,30 @@ if [ \$# -gt 0 ]; then
|
|||
BATCH=--batch
|
||||
fi
|
||||
|
||||
emacs \$BATCH --no-site-file --directory ../../emacs --load notmuch.el \
|
||||
# Here's what we are using here:
|
||||
#
|
||||
# --batch: Quit after given commands and print all (messages)
|
||||
#
|
||||
# --no-init-file Don't load users ~/.emacs
|
||||
#
|
||||
# --no-site-file Don't load the site-wide startup stuff
|
||||
#
|
||||
# --directory Ensure that the local notmuch.el source is found
|
||||
#
|
||||
# --load Force loading of notmuch.el
|
||||
#
|
||||
# notmuch-test-wait Function for tests to use to wait for process completion
|
||||
#
|
||||
# message-signature Avoiding appending user's signature on messages
|
||||
#
|
||||
# set-frame-width 80 columns (avoids crazy 10-column default of --batch)
|
||||
|
||||
emacs \$BATCH --no-init-file --no-site-file \
|
||||
--directory ../../emacs --load notmuch.el \
|
||||
--eval "(defun notmuch-test-wait ()
|
||||
(while (get-buffer-process (current-buffer))
|
||||
(sleep-for 0.1)))" \
|
||||
--eval "(setq message-signature nil)" \
|
||||
--eval "(progn (set-frame-width (window-frame (get-buffer-window)) 80) \$@)"
|
||||
EOF
|
||||
chmod a+x ./run_emacs
|
||||
|
@ -869,8 +888,7 @@ rm -fr "$test" || {
|
|||
}
|
||||
|
||||
MAIL_DIR="${TMP_DIRECTORY}/mail"
|
||||
export HOME="${TMP_DIRECTORY}"
|
||||
export NOTMUCH_CONFIG="${HOME}/notmuch-config"
|
||||
export NOTMUCH_CONFIG="${TMP_DIRECTORY}/notmuch-config"
|
||||
|
||||
mkdir -p "${test}"
|
||||
mkdir -p "${MAIL_DIR}"
|
||||
|
|
Loading…
Reference in a new issue