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.40 -r1.41
--- openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl	29 Mar 2002 19:14:45 -0000	1.40
+++ openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl	3 Apr 2002 00:33:12 -0000	1.41
@@ -273,6 +273,7 @@
     }
 	
     ad_proc -public render_page {
+	{-workspace_p ""}
 	{-hide_links_p  "f"}
 	{-user_id  ""}
         {-render_style "individual"}
@@ -285,7 +286,7 @@
 	    set user_id [ad_conn user_id]
 	}
 
-	set theme_id [get_user_theme $user_id]
+        set theme_id [get_user_theme $user_id]
 
 	return [portal::render -page_num $page_num -hide_links_p $hide_links_p -render_style $render_style $portal_id $theme_id ]
     }