Index: openacs-4/packages/wps-portlet/www/wps-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/wps-portlet/www/wps-portlet.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/wps-portlet/www/wps-portlet.tcl	1 Mar 2005 00:01:47 -0000	1.3
+++ openacs-4/packages/wps-portlet/www/wps-portlet.tcl	25 Aug 2008 15:54:21 -0000	1.4
@@ -29,7 +29,7 @@
     set presentation_id [lindex [array get {presentations:1} pres_item_id] 1]
 
 }
-
-
-
-
+set url [lindex [site_node::get_url_from_object_id -object_id $package_id] 0]
+set allow_member_create_p [parameter::get_from_package_key \
+                    -package_key "wps-portlet" \
+                    -parameter "AllowMembersToCreate"  -default 1]