Index: openacs-4/packages/assessment/www/session.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/session.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/assessment/www/session.tcl	27 Oct 2004 13:53:49 -0000	1.15
+++ openacs-4/packages/assessment/www/session.tcl	5 Nov 2004 00:43:23 -0000	1.16
@@ -89,7 +89,11 @@
     } else {
       set choice_answer "<input type=\"$presentation_type\" readonly disabled>"
     }
-    append choice_html "<tr><td>$correct_answer</td><td>$choice_answer [ad_quotehtml $choice_title]<img src=\"view/?revision_id=$content_value\"></td></tr>"
+    if {[empty_string_p $content_value]} {
+        append choice_html "<tr><td>$correct_answer</td><td>$choice_answer [ad_quotehtml $choice_title]</td></tr>"
+    } else {
+        append choice_html "<tr><td>$correct_answer</td><td>$choice_answer [ad_quotehtml $choice_title]<img src=\"view/?revision_id=$content_value\"></td></tr>"
+    }   
     }
   }
   if {$item_correct} { set score $itemmaxscore }