[Templates-cvs] cvs commit: Template2/lib/Template Context.pm

[cvs@template-toolkit.org]

cvs         04/12/24 14:24:01

  Modified:    lib/Template Context.pm
  Log:
  * Changed $element to $component in Template::Context to fix callers bug,
    thanks to Andy Maas who identified the problem and found the solution:
    http://tt2.org/pipermail/templates/2004-December/007020.html
  
  Revision  Changes    Path
  2.92      +5 -5      Template2/lib/Template/Context.pm
  
  Index: Context.pm
  ===================================================================
  RCS file: /template-toolkit/Template2/lib/Template/Context.pm,v
  retrieving revision 2.91
  retrieving revision 2.92
  diff -u -r2.91 -r2.92
  --- Context.pm	2004/10/04 10:02:29	2.91
  +++ Context.pm	2004/12/24 14:24:01	2.92
  @@ -18,7 +18,7 @@
   #   modify it under the same terms as Perl itself.
   # 
   # REVISION
  -#   $Id: Context.pm,v 2.91 2004/10/04 10:02:29 abw Exp $
  +#   $Id: Context.pm,v 2.92 2004/12/24 14:24:01 abw Exp $
   #
   #============================================================================
   
  @@ -35,7 +35,7 @@
   use Template::Constants;
   use Template::Exception;
   
  -$VERSION = sprintf("%d.%02d", q$Revision: 2.91 $ =~ /(\d+)\.(\d+)/);
  +$VERSION = sprintf("%d.%02d", q$Revision: 2.92 $ =~ /(\d+)\.(\d+)/);
   $DEBUG_FORMAT = "\n## \$file line \$line : [% \$text %] ##\n";
   
   
  @@ -370,7 +370,7 @@
               # instead?
   
               pop(@{$element->{ callers }})
  -                if (UNIVERSAL::isa($element, 'Template::Document'));
  +                if (UNIVERSAL::isa($component, 'Template::Document'));
           }
           $stash->set('component', $component);
       };
  @@ -1554,8 +1554,8 @@
   
   =head1 VERSION
   
  -2.89, distributed as part of the
  -Template Toolkit version 2.13, released on 30 January 2004.
  +2.91, distributed as part of the
  +Template Toolkit version 2.14, released on 04 October 2004.
   
   =head1 COPYRIGHT