Index: openacs-4/packages/acs-subsite/www/admin/applications/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/applications/index.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/acs-subsite/www/admin/applications/index.tcl	26 Jan 2005 00:16:39 -0000	1.7
+++ openacs-4/packages/acs-subsite/www/admin/applications/index.tcl	15 Feb 2005 16:21:00 -0000	1.8
@@ -15,7 +15,7 @@
 set subsite_node_id $subsite_sitenode(node_id)
 
 db_multirow -extend { parameter_url } applications select_applications {} {
-    set instance_name "[string repeat .. $level]$instance_name"
+    set instance_name "[string repeat .. $treelevel]$instance_name"
     if { $num_parameters > 0 } {
         set parameter_url [export_vars -base ../../shared/parameters { package_id { return_url [ad_return_url] } }]
     }