Index: openacs-4/packages/acs-core-docs/www/files/tutorial/note-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-core-docs/www/files/tutorial/note-list.tcl,v
diff -u -N
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-core-docs/www/files/tutorial/note-list.tcl	4 Feb 2004 16:47:34 -0000	1.2
@@ -0,0 +1,38 @@
+template::list::create \
+    -name notes \
+    -multirow notes \
+    -actions { "Add a Note" note-edit} \
+    -elements {
+	edit {
+	    link_url_col edit_url
+	    display_template {
+		<img src="/resources/acs-subsite/Edit16.gif" width="16" height="16" border="0">
+	    }
+	    sub_class narrow
+	}
+	title {
+	    label "Title"
+	}
+	delete {
+	    link_url_col delete_url 
+	    display_template {
+		<img src="/resources/acs-subsite/Delete16.gif" width="16" height="16" border="0">
+	    }
+	    sub_class narrow
+	}
+    }
+
+db_multirow \
+    -extend {
+	edit_url
+	delete_url
+    } notes notes_select {
+	select ci.item_id,
+	       n.title
+        from   cr_items ci,
+               mfp_notesx n
+        where  n.revision_id = ci.live_revision
+    } {
+	set edit_url [export_vars -base "note-edit" {item_id}]
+	set delete_url [export_vars -base "note-delete" {item_id}]
+    }
\ No newline at end of file