CVS Update: gleipnir

[Dan Brosemer <odin@cleannorth.org>]

Log Message:
-----------
Tell the template when to hide the next or previous arrows.

Modified Files:
--------------
    gleipnir/perllib/Gleipnir:
        Page.pm

Revision Data
-------------
Index: Page.pm
===================================================================
RCS file: /cvs/gleipnir/perllib/Gleipnir/Page.pm,v
retrieving revision 1.19
retrieving revision 1.20
diff -Lperllib/Gleipnir/Page.pm -Lperllib/Gleipnir/Page.pm -u -r1.19 -r1.20
--- perllib/Gleipnir/Page.pm
+++ perllib/Gleipnir/Page.pm
@@ -348,8 +348,8 @@
 	my $prevpage = ( $cpage == 0 ) ? $cpage : ( $cpage - 1 );
 
 	$template->param( nextpage => $nextpage, prevpage => $prevpage, outer => $outer, none => ($nextpage == 0 and $prevpage == 0) );
-
-	$template->param( { url => "$url", args => \@args, lastpage => int( $items / $perpage ), firstpage => 0, pageinfo => \@pageinfo } );
+	$template->param( url => $url, args => \@args, lastpage => int( $items / $perpage ), firstpage => 0, pageinfo => \@pageinfo );
+	$template->param( nonext => ($cpage == $nextpage), noprev => ($cpage == $prevpage) );
 	warn "$url\n";
 	return ( $template->output, $cpage * $perpage, $perpage );
 	}