Index: openacs-4/packages/layout-manager/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/layout-manager/tcl/includelet-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/layout-manager/tcl/includelet-procs.tcl	19 Aug 2008 20:15:58 -0000	1.4
+++ openacs-4/packages/layout-manager/tcl/includelet-procs.tcl	19 Aug 2008 22:12:43 -0000	1.5
@@ -68,3 +68,17 @@
     db_1row select_includelet {} -column_array includelet
     return [array get includelet]
 }
+
+ad_proc layout::includelet::get_column_value {
+    -name:required
+    -column:required
+} {
+    Return one row column from a layout includelet.
+
+    @param name The name of the includelet.
+    @param column The name of the column in the layout_elements table.
+} {
+    array set includelet [layout::includelet::get -name $name]
+    return $includelet($column)
+}
+