Changeset 17690
- Timestamp:
- May 14, 2008, 4:50:03 PM (18 years ago)
- Location:
- trunk/Nebulous-Server
- Files:
-
- 2 edited
-
Changes (modified) (1 diff)
-
lib/Nebulous/Server.pm (modified) (6 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous-Server/Changes
r17687 r17690 2 2 3 3 0.10 4 - cleanup error handling in Nebulous::Server::stat_object()/find_objects() 4 5 - update Nebulous::Server::lock_object()/unlock_object() fault strings 5 6 - cleanup database error handling: make sure queries are ->finished before -
trunk/Nebulous-Server/lib/Nebulous/Server.pm
r17687 r17690 1 1 # Copyright (c) 2004-2008 Joshua Hoblitt 2 2 # 3 # $Id: Server.pm,v 1. 69 2008-05-15 00:36:41jhoblitt Exp $3 # $Id: Server.pm,v 1.70 2008-05-15 02:50:03 jhoblitt Exp $ 4 4 5 5 package Nebulous::Server; … … 860 860 unless ($pattern) { 861 861 $log->debug( "leaving" ); 862 return [];862 $log->logdie("no keys found"); 863 863 } 864 864 … … 880 880 $log->logdie("database error: $@") if $@; 881 881 882 $log-> debug( "no keys found") unless ( scalar @keys );882 $log->logdie("no keys found") unless ( scalar @keys ); 883 883 884 884 $log->debug( "leaving" ); … … 1058 1058 { 1059 1059 type => SCALAR, 1060 callbacks => { 1061 'is valid object key' => sub { $self->_is_valid_object_key($_[0]) }, 1062 }, 1060 1063 }, 1061 1064 ); … … 1066 1069 1067 1070 $log->debug("entered - @_"); 1068 1069 # does this key exist?1070 return unless ($self->_is_valid_object_key($key));1071 1071 1072 1072 # ignore volume … … 1079 1079 1080 1080 unless ($rows == 1) { 1081 $log-> debug("no storage object found");1081 $log->logdie("no storage object found"); 1082 1082 } 1083 1083
Note:
See TracChangeset
for help on using the changeset viewer.
