Index: openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl,v
diff -u -r1.26 -r1.27
--- openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl	24 Jul 2004 08:34:06 -0000	1.26
+++ openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl	26 Jan 2005 00:51:30 -0000	1.27
@@ -493,6 +493,7 @@
     }
     
     set info(url) [file join $info(folder) $info(url)]
+    regsub {/.$} $info(url) / info(url)
 
     # Default to not selected
     set selected_p 0