Index: openacs-4/packages/dotlrn/www/configure.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/configure.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn/www/configure.tcl	1 Dec 2001 23:16:27 -0000	1.3
+++ openacs-4/packages/dotlrn/www/configure.tcl	19 Jan 2002 22:54:20 -0000	1.4
@@ -4,8 +4,10 @@
     
     @author Ben Adida (ben@openforce.net)
     @author Arjun Sanyal (arjun@openforce.net)
+    @author yon (yon@openforce.net)
     @creation-date 2001-10-24
-} {
+    @version $Id$
+} -query {
 }
 
 # Check if this is a community type level thing
@@ -17,7 +19,6 @@
 # Make sure user is logged in
 set user_id [ad_maybe_redirect_for_registration]
 
-
 if {[ad_parameter community_level_p] == 1} {
     # This is a community
     # What community type are we at?
@@ -43,16 +44,12 @@
     
     # If there is no portal_id, this user is either a guest or something else
     if {[empty_string_p $portal_id]} {
-
 	# do something
-	ad_returnredirect "/."
+	ad_returnredirect "./"
     } else {
 	set rendered_page [portal::configure $portal_id "index"]
 	set name [portal::get_name $portal_id]
     }
 }
     
 ad_return_template
-
-
-