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 -r1.24 -r1.24.2.1
--- openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl	27 Apr 2015 15:28:16 -0000	1.24
+++ openacs-4/packages/acs-content-repository/tcl/content-item-procs.tcl	2 Jan 2016 21:24:46 -0000	1.24.2.1
@@ -240,12 +240,16 @@
     if {"content_folder" eq $content_type} {
         return [db_0or1row get_item_folder "" -column_array local_array]
     }
-    set table_name [db_string get_table_name "select table_name from acs_object_types where object_type=:content_type"]
+    set table_name [db_string get_table_name {
+        select table_name from acs_object_types where object_type = :content_type
+    }]
     while {$table_name eq ""} {
         acs_object_type::get -object_type $content_type -array typeInfo
         ns_log notice "no table for $content_type registered, trying '$typeInfo(supertype)' instead"
         set content_type $typeInfo(supertype)
-        set table_name [db_string get_table_name "select table_name from acs_object_types where object_type=:content_type"]
+        set table_name [db_string get_table_name {
+            select table_name from acs_object_types where object_type = :content_type
+        }]
     }
     set table_name "${table_name}x"
     # get attributes of the content_item use the content_typex view
@@ -899,8 +903,9 @@
 
 } {
 
-  set publish_status [db_string gps_get_publish_status \
-                          "select publish_status from cr_items where item_id = :item_id"]
+    set publish_status [db_string gps_get_publish_status {
+        select publish_status from cr_items where item_id = :item_id
+    }]
 
   return $publish_status
 }