Index: openacs-4/contrib/obsolete-packages/postcard/www/add-picture.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/postcard/www/add-picture.tcl,v diff -u -N -r1.3 -r1.3.8.1 --- openacs-4/contrib/obsolete-packages/postcard/www/add-picture.tcl 5 Sep 2002 12:57:45 -0000 1.3 +++ openacs-4/contrib/obsolete-packages/postcard/www/add-picture.tcl 7 Oct 2004 18:58:03 -0000 1.3.8.1 @@ -9,8 +9,14 @@ } { } -ad_require_permission [ad_conn package_id] "postcard_create_image" +set user_id [ad_conn user_id] +set package_id [ad_conn package_id] +permission::require_permission \ + -party_id $user_id \ + -privilege create \ + -object_id $package_id + set image_id [db_nextval postcard_image_sequence]