--- loncom/homework/default_homework.lcpm	2006/12/19 14:24:05	1.124
+++ loncom/homework/default_homework.lcpm	2008/03/03 19:14:51	1.125
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # used by lonxml::xmlparse() as input variable $safeinit to Apache::run::run()
 #
-# $Id: default_homework.lcpm,v 1.124 2006/12/19 14:24:05 www Exp $
+# $Id: default_homework.lcpm,v 1.125 2008/03/03 19:14:51 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -217,6 +217,7 @@ sub caparesponse_check {
 
     my $reterror="";
     my $result;
+    if ((($type eq '9') || ($type eq '8')) && ($response=~/\=/)) { return ('BAD_FORMULA','Please submit just an expression, not an equation.'); }
     if ($type eq '9') {
       $result = &maxima_check(&maxima_cas_formula_fix($response),&maxima_cas_formula_fix($answer),\$reterror);
     } else {