Index: openacs-4/packages/photo-album/www/album-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/photo-album/www/album-add.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/photo-album/www/album-add.tcl	7 Oct 2007 22:37:03 -0000	1.5
+++ openacs-4/packages/photo-album/www/album-add.tcl	6 Sep 2013 17:17:43 -0000	1.6
@@ -19,7 +19,7 @@
     context_list:onevalue
 }
 
-ad_require_permission $parent_id "pa_create_album"
+permission::require_permission -object_id $parent_id -privilege "pa_create_album"
 
 set context_list [pa_context_bar_list -final "[_ photo-album._Create]" $parent_id]