fix show/hide disabled link interaction w/pager

diff --git a/httemplate/browse/part_pkg.cgi b/httemplate/browse/part_pkg.cgi
index 41d8635..b67a5e5 100755 (executable)
--- a/httemplate/browse/part_pkg.cgi
+++ b/httemplate/browse/part_pkg.cgi
@@ -53,11 +53,14 @@ my $posttotal;
 if ( $cgi->param('showdisabled') ) {
   $cgi->param('showdisabled', 0);
   $posttotal = '( <a href="'. $cgi->self_url. '">hide disabled packages</a> )';
 if ( $cgi->param('showdisabled') ) {
   $cgi->param('showdisabled', 0);
   $posttotal = '( <a href="'. $cgi->self_url. '">hide disabled packages</a> )';

+  $cgi->param('showdisabled', 1);

 } else {
   $cgi->param('showdisabled', 1);
   $posttotal = '( <a href="'. $cgi->self_url. '">show disabled packages</a> )';
 } else {
   $cgi->param('showdisabled', 1);
   $posttotal = '( <a href="'. $cgi->self_url. '">show disabled packages</a> )';

+  $cgi->param('showdisabled', 0);

 }
 
 }
 

+

 # ------
 
 my $link = [ $p.'edit/part_pkg.cgi?', 'pkgpart' ];
 # ------
 
 my $link = [ $p.'edit/part_pkg.cgi?', 'pkgpart' ];


@@ -68,7 +71,8 @@ my $align = 'rll';
 my @links = ( $link, $link, '' );
 my @style = ( '', '', '' );
 
 my @links = ( $link, $link, '' );
 my @style = ( '', '', '' );
 

-unless ( $cgi->param('showdisabled') ) { #its been reversed already
+#unless ( $cgi->param('showdisabled') ) { #its been reversed already
+if ( $cgi->param('showdisabled') ) { #its been reversed already

   push @header, 'Status';
   push @fields, sub { shift->disabled
                         ? '<FONT COLOR="#FF0000">DISABLED</FONT>'
   push @header, 'Status';
   push @fields, sub { shift->disabled
                         ? '<FONT COLOR="#FF0000">DISABLED</FONT>'