Index: openacs-4/packages/cms/www/modules/clipboard/remove-items.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/clipboard/Attic/remove-items.tcl,v
diff -u -N
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/cms/www/modules/clipboard/remove-items.tcl	31 Aug 2006 19:59:05 -0000	1.1.2.1
@@ -0,0 +1,20 @@
+ad_page_contract {
+    Remove items from the clipboard
+
+    @author Michael Steigman
+    @creation-date March 2006
+} {
+    { item_id:multiple }
+    { mount_point }
+    { clip_tab }
+}
+
+set clip [cms::clipboard::parse_cookie]
+foreach item $item_id {
+    set clip [cms::clipboard::remove_item $clip $clip_tab $item]
+}
+
+ad_set_cookie content_marks [cms::clipboard::reassemble_cookie $clip]
+cms::clipboard::free $clip
+
+ad_returnredirect [export_vars -base index {mount_point clip_tab}]