Index: openacs-4/packages/attachments/www/go-to-attachment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/attachments/www/go-to-attachment.tcl,v
diff -u -r1.10 -r1.10.4.1
--- openacs-4/packages/attachments/www/go-to-attachment.tcl	9 Nov 2008 23:29:22 -0000	1.10
+++ openacs-4/packages/attachments/www/go-to-attachment.tcl	2 Oct 2013 23:08:45 -0000	1.10.4.1
@@ -13,7 +13,7 @@
 
 # Get information about attachment
 set content_type [item::get_type $attachment_id]
-if { [string length $content_type] == 0 } {
+if { $content_type eq "" } {
     ad_return_complaint 1 [_ attachments.lt_No_such_attachment_fo]
     return
 }