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.34 -r1.35
--- openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl	18 Sep 2018 18:28:55 -0000	1.34
+++ openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl	29 Nov 2018 23:54:19 -0000	1.35
@@ -65,7 +65,7 @@
            Caller is responsible to handle cleaning up the tmp file
     @param nls_language - ???
     @param data - ???
-    @param attributes A list of lists ofpairs of additional attributes and
+    @param attributes A list of lists of pairs of additional attributes and
            their values to pass to the constructor. Each pair is a list of two
            elements: key => value such as
     [list [list attribute value] [list attribute value]]
@@ -313,28 +313,26 @@
     }
 }
 
-ad_proc -public ::content::item::content_type {
+ad_proc -deprecated -public ::content::item::content_type {
     -item_id:required
 } {
     @public get_content_type
 
     Retrieves the content type of the item. If the item does not exist,
     returns an empty string.
 
+    Deprecated: exactly the same proc as content::item::get_content_type
+
+    @see content::item::get_content_type
+
     @param  item_id   The item_id of the content item
 
     @return The content type of the item, or an empty string if no such
     item exists
 } {
-    return [package_exec_plsql \
-        -var_list [list [list item_id $item_id]] \
-        content_item get_content_type]
+    return [content::item::get_content_type -item_id $item_id]
 }
 
-
-
-
-
 ad_proc -public content::item::get_content_type {
     -item_id:required
 } {
@@ -344,14 +342,13 @@
     @param  item_id   The item_id of the content item
 
     @return The content type of the item, or an empty string if no such
-    item exists
+            item exists
 } {
-    return [package_exec_plsql -var_list [list \
-        [list item_id $item_id ] \
-    ] content_item get_content_type]
+    return [package_exec_plsql \
+        -var_list [list [list item_id $item_id ]] \
+        content_item get_content_type]
 }
 
-
 ad_proc -public content::item::get_context {
     -item_id:required
 } {