--- loncom/homework/functionplotresponse.pm 2012/02/28 22:42:31 1.93 +++ loncom/homework/functionplotresponse.pm 2012/02/29 01:24:47 1.94 @@ -1,7 +1,7 @@ # LearningOnline Network with CAPA # Functionplot responses # -# $Id: functionplotresponse.pm,v 1.93 2012/02/28 22:42:31 www Exp $ +# $Id: functionplotresponse.pm,v 1.94 2012/02/29 01:24:47 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -602,6 +602,7 @@ sub start_drawvectorsum { my $internalid = $Apache::inputtags::part.'_'.$Apache::inputtags::response[-1]; my $tailx=&Apache::lonxml::get_param('tailx',$parstack,$safeeval); my $taily=&Apache::lonxml::get_param('taily',$parstack,$safeeval); + my $showvalue=&Apache::lonxml::get_param('showvalue',$parstack,$safeeval); my $vectorlist=&Apache::lonxml::get_param('vectorlist',$parstack,$safeeval); my $label=&Apache::lonxml::get_param('label',$parstack,$safeeval); $label=~s/\W//gs; @@ -632,11 +633,16 @@ ENDADDVEC } $result.="document.ggbApplet_$internalid.evalCommand(".'"'."xTot$label=".join('+',@sumx).'");'."\n"; $result.="document.ggbApplet_$internalid.evalCommand(".'"'."yTot$label=".join('+',@sumy).'");'."\n"; + my $show=0; + if ($showvalue=~/yes/i) { + $show=1; + } $result.=(<'. + $token,'8'). + &Apache::edit::select_arg('Show Value:','showvalue', + ['yes','no'],$token).'
'. &Apache::edit::text_arg('Vector List:','vectorlist', $token,'40'). &Apache::edit::end_row(); } elsif ($target eq 'modified') { $env{'form.'.&Apache::edit::html_element_name('label')}=ucfirst($env{'form.'.&Apache::edit::html_element_name('label')}); - my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,'label','tailx','taily','vectorlist'); + my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,'label','tailx','taily','showvalue','vectorlist'); if ($constructtag) { $result=&Apache::edit::rebuild_tag($token); } } return $result;