Index: openacs-4/packages/photo-album/www/clipboard-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/photo-album/www/clipboard-delete.tcl,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/photo-album/www/clipboard-delete.tcl	30 Jun 2003 07:50:59 -0000	1.1
@@ -0,0 +1,18 @@
+# /packages/photo-album/www/clipboard-delete.tcl
+ad_page_contract {
+    delete a photo clipboard.
+
+    @author Robert Locke rlocke@infiniteinfo.com
+    @creation-date 06/27/2003
+    @cvs-id $Id: clipboard-delete.tcl,v 1.1 2003/06/30 07:50:59 robertl Exp $
+} {
+    collection_id
+}
+
+permission::require_permission -object_id $collection_id -privilege delete
+
+db_exec_plsql delete_collection {
+    select pa_collection__delete(:collection_id)
+}
+
+ad_returnredirect clipboards
\ No newline at end of file
Index: openacs-4/packages/photo-album/www/clipboards.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/photo-album/www/clipboards.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/photo-album/www/clipboards.adp	10 Jun 2003 10:07:11 -0000	1.1
+++ openacs-4/packages/photo-album/www/clipboards.adp	30 Jun 2003 07:50:59 -0000	1.2
@@ -1,6 +1,6 @@
   <master>
     <property name="title">Your clipboards</property>
-    <property name="context">clipboards</property>
+    <property name="context">Clipboards</property>
     <if @user_id@ eq 0> 
       You will have to <a href="/register/">log in</a> or
       <a href="/register/">register</a>
@@ -18,7 +18,7 @@
             <li> <a href="clipboard-view?collection_id=@clipboards.collection_id@">@clipboards.title@</a>
               (@clipboards.photos@ photos) 
               [ <a href="clipboard-ae?collection_id=@clipboards.collection_id@">edit
-                name</a> ]</li>
+                name</a> | <a href="clipboard-delete?collection_id=@clipboards.collection_id@">delete clipboard</a> ]</li>
           </multiple>
         </ul>
       </else>