[Aimmath-commit] AIM/WEB-INF/maple/aim TextQuestion.mpl,1.10,1.11

[<gr...@us...>]

Update of /cvsroot/aimmath/AIM/WEB-INF/maple/aim
In directory sc8-pr-cvs1:/tmp/cvs-serv32762

Modified Files:
	TextQuestion.mpl 
Log Message:
For answers of type string, AIM now states that:
 No validation is possible with this question. 
 Your answer exactly as you typed it is:
Also some [] were added in arguments to the type function, e.g.
type(rawans,reqtype) became type([rawans],[reqtype]). This is to prevent
AIM running into problems when the student (incorrectly) enters a sequence.
                                                                      - GG


Index: TextQuestion.mpl
===================================================================
RCS file: /cvsroot/aimmath/AIM/WEB-INF/maple/aim/TextQuestion.mpl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** TextQuestion.mpl	22 Oct 2003 02:30:36 -0000	1.10
--- TextQuestion.mpl	9 Jan 2004 06:47:00 -0000	1.11
***************
*** 369,378 ****
     else
      if attempt['Answer'] <> NULL then
! # KM
       if type([attempt['Answer']],[string]) then
  
        html :=
         cat(
!         __("Your last answer was: \n"),
          "<br/><pre>",
          attempt['Answer'],
--- 369,379 ----
     else
      if attempt['Answer'] <> NULL then
! # KM & GG
       if type([attempt['Answer']],[string]) then
  
        html :=
         cat(
!         __("No validation is possible with this question. \n"),
!         __("Your last answer, exactly as you typed it, was: \n"),
          "<br/><pre>",
          attempt['Answer'],
***************
*** 478,482 ****
     # check that the string matches the required type in the case
     # where the user has specified a subtype of type string
!    if (not(type(rawans,reqtype))) then
      attempt['ValidationNote'] := __("wrong type");
      attempt['ValidationMessage'] := 
--- 479,483 ----
     # check that the string matches the required type in the case
     # where the user has specified a subtype of type string
!    if (not(type([rawans],[reqtype]))) then
      attempt['ValidationNote'] := __("wrong type");
      attempt['ValidationMessage'] := 
***************
*** 676,680 ****
  
    # Check if the answer has the right type.
!   if (not(type(ans,reqtype))) then
     attempt['ValidationNote'] := __("wrong type");
     attempt['ValidationMessage'] := 
--- 677,681 ----
  
    # Check if the answer has the right type.
!   if (not(type([ans],[reqtype]))) then
     attempt['ValidationNote'] := __("wrong type");
     attempt['ValidationMessage'] :=