Index: openacs.org-dev/packages/download/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/download/www/index.adp,v
diff -u -r1.2 -r1.3
--- openacs.org-dev/packages/download/www/index.adp	23 Jul 2002 10:44:04 -0000	1.2
+++ openacs.org-dev/packages/download/www/index.adp	28 Jan 2003 03:20:24 -0000	1.3
@@ -6,7 +6,7 @@
 <p>
 @description@
 
-<if @user_id@ eq 0>
+<if @user_id@ eq 0 and @registration_required_p@ ne 0>
     <p>You must<b>  
     <a href="/register/index?<%= [export_url_vars return_url] %>">register</a>
     </b>before you can download any files.
Index: openacs.org-dev/packages/download/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/download/www/index.tcl,v
diff -u -r1.1 -r1.2
--- openacs.org-dev/packages/download/www/index.tcl	9 Jul 2002 17:35:04 -0000	1.1
+++ openacs.org-dev/packages/download/www/index.tcl	28 Jan 2003 03:20:24 -0000	1.2
@@ -3,7 +3,7 @@
      Main download page.
      @author jbank@arsdigita.com [jbank@arsdigita.com]
      @creation-date Mon Dec 11 18:28:29 2000
-     @cvs-id
+     @cvs-id $Id$
 } {
     {archive_type_id ""}
     {orderby "archive_name"}
@@ -13,14 +13,23 @@
     title:onevalue
     description:onevalue
     help_text:onevalue
+    write_p:onevalue
+    admin_p:onevalue
+    master_admin_p:onevalue    
+    context:onevalue
 }
 
+set context [list]
 set return_url "[ad_conn url]?[ad_conn query]"
 set user_id [ad_verify_and_get_user_id]
-
+set package_id [ad_conn package_id]
+set registration_required_p [parameter::get -package_id $package_id \
+	                                    -parameter RegistrationRequiredP \
+					    -default 0]
 array set repository [download_repository_info]
 set repository_id $repository(repository_id)
 
+set master_admin_p [ad_permission_p [ad_conn package_id] admin]
 set admin_p [ad_permission_p $repository_id admin]
 set write_p [ad_permission_p $repository_id write]
 
@@ -171,4 +180,4 @@
 
 
 
-ad_return_template
\ No newline at end of file
+ad_return_template