Index: openacs-4/packages/dotlrn-catalog/www/dt-admin/course-categorize.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/dt-admin/course-categorize.tcl,v
diff -u -r1.1.1.1 -r1.1.1.1.2.1
--- openacs-4/packages/dotlrn-catalog/www/dt-admin/course-categorize.tcl	14 Feb 2005 22:46:11 -0000	1.1.1.1
+++ openacs-4/packages/dotlrn-catalog/www/dt-admin/course-categorize.tcl	4 Jul 2005 21:20:35 -0000	1.1.1.1.2.1
@@ -10,7 +10,7 @@
 
 # Check for create permissions over dotlrn-catalog
 set user_id [ad_conn user_id]
-set cc_package_id [apm_package_id_from_key "dotlrn-catalog"]
+set cc_package_id [ad_conn package_id]
 permission::require_permission -party_id $user_id -object_id $cc_package_id -privilege "create"
 
 set context [list "[_ dotlrn-catalog.categorize] $name"]