[Openinteract-commits] CVS: SPOPS/SPOPS Tie.pm,1.18,1.19

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/SPOPS/SPOPS
In directory usw-pr-cvs1:/tmp/cvs-serv17465

Modified Files:
	Tie.pm 
Log Message:
don't try and fetch anything if given an empty key


Index: Tie.pm
===================================================================
RCS file: /cvsroot/openinteract/SPOPS/SPOPS/Tie.pm,v
retrieving revision 1.18
retrieving revision 1.19
diff -C2 -d -r1.18 -r1.19
*** Tie.pm	2001/10/12 21:00:26	1.18
--- Tie.pm	2001/10/15 00:00:53	1.19
***************
*** 94,97 ****
--- 94,98 ----
  sub FETCH {
      my ( $self, $key ) = @_;
+     return unless ( $key );
      my $cmp_key = lc $key;
      DEBUG() && _w( 3, " tie: Trying to retrieve value for ($key)\n" );