Diff for /rat/lonratedt.pm between versions 1.26 and 1.27

version 1.26, 2002/05/22 13:31:22 version 1.27, 2002/05/22 20:39:59
Line 354  sub smpedt { Line 354  sub smpedt {
    my @targetselect=();     my @targetselect=();
    undef @importselect;     undef @importselect;
    undef @targetselect;     undef @targetselect;
    if (defined($ENV{'form.import'})) {     if (defined($ENV{'form.importsel'})) {
        if (ref($ENV{'form.import'})) {         if (ref($ENV{'form.importsel'})) {
    @importselect=sort(@{$ENV{'form.import'}});     @importselect=sort(@{$ENV{'form.importsel'}});
        } else {         } else {
            @importselect=($ENV{'form.import'});             @importselect=($ENV{'form.importsel'});
        }         }
    }     }
    if (defined($ENV{'form.target'})) {     if (defined($ENV{'form.target'})) {
Line 684  function idxcheck(mode) { Line 684  function idxcheck(mode) {
   
    function viewimport() {     function viewimport() {
        openview((document.forms.simpleedit.curimpdetail.value.split('&'))         openview((document.forms.simpleedit.curimpdetail.value.split('&'))
                 [document.forms.simpleedit.import.selectedIndex+1]);                  [document.forms.simpleedit.importsel.selectedIndex+1]);
    }     }
   
 </script>  </script>
Line 721  after selected Line 721  after selected
 <hr><input type=button onClick="javascript:viewtarget()" value="View">  <hr><input type=button onClick="javascript:viewtarget()" value="View">
 </td></tr>  </td></tr>
   
 <tr><td bgcolor="#FFFFCC"><select name="import" multiple>  <tr><td bgcolor="#FFFFCC"><select name="importsel" size=10 multiple>
 $importwindow  $importwindow
 </select>  </select>
 </td>  </td>
Line 735  Copy selected<br> Line 735  Copy selected<br>
 Paste after selected<br>  Paste after selected<br>
 <input type=submit name=paste value='-->'>  <input type=submit name=paste value='-->'>
 </td>  </td>
 <td bgcolor="#FFFFCC"><select name="target" multiple>  <td bgcolor="#FFFFCC"><select name="target" size=10 multiple>
 $targetwindow  $targetwindow
 </select>  </select>
 </table>  </table>

Removed from v.1.26  
changed lines
  Added in v.1.27


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