[Templates-cvs] cvs commit: Template2/t fileline.t
cvs@template-toolkit.org
cvs@template-toolkit.org
cvs 06/01/30 15:28:56
Modified: t fileline.t
Log:
* added test for pre-chomp bug
Revision Changes Path
1.5 +12 -1 Template2/t/fileline.t
Index: fileline.t
===================================================================
RCS file: /template-toolkit/Template2/t/fileline.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- fileline.t 2006/01/05 10:13:51 1.4
+++ fileline.t 2006/01/30 15:28:55 1.5
@@ -12,7 +12,7 @@
# This is free software; you can redistribute it and/or modify it
# under the same terms as Perl itself.
#
-# $Id: fileline.t,v 1.4 2006/01/05 10:13:51 abw Exp $
+# $Id: fileline.t,v 1.5 2006/01/30 15:28:55 abw Exp $
#
#========================================================================
@@ -94,3 +94,14 @@
file: (eval 10)
line: 10
warn: Argument "" isn't numeric in addition (+)
+
+-- test --
+[% TRY;
+ INCLUDE chomp;
+ CATCH;
+ error;
+ END
+%]
+-- expect --
+file error - parse error - chomp line 6: unexpected token (END)
+ [% END %]