Index: openacs-4/packages/acs-templating/www/scripts/xinha/attach-image.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/www/scripts/xinha/attach-image.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/acs-templating/www/scripts/xinha/attach-image.tcl	27 Oct 2014 16:40:53 -0000	1.12
+++ openacs-4/packages/acs-templating/www/scripts/xinha/attach-image.tcl	7 Aug 2017 23:48:03 -0000	1.13
@@ -32,7 +32,7 @@
 
 if {!$write_p} {
     # if parent_id does not exist yet, let's use the pacakage_id
-    if { ![db_0or1row "check_parent" "select object_id from acs_objects where object_id=:parent_id"] } {
+    if { ![db_0or1row check_parent {select object_id from acs_objects where object_id = :parent_id}] } {
         set parent_id $package_id
     }
 
@@ -481,3 +481,9 @@
 
 }
 
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: