Index: openacs-4/packages/lors/tcl/lors-imscp-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors/tcl/lors-imscp-procs.tcl,v
diff -u -r1.26 -r1.27
--- openacs-4/packages/lors/tcl/lors-imscp-procs.tcl	9 May 2018 15:33:32 -0000	1.26
+++ openacs-4/packages/lors/tcl/lors-imscp-procs.tcl	30 Nov 2018 11:37:38 -0000	1.27
@@ -1061,7 +1061,7 @@
     }
 
     if {$object(object_type) eq "content_item"} {
-        set object(object_type) [content::item::content_type -item_id $object_id]
+        set object(object_type) [content::item::get_content_type -item_id $object_id]
     }
 
     set item_id [lors::imscp::item_add \
@@ -1100,7 +1100,7 @@
 } {
     db_1row get_object {} -column_array object
     if {$object(object_type) eq "content_item"} {
-        set object(object_type) [content::item::content_type -item_id $object_id]
+        set object(object_type) [content::item::get_content_type -item_id $object_id]
     }
     set res_id [lors::imscp::resource_add \
                     -man_id $man_id \