[Templates-cvs] cvs commit: TT3/t/directive interpolate.t
cvs@template-toolkit.org
cvs@template-toolkit.org
Fri, 12 Nov 2004 18:47:45 +0000
cvs 04/11/12 18:47:45
Modified: t/directive interpolate.t
Log:
* removed old tests
Revision Changes Path
1.2 +1 -7 TT3/t/directive/interpolate.t
Index: interpolate.t
===================================================================
RCS file: /template-toolkit/TT3/t/directive/interpolate.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- interpolate.t 2004/11/12 18:42:21 1.1
+++ interpolate.t 2004/11/12 18:47:45 1.2
@@ -9,7 +9,7 @@
# This is free software; you can redistribute it and/or modify it
# under the same terms as Perl itself.
#
-# $Id: interpolate.t,v 1.1 2004/11/12 18:42:21 abw Exp $
+# $Id: interpolate.t,v 1.2 2004/11/12 18:47:45 abw Exp $
#
#========================================================================
@@ -94,12 +94,6 @@
is_text_expr( $body->[10], "\n", 'newline' );
is_text_expr( $body->[11], "\$bar\n", '$bar' );
-#is_text_expr( $body->[2], "\nhello\n",
-# 'hello' );
-#is_text_expr( $body->[3], "\nmore text\n",
-# 'more text' );
-#is_text_expr( $body->[4], " [% nothing %] [* nada *] <* zip *>\nthe end\n",
-# "trailing tags ignored" );
sub is_text_expr {
my ($expr, $text, $message) = @_;