Test for unquoting, but it doesn't work yet.

diff --git a/Makefile.am b/Makefile.am
index 28d49047682248372312fc79f170a868fb6b016e..1f87ac26850ed0d402805acd2b2d4b36335547f8 100644 (file)
--- a/Makefile.am
+++ b/Makefile.am
@@ -55,6 +55,7 @@ TESTS = test/ali/test-ali test/anno/test-anno \
        test/format/test-localmbox test/format/test-myname \
        test/format/test-myhost test/format/test-mymbox \
        test/format/test-rightjustify \
+       test/format/test-unquote \
        test/forw/test-forw-digest test/forw/test-forw-format \
        test/inc/test-deb359167 test/inc/test-eom-align \
        test/inc/test-inc-scanout test/inc/test-msgchk \

diff --git a/test/format/test-unquote b/test/format/test-unquote
new file mode 100755 (executable)
index 0000000..0eb239b
--- /dev/null
+++ b/test/format/test-unquote
@@ -0,0 +1,24 @@
+#!/bin/sh
+#
+# Test that the unquote function works properly.
+#
+
+if test -z "${MH_OBJ_DIR}"; then
+    srcdir=`dirname "$0"`/../..
+    MH_OBJ_DIR=`cd "$srcdir" && pwd`; export MH_OBJ_DIR
+fi
+
+. "$MH_OBJ_DIR/test/common.sh"
+
+setup_test
+
+#
+# Test various unquoting scenarios
+#
+
+name='"Mr. Foo Bar"'
+
+run_test "fmttest -raw -format %(unquote{text}) $name" \
+               'Mr. Foo Bar'
+
+exit ${failed:-0}