Index: openacs-4/packages/general-comments/tcl/test/general-comments-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/tcl/test/Attic/general-comments-procs.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/general-comments/tcl/test/general-comments-procs.tcl	11 Aug 2020 13:55:44 -0000	1.1.2.1
+++ openacs-4/packages/general-comments/tcl/test/general-comments-procs.tcl	11 Aug 2020 13:59:55 -0000	1.1.2.2
@@ -6,10 +6,13 @@
     -cats {api smoke} \
     -procs {
         general_comments_create_link
+        general_comments_package_url
     } \
     general_comments_create_link {
         Test general_comments_create_link
     } {
+        set gc_url [general_comments_package_url]
+
         set vars {
             object_name
             link_text
@@ -36,4 +39,8 @@
         foreach var $vars {
             aa_true "Link contains suplied argument '$var'" {[string first [set $var] $url] >= 0}
         }
+
+        if {$gc_url ne ""} {
+            aa_true "Link contains general-comments package URL '$gc_url'" {[string first $gc_url $url] >= 0}
+        }
     }