diff options
| author | Michael Tänzer <neo@nhng.de> | 2011-03-27 23:02:03 +0200 |
|---|---|---|
| committer | Michael Tänzer <neo@nhng.de> | 2011-03-27 23:02:03 +0200 |
| commit | 94391e3f41777169f9064dbf2d1a4fa8fa53784d (patch) | |
| tree | a099cf0b7dfa9b5db1b02232bed60e311f8ea7b2 | |
| parent | 3cdf9f382b70f4fb44f70e9e7acfb3775a24f906 (diff) | |
| download | cacert-devel-94391e3f41777169f9064dbf2d1a4fa8fa53784d.tar.gz cacert-devel-94391e3f41777169f9064dbf2d1a4fa8fa53784d.tar.xz cacert-devel-94391e3f41777169f9064dbf2d1a4fa8fa53784d.zip | |
#918: Weak keys in certificates
Don't rely on AutoCommit being on by default as stated in the perl docu
Signed-off-by: Michael Tänzer <neo@nhng.de>
| -rwxr-xr-x | scripts/DumpWeakCerts.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/DumpWeakCerts.pl b/scripts/DumpWeakCerts.pl index 54bd11a..e31d0be 100755 --- a/scripts/DumpWeakCerts.pl +++ b/scripts/DumpWeakCerts.pl @@ -14,7 +14,7 @@ my $cacert_db_password; # Read database access data from the config file eval `cat perl_mysql`; -my $dbh = DBI->connect($cacert_db_config, $cacert_db_user, $cacert_db_password, { RaiseError => 1 } ) || die "Cannot connect database: $DBI::errstr"; +my $dbh = DBI->connect($cacert_db_config, $cacert_db_user, $cacert_db_password, { RaiseError => 1, AutoCommit => 0 } ) || die "Cannot connect database: $DBI::errstr"; my $sth_certs; my $sth_userdata; |