Index: openacs-4/packages/photo-album/www/photo.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/photo-album/www/photo.tcl,v
diff -u -N -r1.2.2.1 -r1.2.2.2
--- openacs-4/packages/photo-album/www/photo.tcl	3 Dec 2003 22:52:33 -0000	1.2.2.1
+++ openacs-4/packages/photo-album/www/photo.tcl	17 Dec 2003 20:22:40 -0000	1.2.2.2
@@ -50,9 +50,13 @@
 
 set old_album_id [db_string get_parent_album {}]
 
-ad_require_permission $photo_id write
-ad_require_permission $old_album_id write
+set write_p [permission::permission_p -object_id $photo_id \
+                                      -party_id $user_id \
+		 -privilege "write"]
 
+set album_write_p [permission::permission_p -object_id $old_album_id \
+                                      -party_id $user_id \
+		 -privilege "write"]
 
 # These lines are to uncache the image in Netscape, Mozilla. 
 # IE6 & Safari (mac) have a bug with the images cache
@@ -121,13 +125,13 @@
 
 	    # not using content_item move because is only accepts 
 	    # a folder_id as target not another content_item
-7
+
 	    set rel_id [db_string photo_rel_id {}]
 
 	    db_dml photo_move {}
-	    
+
 	    db_dml photo_move2 {}
-	    
+
 	    db_dml context_update {}
 	    
 	} on_error {