Changeset 197
- Timestamp:
- 04/15/09 03:19:08 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/lib/Vote/DB/common.pm
r194 r197 40 40 return $_[0]->{db} && $_[0]->{db}->ping 41 41 ? $_[0]->{db} 42 : $_[0]->_newdb($self->{dbstring}); 42 : ($self->{db} = $_[0]->_newdb($self->{dbstring})); 43 } 44 45 sub commit { 46 my ($self) = @_; 47 $self->{db} or return; 48 # If EPOLL_NO_COMMIT is true, we never commit, use for test 49 if ($ENV{EPOLL_NO_COMMIT}) { return 1 } 50 $self->{db}->commit; 51 } 52 53 sub rollback { 54 my ($self) = @_; 55 $self->{db} or return; 56 $self->{db}->rollback; 43 57 } 44 58
Note: See TracChangeset
for help on using the changeset viewer.