removing debug

This commit is contained in:
JT Smith 2004-03-07 04:51:18 +00:00
parent 5fc02528a5
commit 66e1e0b427

View file

@ -409,10 +409,7 @@ while (my $data = $sth->hashRef) {
my $id = undef;
next if ($data->{databaseLinkId} > 0);
foreach my $dsn (keys %dblink) {
print $dsn."\n";
print $dblink{$dsn}{user}."\n";
if ($dsn eq $data->{DSN} ){ #&& $dblink{$dsn}{user} eq $data->{username}) {
print "got here";
if ($dsn eq $data->{DSN} && $dblink{$dsn}{user} eq $data->{username}) {
$id = $dblink{$dsn}{id};
last;
}