[BACK]Return to lonparmset.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonparmset.pm between versions 1.22 and 1.23

version 1.22, 2001/02/08 12:36:57 version 1.23, 2001/02/08 14:05:10
Line 138  sub valout { Line 138  sub valout {
   
 sub plink {  sub plink {
     my ($type,$dis,$value,$marker,$return,$call)=@_;      my ($type,$dis,$value,$marker,$return,$call)=@_;
     return '<a href="javascript:pjump('."'".$type."','".$dis."','".$value."','"      my $winvalue=$value;
       unless ($winvalue) {
    if ($type=~/^date/) {
               $winvalue=$ENV{'form.recent_'.$type};
           } else {
               $winvalue=$ENV{'form.recent_'.(split(/\_/,$type))[0]};
           }
       }
       return 
         '<a href="javascript:pjump('."'".$type."','".$dis."','".$winvalue."','"
       .$marker."','".$return."','".$call."'".');">'.        .$marker."','".$return."','".$call."'".');">'.
       &valout($value,$type).'</a><a name="'.$marker.'"></a>';        &valout($value,$type).'</a><a name="'.$marker.'"></a>';
 }  }
Line 393  sub handler { Line 402  sub handler {
         pclose();          pclose();
         if (document.parmform.pres_marker.value!='') {          if (document.parmform.pres_marker.value!='') {
             document.parmform.action+='#'+document.parmform.pres_marker.value;              document.parmform.action+='#'+document.parmform.pres_marker.value;
               var typedef=new Array();
               typedef=document.parmform.pres_type.value.split('_');
               if (typedef[0]=='date') {
                   eval('document.parmform.recent_'+
                        document.parmform.pres_type.value+
        '.value=document.parmform.pres_value.value;');
               } else {
                   eval('document.parmform.recent_'+typedef[0]+
        '.value=document.parmform.pres_value.value;');
               }
             document.parmform.submit();              document.parmform.submit();
         } else {          } else {
             document.parmform.pres_value.value='';              document.parmform.pres_value.value='';
Line 422  at Domain Line 441  at Domain
 <input type="hidden" value='' name="pres_type">  <input type="hidden" value='' name="pres_type">
 <input type="hidden" value='' name="pres_marker">  <input type="hidden" value='' name="pres_marker">
 ENDHEAD  ENDHEAD
       map {
         $r->print('<input type="hidden" value="'.
             $ENV{'form.recent_'.$_}.'" name="recent_'.$_.'">');
       } ('tolerance','date_default','date_start','date_end','date_interval',
          'int','float','string');
   
         $r->print('<h2>'.$message.'</h2><p>Sort list by ');          $r->print('<h2>'.$message.'</h2><p>Sort list by ');
  $r->print('<select name="fcat" onChange="this.form.submit();">');   $r->print('<select name="fcat" onChange="this.form.submit();">');
Removed from v.1.22  
changed lines
  Added in v.1.23

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>