debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2025-01-08 17:51:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

test: auto load elisp tests file in test_emacs if available

Browse source 
This allows us to simplify shell part of tests written in elisp.
This commit is contained in:
Dmitry Kurochkin 2012-01-29 07:36:02 +04:00 committed by David Bremner
parent 022a281080
commit 754ddbb578
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
test/test-lib.sh
View file

@ -943,6 +943,12 @@ test_emacs () {
test -z "$missing_dependencies" || return test -z "$missing_dependencies" || return
if [ -z "$EMACS_SERVER" ]; then if [ -z "$EMACS_SERVER" ]; then
emacs_tests="$(basename $0).el"
if [ -f "$TEST_DIRECTORY/$emacs_tests" ]; then
load_emacs_tests="--eval '(load \"$emacs_tests\")'"
else
load_emacs_tests=
fi
server_name="notmuch-test-suite-$$" server_name="notmuch-test-suite-$$"
# start a detached session with an emacs server # start a detached session with an emacs server
# user's TERM is given to dtach which assumes a minimally # user's TERM is given to dtach which assumes a minimally
@ -950,6 +956,7 @@ test_emacs () {
TERM=$ORIGINAL_TERM dtach -n "$TEST_TMPDIR/emacs-dtach-socket.$$" \ TERM=$ORIGINAL_TERM dtach -n "$TEST_TMPDIR/emacs-dtach-socket.$$" \
sh -c "stty rows 24 cols 80; exec '$TMP_DIRECTORY/run_emacs' \ sh -c "stty rows 24 cols 80; exec '$TMP_DIRECTORY/run_emacs' \
--no-window-system \ --no-window-system \
$load_emacs_tests \
--eval '(setq server-name \"$server_name\")' \ --eval '(setq server-name \"$server_name\")' \
--eval '(server-start)' \ --eval '(server-start)' \
--eval '(orphan-watchdog $$)'" || return --eval '(orphan-watchdog $$)'" || return