/[Redis.pre-github]/lib/Redis.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/Redis.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 54 by dpavlin, Tue Mar 24 22:51:53 2009 UTC revision 55 by dpavlin, Tue Mar 24 23:43:24 2009 UTC
# Line 83  sub AUTOLOAD { Line 83  sub AUTOLOAD {
83    
84          if ( defined $bulk_command->{$command} ) {          if ( defined $bulk_command->{$command} ) {
85                  my $value = pop;                  my $value = pop;
86                    $value = '' if ! defined $value;
87                  $send                  $send
88                          = uc($command)                          = uc($command)
89                          . ' '                          . ' '
90                          . join(' ', @_)                          . join(' ', @_)
91                          . ' '                          . ' '
92                          . length($value)                          . length( $value )
93                          . "\r\n$value\r\n"                          . "\r\n$value\r\n"
94                          ;                          ;
95          } else {          } else {
# Line 121  sub AUTOLOAD { Line 122  sub AUTOLOAD {
122                  }                  }
123                  return $hash;                  return $hash;
124          } elsif ( $command eq 'keys' ) {          } elsif ( $command eq 'keys' ) {
125                  return split(/\s/, __sock_read_bulk($result));                  my $keys = __sock_read_bulk($result);
126                    return split(/\s/, $keys) if $keys;
127                    return;
128          }          }
129    
130          if ( $type eq '-' ) {          if ( $type eq '-' ) {

Legend:
Removed from v.54  
changed lines
  Added in v.55

  ViewVC Help
Powered by ViewVC 1.1.26