Changeset 514
- Timestamp:
- 12/16/09 22:14:06 (2 years ago)
- Location:
- wiki-toolkit/trunk
- Files:
-
- 2 modified
-
Changes (modified) (1 diff)
-
lib/Wiki/Toolkit/Store/SQLite.pm (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
wiki-toolkit/trunk/Changes
r503 r514 2 2 Fix various POD errors and add POD testing (#45) 3 3 More recent changes tests (for #41) 4 Fix transaction handling in SQLite backend (#49) 4 5 5 6 0.77 24 December 2008 -
wiki-toolkit/trunk/lib/Wiki/Toolkit/Store/SQLite.pm
r477 r514 67 67 68 68 my $dbh = $self->{_dbh}; 69 $dbh-> {AutoCommit} = 0;69 $dbh->begin_work; 70 70 71 71 my $ok = eval { 72 $dbh->do("END TRANSACTION");73 $dbh->do("BEGIN TRANSACTION");74 72 $self->verify_checksum($node, $checksum) or return 0; 75 73 $self->write_node_post_locking( %args ); … … 78 76 my $error = $@; 79 77 $dbh->rollback; 80 $dbh->{AutoCommit} = 1;81 78 if ( $error =~ /database is locked/ 82 79 or $error =~ /DBI connect.+failed/ ) { … … 87 84 } else { 88 85 $dbh->commit; 89 $dbh->{AutoCommit} = 1;90 86 return $ok; 91 87 }
