Index: openacs-4/packages/dotkul/lib/generic-page.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotkul/lib/Attic/generic-page.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/dotkul/lib/generic-page.tcl	17 Mar 2004 15:35:30 -0000	1.1.2.1
+++ openacs-4/packages/dotkul/lib/generic-page.tcl	22 Mar 2004 16:03:37 -0000	1.1.2.2
@@ -1,4 +1,3 @@
-
 set place [parameter::get -parameter PlaceReference]
 
 set master [dotkul::get_metadata [string range $place 0 end-1].master]
@@ -7,6 +6,9 @@
 set url [ad_conn extra_url]
 
 if { [empty_string_p $url] } {
+    # User has specified the place in the URL but not which page-folder in the
+    # place.  We redirect to the default page-folder.  For now we just take the
+    # first one.  After redirect we'll come back here.
     ad_returnredirect [lindex [dotkul::get_metadata $place] 0]/
     return
 }
@@ -19,4 +21,3 @@
 set page $place$url
 
 set title [dotkul::get_metadata $page.title]
-