--- loncom/homework/functionplotresponse.pm	2011/01/14 01:56:32	1.50
+++ loncom/homework/functionplotresponse.pm	2011/01/28 16:06:49	1.53
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: functionplotresponse.pm,v 1.50 2011/01/14 01:56:32 www Exp $
+# $Id: functionplotresponse.pm,v 1.53 2011/01/28 16:06:49 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -108,7 +108,7 @@ sub init_script {
           $script.="if (param=='applet_$id') { loaded_$id=true; }\n";
       }
       $script.="if (".join(' && ',map { "loaded_$_" } (@Apache::functionplotresponse::callscripts)).
-               ") { setTimeout('ggbInitAll()',20) }";
+               ") { setTimeout('ggbInitAll()',200) }";
       my $calls=join("\n",map { "ggbInit_$_();" } (@Apache::functionplotresponse::callscripts)); 
       return (<<ENDGGBINIT);
 <script type="text/javascript">
@@ -184,7 +184,7 @@ sub set_slope_coordinate {
    my $mult=($fixed?'a*':'');
    return (<<ENDSETSVARIABLE);
 document.ggbApplet_$id.evalCommand("a=1");
-document.ggbApplet_$id.evalCommand("$xvariable=Slider[0,$domain,$xinterval]");
+document.ggbApplet_$id.evalCommand("$xvariable=Slider[$xinterval,$domain,$xinterval]");
 document.ggbApplet_$id.setVisible("$xvariable", false);
 document.ggbApplet_$id.evalCommand("$xvariable=$xrel");
 document.ggbApplet_$id.evalCommand("$yvariable=Slider[-$range,$range,$yinterval]");
@@ -536,6 +536,12 @@ sub start_functionplotrule {
                                      $token,'8').
              &Apache::edit::end_row();
   } elsif ($target eq 'modified') {
+    if (($env{'form.'.&Apache::edit::html_element_name('xinitial')} ne '') & ($env{'form.'.&Apache::edit::html_element_name('xinitiallabel')} eq 'start')) {
+       $env{'form.'.&Apache::edit::html_element_name('xinitiallabel')}='';
+    }
+    if (($env{'form.'.&Apache::edit::html_element_name('xfinal')} ne '') & ($env{'form.'.&Apache::edit::html_element_name('xfinallabel')} eq 'end')) {
+       $env{'form.'.&Apache::edit::html_element_name('xfinallabel')}='';
+    }
     my $constructtag=&Apache::edit::get_new_args($token,$parstack,
                                                  $safeeval,'index','derivativeorder',
                                                            'xinitial','xinitiallabel','xfinal','xfinallabel',