[Aimmath-commit] AIM/WEB-INF/maple/aim Quiz.mpl,1.4,1.5

[<nps...@us...>]

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

Modified Files:
	Quiz.mpl 
Log Message:
Fixed links from mark summary back to quiz in focused mode

Index: Quiz.mpl
===================================================================
RCS file: /cvsroot/aimmath/AIM/WEB-INF/maple/aim/Quiz.mpl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** Quiz.mpl	25 Aug 2003 21:47:19 -0000	1.4
--- Quiz.mpl	6 Sep 2003 13:05:31 -0000	1.5
***************
*** 1027,1044 ****
     to the student.
    ",
- # KM
- # DIST  proc(this)
    proc(this,
         focused_::boolean # optional: default = false
        )
- # END KM
     local totalmark,totalvalue,numattempted,attemptedvalue,
           histories,history,marksummary,questionvalue,mark,
! # KM
! # DIST         percentage,label;
!          percentage,label,focused,href,jscript;
  
     if nargs>1 then focused:=focused_ else focused:=false fi:
- # END KM
  
     totalmark      := 0.;
--- 1027,1038 ----
     to the student.
    ",
    proc(this,
         focused_::boolean # optional: default = false
        )
     local totalmark,totalvalue,numattempted,attemptedvalue,
           histories,history,marksummary,questionvalue,mark,
!          percentage,label,toplabel,focused,href,jscript,i;
  
     if nargs>1 then focused:=focused_ else focused:=false fi:
  
     totalmark      := 0.;
***************
*** 1067,1074 ****
      fi;
  
- # KM
      if focused then
        jscript:="javascript:MoveFocus('%s');";
!       href := sprintf(jscript,label);
        marksummary['AddContents',
         ["tr",["td",[["a", "href" = href ], label]],
--- 1061,1072 ----
      fi;
  
      if focused then
        jscript:="javascript:MoveFocus('%s');";
!       toplabel := label;
!       i := searchtext(".",label);
!       if (i > 0) then
!        toplabel := substring(toplabel,1..i-1);
!       fi;
!       href := sprintf(jscript,toplabel);
        marksummary['AddContents',
         ["tr",["td",[["a", "href" = href ], label]],
***************
*** 1076,1087 ****
               [["td","align" = "right"],history['MarkString']]]];
      else    
- # END KM
        marksummary['AddContents',
         ["tr",["td",[["a", "href"=cat("#",label)], label]],
               [["td","align" = "right"],sprintf("%3.2f",questionvalue)],
               [["td","align" = "right"],history['MarkString']]]];
- # KM
      fi;
- # END KM
     od;
  
--- 1074,1082 ----