From: Banana Date: Wed, 15 Feb 2012 15:06:29 +0000 (+0100) Subject: a better name X-Git-Tag: 2.1-alpha-2019-0-29~98 X-Git-Url: http://91.132.146.200/gitweb/?a=commitdiff_plain;h=32421bcb8f8c28ca0f263d2c2898103bc2747751;p=insipid.git a better name --- diff --git a/lib/Insipid/Main.pm b/lib/Insipid/Main.pm index 7724ef2..2a6189d 100755 --- a/lib/Insipid/Main.pm +++ b/lib/Insipid/Main.pm @@ -39,7 +39,7 @@ use Insipid::Sessions; use Insipid::Snapshots; use Insipid::Tags; use Insipid::Util; -use Insipid::Manage; +use Insipid::Stats; use CGI qw/:standard/; use CGI::Carp qw(fatalsToBrowser); @@ -472,8 +472,8 @@ BLET } # management - if (param('op') eq 'manage') { - show_management(); + if (param('op') eq 'stats') { + show_stats(); print ''; exit; } @@ -804,7 +804,7 @@ sub show_toolbar { if (logged_in() eq 1) { print "options | "; - print "manage | "; + print "stats | "; print "tags | "; print "import | "; print "export | "; diff --git a/lib/Insipid/Manage.pm b/lib/Insipid/Manage.pm deleted file mode 100644 index a7a5d2d..0000000 --- a/lib/Insipid/Manage.pm +++ /dev/null @@ -1,48 +0,0 @@ -#!/usr/bin/perl -# -# Copyright (C) 2012 jumpin.banana -# -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2 of the License, or -# (at your option) any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 -# USA -# - -package Insipid::Manage; - -use strict; -use warnings; - -use vars qw(@ISA @EXPORT @EXPORT_OK); -use CGI qw/:standard/; -use CGI::Carp qw(fatalsToBrowser); -use Insipid::Config; -use Insipid::Database; -use Insipid::Sessions; -use Insipid::Util; -require Exporter; - -use Data::Dumper; - -@ISA = qw(Exporter); - -@EXPORT = qw( -show_management -); - -sub show_management { - -} - -1; -__END__ diff --git a/lib/Insipid/Stats.pm b/lib/Insipid/Stats.pm new file mode 100644 index 0000000..5170cb1 --- /dev/null +++ b/lib/Insipid/Stats.pm @@ -0,0 +1,48 @@ +#!/usr/bin/perl +# +# Copyright (C) 2012 jumpin.banana +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 +# USA +# + +package Insipid::Stats; + +use strict; +use warnings; + +use vars qw(@ISA @EXPORT @EXPORT_OK); +use CGI qw/:standard/; +use CGI::Carp qw(fatalsToBrowser); +use Insipid::Config; +use Insipid::Database; +use Insipid::Sessions; +use Insipid::Util; +require Exporter; + +use Data::Dumper; + +@ISA = qw(Exporter); + +@EXPORT = qw( +show_stats +); + +sub show_stats { + +} + +1; +__END__