Update of /cvsroot/sandweb/sandweb/lib/SandWeb
In directory usw-pr-cvs1:/tmp/cvs-serv22677/lib/SandWeb
Modified Files:
Browse.pm
Log Message:
removing last vestages of HTML::Template from SandWeb::Browse
Index: Browse.pm
===================================================================
RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/Browse.pm,v
retrieving revision 1.65
retrieving revision 1.66
diff -U2 -r1.65 -r1.66
--- Browse.pm 25 Feb 2002 22:02:00 -0000 1.65
+++ Browse.pm 25 Feb 2002 22:10:23 -0000 1.66
@@ -9,5 +9,4 @@
use SandWeb::File;
-use HTML::Template;
sub new {
@@ -238,11 +237,6 @@
}
- my $content = HTML::Template->new( filename => "$template_dir/current_location.html" );
-
- $content->param(
- LOCATION_LOOP => \@loop_data,
- );
-
- return $content->output();
+ my @content = ( 'LOCATION_LOOP', \@loop_data );
+ return @content;
}
|