Index: openacs-4/packages/xotcl-core/tcl/cr-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/cr-procs.tcl,v
diff -u -N -r1.76.2.7 -r1.76.2.8
--- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	25 Mar 2019 13:46:58 -0000	1.76.2.7
+++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	26 Mar 2019 14:34:39 -0000	1.76.2.8
@@ -148,15 +148,15 @@
     Check, whether a content item with the given name exists.
     When content_type is provided (e.g. -content_type "::%")
     then a like operation is applied on the value.
-    
+
     @return item_id If the item exists, return its item_id, otherwise 0.
   } {
     if {[info exists content_type]} {
       set result [::xo::dc get_value lookup_by_name_and_ct {
         select item_id from cr_items
         where name = :name and parent_id = :parent_id
         and content_type like :content_type
-      } 0]       
+      } 0]
     } else {
       set result [::xo::dc get_value lookup_by_name {
         select item_id from cr_items
@@ -1082,7 +1082,7 @@
           || $__slot in {
             "::xo::db::CrItem::slot::name"
             "::xo::db::CrItem::slot::publish_date"
-          }          
+          }
         } continue
       :instvar $__slot_name
       if {![info exists $__slot_name]} {set $__slot_name ""}
@@ -1665,7 +1665,7 @@
   CrCache::Class instproc lookup {
     -name:required
     {-parent_id -100}
-    {-content_type}   
+    {-content_type}
   } {
     # We need here the strange logic to avoid caching of lookup fails.
     # In order to cache fails as well, we would have to flush the fail