|
hotsanic |
Subversion Repositories: |
| Line No. | Rev | Author | Line |
|---|---|---|---|
| 1 | 10 | simandl | package HotSaNICmod::common; |
| 2 | |
||
| 3 | sub version { |
||
| 4 | ($VERSION = '$Revision: 1.2 $') =~ s/.*(\d+\.\d+).*/$1/; |
||
| 5 | return "common.pm $VERSION"; |
||
| 6 | } |
||
| 7 | |
||
| 8 | sub configure { |
||
| 9 | foreach (@_) { |
||
| 10 | ($var,$value)=HotSaNICparser::parse_line($_); |
||
| 11 | if ($var eq "APCACCESS") { ($MODARGS{"APCACCESS"})=$value; } |
||
| 12 | } |
||
| 13 | return %MODARGS |
||
| 14 | } |
||
| 15 | |
||
| 16 | 1; |
||
| 17 | |