Index: openacs-4/packages/lors-central/www/new-file.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors-central/www/new-file.tcl,v
diff -u -r1.1 -r1.1.2.1
--- openacs-4/packages/lors-central/www/new-file.tcl	17 May 2005 16:21:19 -0000	1.1
+++ openacs-4/packages/lors-central/www/new-file.tcl	13 Jun 2005 15:10:42 -0000	1.1.2.1
@@ -13,8 +13,8 @@
 
 
 set user_id [ad_conn user_id]
-# Checking swa privilege over lors-central
-lors_central::is_swa
+# Checking privilege over lors-central
+lors_central::check_permissions
 
 set page_title "[_ lors-central.new_file]"
 set context "[list [list [export_vars -base one-resource {res_id}] \