[SAWA-devel] sawa/t/lib Tentacle.pm,1.1,1.2

[Kip H. <ki...@us...>]

Update of /cvsroot/sawa/sawa/t/lib
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv2934/t/lib

Modified Files:
	Tentacle.pm 
Log Message:
More updates. Test suite mow passes again

Index: Tentacle.pm
===================================================================
RCS file: /cvsroot/sawa/sawa/t/lib/Tentacle.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Tentacle.pm	24 Jan 2009 10:11:33 -0000	1.1
--- Tentacle.pm	24 Jan 2009 21:21:37 -0000	1.2
***************
*** 81,89 ****
      my $path = shift;
      unless ( $path and length $path ) {
-         carp "No file path.";
          return undef;
      }
      
!     warn "looking up path $path \n";
      if ( my $member = $self->zip_archive->memberNamed('static' . $path )) {
          return $member;
--- 81,88 ----
      my $path = shift;
      unless ( $path and length $path ) {
          return undef;
      }
      
!     # carp "looking up path $path \n";
      if ( my $member = $self->zip_archive->memberNamed('static' . $path )) {
          return $member;