--- loncom/homework/templates/sampleexternal.problem	2012/02/10 00:13:35	1.5
+++ loncom/homework/templates/sampleexternal.problem	2015/06/03 10:25:12	1.7
@@ -3,8 +3,8 @@
 <script type="loncapa/perl">
 sub fact {
    my $n=shift;
-   if ($n==1) {
-      return $n;
+   if ($n<=1) {
+      return 1;
    } else {
       return $n*&fact($n-1);
    }
@@ -43,7 +43,7 @@ boolean function <tt>&amp;negative(numbe
 Sample code for an evaluation script can be found <a href="/res/adm/includes/templates/sampleexternal.pl">here.</a></instructorcomment>
 <endouttext />
 <externalresponse url="$externalurl" answer="$testvalues" form="%args" answerdisplay="The most elegant (and dangerous) solution is recursive.">
-<textfield />
+<textfield></textfield>
 
 </externalresponse>
 </problem>