Index: openacs-4/packages/photo-album/www/clipboard-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/photo-album/www/clipboard-ae.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/photo-album/www/clipboard-ae.tcl	10 Jun 2003 10:07:11 -0000	1.1
+++ openacs-4/packages/photo-album/www/clipboard-ae.tcl	12 Jun 2003 06:55:45 -0000	1.2
@@ -29,7 +29,7 @@
         "You must provide a non-empty name for the clipboard"
     }
 } -new_data {
-    db_0or1row new_collection {select pa_collection__new(:collection_id, :user_id, :title, now(), :user_id, :peeraddr, :context);}
+    db_exec_plsql new_collection {}
 } -edit_data {
     db_dml do_update "
             update pa_collections