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

Diff for /loncom/interface/lonextresedit.pm between versions 1.23 and 1.25

version 1.23, 2017/12/18 22:56:45 version 1.25, 2018/05/29 19:33:48
Line 296  sub process_changes { Line 296  sub process_changes {
   
 sub update_exttool {  sub update_exttool {
     my ($marker,$cdom,$cnum,$supplementalflag,$args) = @_;      my ($marker,$cdom,$cnum,$supplementalflag,$args) = @_;
     my %toolhash=&Apache::lonnet::dump('exttool_'.$marker,$cdom,$cnum);  
     my (%newhash,$changed,$newgradable,@deleted,$errormsg);      my (%newhash,$changed,$newgradable,@deleted,$errormsg);
     ($newhash{'target'},$newhash{'width'},$newhash{'height'},$newhash{'linktext'},$newhash{'explanation'},      ($newhash{'target'},$newhash{'width'},$newhash{'height'},$newhash{'linktext'},$newhash{'explanation'},
      $newhash{'crslabel'},$newhash{'crstitle'},$newhash{'crsappend'},$newhash{'gradable'}) = split(/:/,$args);       $newhash{'crslabel'},$newhash{'crstitle'},$newhash{'crsappend'},$newhash{'gradable'}) = split(/:/,$args);
Line 387  sub extedit_form { Line 386  sub extedit_form {
         $appendstyle,$gradablestyle,$legend,$urlelem,$toolelem,%toolattr);          $appendstyle,$gradablestyle,$legend,$urlelem,$toolelem,%toolattr);
     $formname = 'new'.$type;      $formname = 'new'.$type;
     $toggle = $type;      $toggle = $type;
     $fieldsetid = 'upload'.$type.'form';      $fieldsetid = 'external'.$type.'form';
     $urlid = $type.'url';      $urlid = $type.'url';
     map { $toolattr{$_} = $type.$_; } ('dispdiv','dimendiv','dimenwidth','dimenheight',      map { $toolattr{$_} = $type.$_; } ('dispdiv','dimendiv','dimenwidth','dimenheight',
                                        'crstitlediv','crslabeldiv','crsappenddiv',                                         'crstitlediv','crslabeldiv','crsappenddiv',
Line 406  sub extedit_form { Line 405  sub extedit_form {
     if ($supplementalflag) {      if ($supplementalflag) {
         $formname = 'newsupp'.$type;          $formname = 'newsupp'.$type;
         $toggle = 'supp'.$type;          $toggle = 'supp'.$type;
         $fieldsetid = 'uploadsupp'.$type.'form';          $fieldsetid = 'externalsupp'.$type.'form';
         $urlid = 'supp'.$type.'url';          $urlid = 'supp'.$type.'url';
         map { $toolattr{$_} = 'supp'.$toolattr{$_}; } (keys(%toolattr));          map { $toolattr{$_} = 'supp'.$toolattr{$_}; } (keys(%toolattr));
     }      }
Line 444  sub extedit_form { Line 443  sub extedit_form {
             $active = '<input type="hidden" name="active" value="'.$tabid.'" />';              $active = '<input type="hidden" name="active" value="'.$tabid.'" />';
         }          }
         $formname = 'edit'.$type.'_'.$residx;          $formname = 'edit'.$type.'_'.$residx;
         $fieldsetid = 'upload'.$type.$residx;          $fieldsetid = 'external'.$type.$residx;
         $urlid = $type.'url_'.$residx;          $urlid = $type.'url_'.$residx;
         map { $toolattr{$_} .= '_'.$residx; } (keys(%toolattr));          map { $toolattr{$_} .= '_'.$residx; } (keys(%toolattr));
         $srcclass = ' class="LC_nobreak"';          $srcclass = ' class="LC_nobreak"';
Removed from v.1.23  
changed lines
  Added in v.1.25

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