--- otvori_nove+db 2000/05/31 13:57:49 1.7 +++ otvori_nove+db 2000/07/13 08:04:42 1.8 @@ -262,7 +262,12 @@ close(NPASSWD); close(NALIAS); -undef $sth,$sth2; +$sth->finish; +undef $sth; +if (defined($sth2)) { + $sth2->finish; + undef $sth2; +} $dbh->disconnect; system "mv /etc/passwd passwd.orig" if (! $debug);