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.38 -r1.39
--- openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl	5 May 2007 13:07:35 -0000	1.38
+++ openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl	6 May 2007 06:58:40 -0000	1.39
@@ -654,7 +654,7 @@
     if {$url eq ""} {
 	set subsite_url [subsite::get_element -element url]
     } else {
-	set substie_url $url
+	set subsite_url $url
     }
 
     set subsite_id [ad_conn subsite_id]