Index: openacs-4/packages/acs-content-repository/tcl/item-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/Attic/item-procs.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-content-repository/tcl/item-procs.xql	25 Sep 2003 18:59:10 -0000	1.4
+++ openacs-4/packages/acs-content-repository/tcl/item-procs.xql	16 Jan 2004 18:29:32 -0000	1.5
@@ -92,4 +92,12 @@
       </querytext>
 </fullquery>
 
+<fullquery name="item::publish.publish_status">
+    <querytext>
+        update cr_items
+        set publish_status = :publish_status
+        where item_id = :item_id
+    </querytext>
+</fullquery>
+
 </queryset>