mirror of
https://git.FreeBSD.org/ports.git
synced 2024-10-31 21:57:12 +00:00
37 lines
1.1 KiB
Plaintext
37 lines
1.1 KiB
Plaintext
*** IniConf.pm.orig Fri Jul 11 09:39:59 1997
|
|
--- IniConf.pm Thu Sep 10 04:49:00 1998
|
|
***************
|
|
*** 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'
|
|
}
|
|
***************
|
|
*** 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 = ( );
|