diff options
-rwxr-xr-x | cgi-bin/index.cgi | 4 | ||||
-rw-r--r-- | lib/Fripost/Panel/Interface.pm (renamed from lib/FPanel/Interface.pm) | 4 | ||||
-rw-r--r-- | lib/Fripost/Panel/Login.pm (renamed from lib/FPanel/Login.pm) | 2 | ||||
-rwxr-xr-x | server.pl | 4 |
4 files changed, 7 insertions, 7 deletions
diff --git a/cgi-bin/index.cgi b/cgi-bin/index.cgi index 89290e8..5efa469 100755 --- a/cgi-bin/index.cgi +++ b/cgi-bin/index.cgi @@ -12,7 +12,7 @@ index.cgi - =cut use lib 'lib'; -use FPanel::Interface; +use Fripost::Panel::Interface; # TODO: Try out Fast CGI #use CGI::Fast(); @@ -25,7 +25,7 @@ use FPanel::Interface; my @config = 'default.in'; push @config, 'config.in' if -f 'config.in'; -my $cgi = FPanel::Interface->new( +my $cgi = Fripost::Panel::Interface->new( PARAMS => { cfg_file => [ @config ], format => 'equal' } ); $cgi->run(); diff --git a/lib/FPanel/Interface.pm b/lib/Fripost/Panel/Interface.pm index 053e1a2..b636861 100644 --- a/lib/FPanel/Interface.pm +++ b/lib/Fripost/Panel/Interface.pm @@ -1,4 +1,4 @@ -package FPanel::Interface; +package Fripost::Panel::Interface; use 5.010_000; use strict; @@ -11,9 +11,9 @@ Interface.pm - =cut +use parent 'Fripost::Panel::Login'; use Fripost::Schema; use Fripost::Password; -use parent 'FPanel::Login'; use HTML::Entities; diff --git a/lib/FPanel/Login.pm b/lib/Fripost/Panel/Login.pm index ab7bf36..8dcfd2b 100644 --- a/lib/FPanel/Login.pm +++ b/lib/Fripost/Panel/Login.pm @@ -1,4 +1,4 @@ -package FPanel::Login; +package Fripost::Panel::Login; use 5.010_000; use strict; @@ -6,12 +6,12 @@ use utf8; use MyServer; use lib 'lib'; -use FPanel::Interface; +use Fripost::Panel::Interface; my $server = MyServer->new(); $server->entry_points({ - '/cgi-bin' => 'FPanel::Interface' + '/cgi-bin' => 'Fripost::Panel::Interface' }); my @config = 'default.in'; |