X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FUID.pm;h=83b652b0f7acf641222a1f1b3a574f7240e1752f;hp=3d893ee2fcd7ad989b0c5486300f87c490da76c5;hb=929f432c766bbe3bdeed5b80818a12ddf6ec6339;hpb=2041a9143fac20b79ead4a1ae01224dedf5b27c2 diff --git a/FS/FS/UID.pm b/FS/FS/UID.pm index 3d893ee2f..83b652b0f 100644 --- a/FS/FS/UID.pm +++ b/FS/FS/UID.pm @@ -98,7 +98,7 @@ sub forksuidsetup { } sub myconnect { - $dbh = DBI->connect( getsecrets, {'AutoCommit' => 0, 'ChopBlanks' => 1, } ) + DBI->connect( getsecrets, {'AutoCommit' => 0, 'ChopBlanks' => 1, } ) or die "DBI->connect error: $DBI::errstr\n"; } @@ -262,7 +262,7 @@ sub getsecrets { $secrets = $1; die "Illegal mapsecrets line for user?!" unless $secrets; ($datasrc, $db_user, $db_pass) = $conf->config($secrets) - or die "Can't get secrets: $!"; + or die "Can't get secrets: $secrets: $!\n"; $FS::Conf::default_dir = $conf_dir. "/conf.$datasrc"; undef $driver_name; ($datasrc, $db_user, $db_pass);