Fix some warnings

[ypp-sc-tools.db-live.git] / yarrg / web / check_routestring

diff --git a/yarrg/web/check_routestring b/yarrg/web/check_routestring
index 2cbe719cf4eec1afa16860f947da2b5044ee1490..e66cbfbfd35e855ef3a514806cf693426ceae24b 100755 (executable)
--- a/yarrg/web/check_routestring
+++ b/yarrg/web/check_routestring
@@ -89,7 +89,7 @@ foreach my $each (split m#[/|,]#, $string) {
        push @results, $results->[0];
 };
 
-$dbh->disconnect();
+$dbh->rollback();
 
 return  $emsg,
        (join ' | ', map { $_->[2] } @results),