Changeset 1412

Timestamp:

Apr 21, 2009 1:27:53 PM (15 years ago)

Author:

gah

Message:

 

File:

• trunk/lang/tcl/tests/encode.test (modified) (1 diff)

trunk/lang/tcl/tests/encode.test

@@ -208 +208 @@
     set h "@@RP-ENC:zb64\nH4sIAAAAAAAAA8vIBACsKpPYAgAAAA=="
     list [catch {Rappture::encoding::decode -as z $h} msg] $msg
-} {0 {@@RP-ENC:zb64
-H4sIAAAAAAAAA8vIBACsKpPYAgAAAA==}}
-
+} {1 {:
+decode flags don't match the header
+}}
+        
 test decode-3.2.2b {Rappture::encoding::decode, -as -noheader, zb64 w/ string} {
     set h "@@RP-ENC:zb64\nH4sIAAAAAAAAA8vIBACsKpPYAgAAAA=="