From: Austin Clements <amdragon@MIT.EDU>
Date: Tue, 11 Mar 2014 22:19:53 +0000 (-0400)
Subject: test: Add broken test for Emacs boolean term escaping
X-Git-Tag: 0.18_rc0~69
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=716af7deb8d0692ec3c867a599e29da61027b808;p=notmuch.git

test: Add broken test for Emacs boolean term escaping

The current term escaper gets most of these right, but fails to escape
things containing Unicode "fancy quotes" or things containing
non-whitespace control characters.
---

diff --git a/test/T310-emacs.sh b/test/T310-emacs.sh
index 00ae96a8..6c18bbd7 100755
--- a/test/T310-emacs.sh
+++ b/test/T310-emacs.sh
@@ -953,4 +953,16 @@ test_emacs '(notmuch-search "subject:\"search race test\" -subject:two")
 output=$(notmuch search --output=messages 'tag:search-global-race-tag')
 test_expect_equal "$output" "id:$gen_msg_id_1"
 
+test_begin_subtest "Term escaping"
+test_subtest_known_broken
+output=$(test_emacs "(mapcar 'notmuch-escape-boolean-term (list
+	\"\"
+	\"abc\`~\!@#\$%^&*-=_+123\"
+	\"(abc\"
+	\")abc\"
+	\"\\\"abc\"
+	\"\x01xyz\"
+	\"\\x201cxyz\\x201d\"))")
+test_expect_equal "$output" '("\"\"" "abc`~!@#$%^&*-=_+123" "\"(abc\"" "\")abc\"" "\"\"\"abc\"" "\"'$'\x01''xyz\"" "\"“xyz”\"")'
+
 test_done