Index: openacs-4/packages/xowf/tcl/atjob-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/atjob-procs.tcl,v
diff -u -N -r1.8 -r1.8.2.1
--- openacs-4/packages/xowf/tcl/atjob-procs.tcl	10 Oct 2018 12:58:28 -0000	1.8
+++ openacs-4/packages/xowf/tcl/atjob-procs.tcl	8 May 2019 14:38:41 -0000	1.8.2.1
@@ -53,14 +53,14 @@
     set form_id [$class form_id -package_id $package_id -parent_id [${:object} parent_id]]
     if {$form_id != 0} {
       ::xo::db::CrClass get_instance_from_db -item_id $form_id
-      set instance_attributes [dict merge [$form_id default_instance_attributes] [list cmd ${:cmd}]]
-      set name [::xowiki::autoname new -name [$form_id name] -parent_id $owner_id] 
+      set instance_attributes [dict merge [::$form_id default_instance_attributes] [list cmd ${:cmd}]]
+      set name [::xowiki::autoname new -name [::$form_id name] -parent_id $owner_id] 
       set f [::xowiki::FormPage new -destroy_on_cleanup \
                  -package_id $package_id \
                  -parent_id $owner_id \
                  -name $name \
                  -title ${:priority} \
-                 -nls_language [$form_id nls_language] \
+                 -nls_language [::$form_id nls_language] \
                  -publish_status "production" \
                  -publish_date $ansi_time \
                  -creation_user ${:party_id} \
@@ -75,7 +75,7 @@
     set form_name en:atjob-form
     set form_id [::xo::db::CrClass lookup -name $form_name -parent_id $parent_id]
     if {$form_id == 0} {
-      set page [$package_id resolve_page $form_name __m]
+      set page [::$package_id resolve_page $form_name __m]
       if {$page ne ""} {set form_id [$page item_id]}
       if {$form_id == 0} {
         ns_log error "Cannot lookup form $form_name; ignore request"
@@ -85,7 +85,7 @@
   }
   
   atjob proc run_jobs {item_ids} {
-    #my log "---run xowf jobs START"
+    #:log "---run xowf jobs START"
 
     set sql "select package_id, item_id, name, parent_id, publish_status, creation_user,
                     revision_id, page_template, instance_attributes
@@ -101,7 +101,7 @@
       :log "--at we got [llength [$items children]] scheduled items"
 
       foreach item [$items children] {
-        #my log "--at *** job=[$item serialize] ***\n"
+        #:log "--at *** job=[$item serialize] ***\n"
         set owner_id [$item parent_id]
         set party_id [$item creation_user]
         set __ia [$item instance_attributes]
@@ -117,10 +117,10 @@
 
         # We assume, the package is from the xowiki family; make sure, the url looks like real
         ::xo::Package initialize \
-            -package_id [$owner_id package_id] \
+            -package_id [::$owner_id package_id] \
             -user_id $party_id \
             -init_url 0 -actual_query ""
-        $package_id set_url -url [$package_id package_url][$owner_id name]
+        $package_id set_url -url [::$package_id package_url][::$owner_id name]
 
         :log "--at executing atjob $cmd"
         if {[catch {eval $owner_id $cmd} errorMsg]} {
@@ -136,7 +136,7 @@
   }
 
   atjob proc check {{-with_older false}} {
-    #my log "--at START"
+    #:log "--at START"
     #
     # check, if there are jobs scheduled for execution
     #