Index: openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl,v
diff -u -N -r1.36 -r1.37
--- openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl	29 Nov 2018 23:55:10 -0000	1.36
+++ openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl	30 Nov 2018 00:09:06 -0000	1.37
@@ -246,7 +246,7 @@
     if {$revision ni {live latest}} {
         error "content::item::get revision was '${revision}'. It must be 'live' or 'latest'"
     }
-    set content_type [content_type -item_id $item_id]
+    set content_type [content::item::get_content_type -item_id $item_id]
     if {$content_type eq ""} {
         # content_type query was unsuccessful, item does not exist
         return 0