Index: openacs-4/packages/acs-lang/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/index.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-lang/www/index.tcl	26 Feb 2005 16:00:10 -0000	1.4
+++ openacs-4/packages/acs-lang/www/index.tcl	27 Oct 2014 16:39:38 -0000	1.5
@@ -14,4 +14,4 @@
 
 set locale [lang::user::locale]
 set language [lang::user::language]
-set admin_p [ad_permission_p [ad_conn package_id] admin]
+set admin_p [permission::permission_p -object_id [ad_conn package_id] -privilege admin]