Index: openacs-4/packages/evaluation/www/view/evaluation-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/view/evaluation-view.tcl,v
diff -u -N -r1.3 -r1.3.6.1
--- openacs-4/packages/evaluation/www/view/evaluation-view.tcl	7 Oct 2007 22:37:00 -0000	1.3
+++ openacs-4/packages/evaluation/www/view/evaluation-view.tcl	19 Aug 2014 07:35:57 -0000	1.3.6.1
@@ -38,9 +38,9 @@
 set grade_weight [lc_numeric %.2f $grade_weight]
 set net_grade [lc_numeric %.2f $net_grade]
 
-if { ![empty_string_p $answer_data] } {
+if { $answer_data ne "" } {
     
-    if { [string eq $answer_title "link"] } {
+    if {$answer_title eq "link"} {
  	set answer_url "<a href=\"$answer_data\">$answer_data</a>"
     } else {
 	# we assume it's a file