X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FRotate.pm;h=71102eb1336e5c8960e3492d248065f6b4557b41;hp=eb8d17ebc8c386ea7f1cc746e9d410a0355dc4e6;hb=dc3ef05d90b1383b3dcc6b30720b614d1b160d07;hpb=6170d7a868e3fe5765600166e8cdad487cd6c103;ds=sidebyside

diff --git a/perl/Sesse/pr0n/Rotate.pm b/perl/Sesse/pr0n/Rotate.pm
index eb8d17e..71102eb 100644
--- a/perl/Sesse/pr0n/Rotate.pm
+++ b/perl/Sesse/pr0n/Rotate.pm
@@ -23,12 +23,13 @@ sub handler {
 
 	{
 		# Enable transactions and error raising temporarily
-		local $dbh->{AutoCommit} = 0;
 		local $dbh->{RaiseError} = 1;
 
 		my @params = $apr->param();
 		my $key;
 		for $key (@params) {
+			local $dbh->{AutoCommit} = 0;
+
 			# Rotation
 			if ($key =~ /^rot-(\d+)-(90|180|270)$/ && $apr->param($key) eq 'on') {
 				my ($id, $rotval) = ($1,$2);