Index: openacs-4/packages/new-portal/www/admin/portal-show.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/admin/portal-show.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/new-portal/www/admin/portal-show.tcl 11 Apr 2002 20:17:53 -0000 1.3 +++ openacs-4/packages/new-portal/www/admin/portal-show.tcl 12 Apr 2002 04:12:18 -0000 1.4 @@ -24,10 +24,11 @@ @cvs-id $Id$ } { portal_id:naturalnum,notnull + {page_num 0} } +set name "[portal::get_name $portal_id]" +set html "[portal::navbar -portal_id $portal_id] [portal::render -page_num $page_num $portal_id]" -set html "[portal::navbar -portal_id $portal_id] [portal::render $portal_id]" -