http-webtest-commits

[Ilya M. <m_...@us...>]

Update of /cvsroot/http-webtest/HTTP-WebTest-Recorder/lib/HTTP/WebTest/Recorder
In directory sc8-pr-cvs1:/tmp/cvs-serv23429/lib/HTTP/WebTest/Recorder

Modified Files:
	Actions.pm 
Log Message:
Support text view of content body


Index: Actions.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest-Recorder/lib/HTTP/WebTest/Recorder/Actions.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** Actions.pm	2 Feb 2003 00:02:05 -0000	1.3
--- Actions.pm	2 Feb 2003 17:27:41 -0000	1.4
***************
*** 49,57 ****
  
      my $num = $controller->cgi->param('num');
      my $test = $controller->recorder->tests->[$num];
  
!     $controller->raw_response(headers => [ 'Content-Type' =>
!                                            $test->response->content_type ],
!                               content => $test->response->content);
  }
  
--- 49,63 ----
  
      my $num = $controller->cgi->param('num');
+     my $view = $controller->cgi->param('view');
      my $test = $controller->recorder->tests->[$num];
  
!     if($view eq 'raw') {
!         $controller->raw_response(headers => [ 'Content-Type' =>
!                                                $test->response->content_type ],
!                                   content => $test->response->content);
!     } else {
!         return(default_action($controller),
!                content => $test->response->content);
!     }
  }