1998-09-10 00:58:33 +00:00
|
|
|
*** IniConf.pm.orig Fri Jul 11 09:39:59 1997
|
|
|
|
|
--- IniConf.pm Thu Sep 10 04:49:00 1998
|
1998-09-09 21:24:02 +00:00
|
|
|
***************
|
|
|
|
|
*** 203,209 ****
|
|
|
|
|
\$SIG{$sig} = 'IGNORE';
|
|
|
|
|
\$${class}::instance[$instnum]->ReadConfig;
|
|
|
|
|
if (\$oldhandler[$instnum] && \$oldhandler[$instnum] ne 'IGNORE') {
|
|
|
|
|
! eval '&$oldhandler[$instnum];';
|
|
|
|
|
}
|
|
|
|
|
\$SIG{$sig} = '$newhandler'
|
|
|
|
|
}
|
|
|
|
|
--- 203,209 ----
|
|
|
|
|
\$SIG{$sig} = 'IGNORE';
|
|
|
|
|
\$${class}::instance[$instnum]->ReadConfig;
|
|
|
|
|
if (\$oldhandler[$instnum] && \$oldhandler[$instnum] ne 'IGNORE') {
|
|
|
|
|
! eval '&\$oldhandler[$instnum];';
|
|
|
|
|
}
|
|
|
|
|
\$SIG{$sig} = '$newhandler'
|
|
|
|
|
}
|
1998-09-10 00:58:33 +00:00
|
|
|
***************
|
|
|
|
|
*** 346,352 ****
|
|
|
|
|
$self->{v}{$sect} = {};
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
! elsif (($parm, $val) = /\s*(\S+)\s*=\s*(.*)/) { # new parameter
|
|
|
|
|
$parm = lc($parm) if $nocase;
|
|
|
|
|
$self->{pCMT}{$sect}{$parm} = [@cmts];
|
|
|
|
|
@cmts = ( );
|
|
|
|
|
--- 346,352 ----
|
|
|
|
|
$self->{v}{$sect} = {};
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
! elsif (($parm, $val) = /\s*([^\s=]+)\s*=\s*(.*)/) { # new parameter
|
|
|
|
|
$parm = lc($parm) if $nocase;
|
|
|
|
|
$self->{pCMT}{$sect}{$parm} = [@cmts];
|
|
|
|
|
@cmts = ( );
|
