Index: openacs-4/packages/survey/www/view-attachment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/survey/www/view-attachment.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/survey/www/view-attachment.tcl	12 Mar 2003 01:05:39 -0000	1.2
+++ openacs-4/packages/survey/www/view-attachment.tcl	6 Nov 2013 07:33:54 -0000	1.3
@@ -20,7 +20,7 @@
     attachment_exists -requires {response_id question_id} {
 	db_1row get_file_info {}
 
-	if { [empty_string_p $file_type] } {
+	if { $file_type eq "" } {
 	    ad_complain "[_ survey.lt_Couldnt_find_attachment]"
 	}
     }