Index: openacs-4/packages/download/www/one-revision.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-revision.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/download/www/one-revision.tcl	9 Jul 2001 15:35:11 -0000	1.5
+++ openacs-4/packages/download/www/one-revision.tcl	31 Oct 2001 20:42:07 -0000	1.6
@@ -73,8 +73,8 @@
 set gc_link ""
 set gc_comments ""
 if { [catch {
-    set gc_link [general_comments::create_link $revision_id "$archive_name $version_name" [ad_conn url]?[ad_conn query] "Add a comment"]
-    set gc_comments [general_comments::get_comments $revision_id [ad_conn url]?[ad_conn query]]
+    set gc_link [general_comments_create_link -object_name "$archive_name $version_name" $revision_id [ad_conn url]?[ad_conn query]]
+    set gc_comments [general_comments_get_comments $revision_id [ad_conn url]?[ad_conn query]]
 } error] } {
     global errorInfo errorCode
     ns_log Notice "gc_link: $errorInfo, $errorCode"