Update of /cvsroot/http-webtest/HTTP-WebTest-Recorder/lib/HTTP/WebTest/Recorder
In directory sc8-pr-cvs1:/tmp/cvs-serv26724a/lib/HTTP/WebTest/Recorder
Modified Files:
Actions.pm
Log Message:
Implement css_action()
Index: Actions.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest-Recorder/lib/HTTP/WebTest/Recorder/Actions.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** Actions.pm 22 Apr 2003 22:17:38 -0000 1.9
--- Actions.pm 22 Apr 2003 22:57:10 -0000 1.10
***************
*** 22,25 ****
--- 22,33 ----
%EXPORT_TAGS = (all => [@EXPORT_OK]);
+ sub css_action {
+ my $controller = shift;
+
+ $controller->heap->{response}->header(Content_Type => 'text/css');
+
+ return 'render_template';
+ }
+
sub render_template_action {
my $controller = shift;
***************
*** 30,34 ****
if($template->process($view, $controller->heap, \$content)) {
! $controller->heap->{response}->header(Content_Type => 'text/html');
$controller->heap->{response}->content($content);
} elsif($template->error =~ /file error - .*: not found/) {
--- 38,43 ----
if($template->process($view, $controller->heap, \$content)) {
! $controller->heap->{response}->header(Content_Type => 'text/html')
! unless $controller->heap->{response}->header('Content-Type');
$controller->heap->{response}->content($content);
} elsif($template->error =~ /file error - .*: not found/) {
|