package HotSaNICmod::common; sub version { ($VERSION = '$Revision: 1.2 $') =~ s/.*(\d+\.\d+).*/$1/; return "common.pm $VERSION"; } sub configure { foreach (@_) { ($var,$value)=HotSaNICparser::parse_line($_); if ($var eq "APCACCESS") { ($MODARGS{"APCACCESS"})=$value; } } return %MODARGS } 1; WebSVN - hotsanic - Blame - Rev 31 - /trunk/modules/apcusv/platform/common.pm

hotsanic

Subversion Repositories:

[/] [trunk/] [modules/] [apcusv/] [platform/] [common.pm] - Blame information for rev 31

Line No.	Rev	Author	Line