[Templates-cvs] cvs commit: TT3/t compiler.t

[cvs@template-toolkit.org]

cvs         04/12/01 17:57:23

  Modified:    t        compiler.t
  Log:
  * added test to ensure scanner errors are propagated
  
  Revision  Changes    Path
  1.17      +7 -2      TT3/t/compiler.t
  
  Index: compiler.t
  ===================================================================
  RCS file: /template-toolkit/TT3/t/compiler.t,v
  retrieving revision 1.16
  retrieving revision 1.17
  diff -u -r1.16 -r1.17
  --- compiler.t	2004/12/01 11:06:30	1.16
  +++ compiler.t	2004/12/01 17:57:22	1.17
  @@ -9,7 +9,7 @@
   # This is free software; you can redistribute it and/or modify it
   # under the same terms as Perl itself.
   #
  -# $Id: compiler.t,v 1.16 2004/12/01 11:06:30 abw Exp $
  +# $Id: compiler.t,v 1.17 2004/12/01 17:57:22 abw Exp $
   #
   #========================================================================
   
  @@ -22,7 +22,7 @@
   use Template::Context;
   use Template::Resource::Variable;
   use Template::Resources;
  -use Template::Test tests => 21, import => ':all';
  +use Template::Test tests => 22, import => ':all';
   
   my $DEBUG = 
   $Template::Compiler::DEBUG =
  @@ -391,6 +391,11 @@
   before <image:baz.gif/> after
   -- expect --
   before <img src="baz.gif" width="20" height="30" /> after
  +
  +-- test broken directive --
  +[% foo bar 
  +-- expect --
  +<ERROR:line 1: no closing tag to match [%>
   
   __END__