[PATCH] test/emacs: force *Messages* buffer to be writable
David Bremner
david at tethera.net
Sat Oct 25 00:49:59 PDT 2014
In emacs 24.4 the messages buffer starts being read-only, which kills
these tests. This seems to be the point of the variable
inihibit-read-only, which has existed at least since emacs 21.
---
test/T310-emacs.sh | 6 ++++--
test/T450-emacs-show.sh | 3 ++-
2 files changed, 6 insertions(+), 3 deletions(-)
diff --git a/test/T310-emacs.sh b/test/T310-emacs.sh
index ac966e5..af6b212 100755
--- a/test/T310-emacs.sh
+++ b/test/T310-emacs.sh
@@ -877,7 +877,8 @@ exit 1
EOF
chmod a+x notmuch_fail
test_emacs "(let ((notmuch-command \"$PWD/notmuch_fail\"))
- (with-current-buffer \"*Messages*\" (erase-buffer))
+ (with-current-buffer \"*Messages*\"
+ (let ((inhibit-read-only t)) (erase-buffer)))
(with-current-buffer (get-buffer-create \"*Notmuch errors*\")
(erase-buffer))
(notmuch-search \"tag:inbox\")
@@ -909,7 +910,8 @@ exit 0
EOF
chmod a+x notmuch_fail
test_emacs "(let ((notmuch-command \"$PWD/notmuch_fail\"))
- (with-current-buffer \"*Messages*\" (erase-buffer))
+ (with-current-buffer \"*Messages*\"
+ (let ((inhibit-read-only t)) (erase-buffer)))
(with-current-buffer (get-buffer-create \"*Notmuch errors*\")
(erase-buffer))
(notmuch-search \"tag:inbox\")
diff --git a/test/T450-emacs-show.sh b/test/T450-emacs-show.sh
index 2a3a535..bfcd5ef 100755
--- a/test/T450-emacs-show.sh
+++ b/test/T450-emacs-show.sh
@@ -173,7 +173,8 @@ exit 1
EOF
chmod a+x notmuch_fail
test_emacs "(let ((notmuch-command \"$PWD/notmuch_fail\"))
- (with-current-buffer \"*Messages*\" (erase-buffer))
+ (with-current-buffer \"*Messages*\"
+ (let ((inhibit-read-only t)) (erase-buffer)))
(condition-case err
(notmuch-show \"*\")
(error (message \"%s\" (second err))))
--
2.1.1
More information about the notmuch
mailing list