Index: openacs-4/packages/acs-subsite/www/admin/site-map/site-map.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/site-map.tcl,v
diff -u -r1.6 -r1.6.8.1
--- openacs-4/packages/acs-subsite/www/admin/site-map/site-map.tcl	29 Jul 2008 22:04:14 -0000	1.6
+++ openacs-4/packages/acs-subsite/www/admin/site-map/site-map.tcl	6 Sep 2013 16:01:46 -0000	1.6.8.1
@@ -29,7 +29,7 @@
 set object_id $node(object_id)
 
 if {$object_id ne ""} {
-    ad_require_permission $object_id admin
+    permission::require_permission -object_id $object_id -privilege admin
 }
 
 if {$new_parent ne ""} {