Index: openacs.org-dev/packages/download/www/one-archive.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/download/www/one-archive.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/download/www/one-archive.tcl	9 Jul 2002 17:35:04 -0000	1.1.1.1
+++ openacs.org-dev/packages/download/www/one-archive.tcl	8 Oct 2002 15:47:05 -0000	1.1.1.2
@@ -4,14 +4,14 @@
 
      @author jbank@arsdigita.com [jbank@arsdigita.com]
      @creation-date Wed Dec 13 14:38:45 2000
-     @cvs-id
+     @cvs-id $Id$
 } {
     archive_id:integer,notnull
 }
 
-
 ad_require_permission $archive_id read
 
+set master_admin_p [ad_permission_p [ad_conn package_id] admin]
 set admin_p [ad_permission_p $archive_id admin]
 set write_p [ad_permission_p $archive_id write]
 
@@ -31,8 +31,12 @@
     return
 }
 
-set description [acs_messaging_format_as_html $description_type $description]
 
+
+if {[string eq $description_type {text/plain}]} { 
+    set description [ad_text_to_html $description]
+}
+
 set pending_count [db_string pending_count_select {
         select count(*)
           from download_arch_revisions_obj dar
@@ -55,7 +59,7 @@
     order by version_name
 }
 
-set context_bar [list $archive_name]
+set context [list $archive_name]
 
 set gc_link ""
 set gc_comments ""