Index: openacs-4/packages/theme-selva/tcl/selva-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/theme-selva/tcl/selva-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/theme-selva/tcl/selva-procs.tcl	29 Sep 2005 10:19:38 -0000	1.6
+++ openacs-4/packages/theme-selva/tcl/selva-procs.tcl	29 Sep 2005 10:51:13 -0000	1.7
@@ -78,7 +78,7 @@
 
 	set small_title_p [parameter::get_from_package_key -package_key "theme-selva" -parameter "SmallTitleP" -default "0"]
 	if {[exists_and_not_null community_id] && $small_title_p} {
-	    lappend tabs_list [list "" [dotlrn_community::get_community_name $community_id]]
+	    lappend tabs_list [list "$current_url" [dotlrn_community::get_community_name $community_id]]
 	} 
 
 	foreach {url name} [parameter::get_from_package_key -package_key "theme-selva" -parameter "AdditionalSubnavbarTabs" -default ""] {