Index: openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl,v
diff -u -r1.85 -r1.86
--- openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl	29 Mar 2018 22:49:53 -0000	1.85
+++ openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl	4 Apr 2018 20:29:49 -0000	1.86
@@ -718,7 +718,7 @@
         # This callback gets the href of the imported content (if some package imported it)
 
         #revoke permissions until first usage of resources
-        if {[info exist acs_object_id]} {
+        if {[info exists acs_object_id]} {
             permission::set_not_inherit -object_id $acs_object_id
         }
         
@@ -1765,7 +1765,7 @@
     }
 
     #revoke read permissions until first usage
-    if {[info exist acs_object_id]} {
+    if {[info exists acs_object_id]} {
         permission::set_not_inherit -object_id $acs_object_id
     }
     return $acs_object_id
@@ -2124,7 +2124,7 @@
             # an error happened, abort and return the list whit the error
             return $item_list
         }
-        if { ![info exist role_id] } {
+        if { ![info exists role_id] } {
             set role_id "";
         }
         # create the monitor service