Index: openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl,v
diff -u -r1.33 -r1.34
--- openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl	23 Jan 2002 00:15:43 -0000	1.33
+++ openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl	25 Jan 2002 00:23:40 -0000	1.34
@@ -260,6 +260,7 @@
 	{-hide_links_p  "f"}
 	{-user_id  ""}
         {-render_style "individual"}
+        {-page_num ""}
 	portal_id
     } {
 	render a page in a user's favorite style
@@ -270,7 +271,7 @@
 
 	set theme_id [get_user_theme $user_id]
 
-	return [portal::render -hide_links_p $hide_links_p -render_style $render_style $portal_id $theme_id]
+	return [portal::render -page_num $page_num -hide_links_p $hide_links_p -render_style $render_style $portal_id $theme_id ]
     }
 
     ad_proc -public get_user_type_id_from_type {