From ef85a567fdb1c5d58223902316351d57f062897d Mon Sep 17 00:00:00 2001 From: "gerv%gerv.net" <> Date: Mon, 6 Jan 2003 15:53:11 +0000 Subject: Bug 187837 - Unify showing and editing of quips. Patch by gerv; r=timeless, a=justdave. --- quips.cgi | 19 +------------------ 1 file changed, 1 insertion(+), 18 deletions(-) (limited to 'quips.cgi') diff --git a/quips.cgi b/quips.cgi index f1783cd0a..d152234ac 100755 --- a/quips.cgi +++ b/quips.cgi @@ -45,23 +45,6 @@ if (Param('enablequips') eq "off") { my $action = $::FORM{'action'} || ""; if ($action eq "show") { - # Read in the entire quip list - SendSQL("SELECT quip FROM quips"); - - my @quips; - while (MoreSQLData()) { - my ($quip) = FetchSQLData(); - push(@quips, $quip); - } - - $vars->{'quips'} = \@quips; - $vars->{'show_quips'} = 1; -} - -if ($action eq "edit") { - if (!UserInGroup('admin')) { - ThrowUserError("quips_edit_denied"); - } # Read in the entire quip list SendSQL("SELECT quipid,userid,quip FROM quips"); @@ -83,7 +66,7 @@ if ($action eq "edit") { $vars->{'quipids'} = \@quipids; $vars->{'quips'} = $quips; $vars->{'users'} = $users; - $vars->{'edit_quips'} = 1; + $vars->{'show_quips'} = 1; } if ($action eq "add") { -- cgit v1.2.3-24-g4f1b