Index: openacs-4/packages/dotkul-admin/www/children.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotkul-admin/www/Attic/children.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/dotkul-admin/www/children.tcl	17 Mar 2004 15:35:37 -0000	1.1.2.1
+++ openacs-4/packages/dotkul-admin/www/children.tcl	22 Mar 2004 14:43:03 -0000	1.1.2.2
@@ -17,13 +17,30 @@
     set label $child
     set node_type [dotkul::get_node_type $child_path]
     if { ![empty_string_p $node_type] } {
-        append label " ($node_type)"
+        #append label " ($node_type)"
     }
-    set action_url ".?path=$child_path"
+
+    switch $node_type {
+	page {
+	    set icon "resources/xloadtree/images/xp/file.png"
+	}
+	default {
+	    set icon {}
+	}
+    }
+    
+    set action_url "properties?path=$child_path"
     set src_url "children?path=$child_path"
 
-    append document "  <tree text=\"[ad_quotehtml $label]\" action=\"$action_url\" "
+    append document "  <tree text=\"[ad_quotehtml $label]\" "
+    append document "action=\"$action_url\" "
+    append document "target=\"content_frame\" "
 
+    if { ![empty_string_p $icon] } {
+	append document "icon=\"$icon\" "
+	append document "openIcon=\"$icon\" "
+    }
+
     if { [llength [dotkul::get_node_children $child_path]] > 0  } {
         append document "src=\"$src_url\" "
     }