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

Diff for /loncom/homework/edit.pm between versions 1.112 and 1.114

version 1.112, 2007/10/03 00:24:48 version 1.114, 2008/03/12 02:46:52
Line 577  sub element_change_detection { Line 577  sub element_change_detection {
 }  }
   
 sub submit_ask_anyway {  sub submit_ask_anyway {
     return ' onclick="still_ask=true;" ';      my ($extra_action) = @_;
       return ' onclick="still_ask=true;'.$extra_action.'" ';
 }  }
   
 sub textarea_sizes {  sub textarea_sizes {
Line 879  sub entercoords { Line 880  sub entercoords {
  $data{"imagechoice.$id.formwidth"}=$width.'_'.   $data{"imagechoice.$id.formwidth"}=$width.'_'.
     $Apache::edit::bgimgsrccurdepth;      $Apache::edit::bgimgsrccurdepth;
     }      }
     &Apache::lonnet::appenv(%data);      &Apache::lonnet::appenv(\%data);
     my $text="Click Coordinates";      my $text="Click Coordinates";
     my $result='<a href="/adm/imagechoice?token='.$id.'" target="imagechoice">'.$text.'</a>';      my $result='<a href="/adm/imagechoice?token='.$id.'" target="imagechoice">'.$text.'</a>';
     return $result;      return $result;
Line 912  sub entercoord { Line 913  sub entercoord {
  $data{"imagechoice.$id.formwidth"}=$width.'_'.   $data{"imagechoice.$id.formwidth"}=$width.'_'.
     $Apache::edit::bgimgsrccurdepth;      $Apache::edit::bgimgsrccurdepth;
     }      }
     &Apache::lonnet::appenv(%data);      &Apache::lonnet::appenv(\%data);
     my $text="Enter Coordinates";      my $text="Enter Coordinates";
     if ($type eq 'polygon') { $text='Create Polygon Data'; }      if ($type eq 'polygon') { $text='Create Polygon Data'; }
     my $result='<a href="/adm/imagechoice?token='.$id.'" target="imagechoice">'.$text.'</a>';      my $result='<a href="/adm/imagechoice?token='.$id.'" target="imagechoice">'.$text.'</a>';
Removed from v.1.112  
changed lines
  Added in v.1.114

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