[BACK]Return to lonratparms.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / rat

Diff for /rat/lonratparms.pm between versions 1.16 and 1.18

version 1.16, 2003/09/29 14:31:00 version 1.18, 2003/10/23 18:38:50
Line 108  sub handler { Line 108  sub handler {
 # --------------------------------------------------- Print input screen header  # --------------------------------------------------- Print input screen header
     my $pjump_def = &Apache::lonhtmlcommon::pjump_javascript_definition();      my $pjump_def = &Apache::lonhtmlcommon::pjump_javascript_definition();
     my $bodytag=&Apache::loncommon::bodytag('Set Resource Parameters in Map');      my $bodytag=&Apache::loncommon::bodytag('Set Resource Parameters in Map');
     my %lt=&Apache::loncommon::texthash('pa' => 'Parameter',      my %lt=&Apache::lonlocal::texthash('pa' => 'Parameter',
  'de' => 'Default',                 'de' => 'Default',
  'va' => 'Value',         'va' => 'Value',
  'se' => 'Set');         'se' => 'Set');
     
     $r->print(<<ENDHEADER);      $r->print(<<ENDHEADER);
 <html>  <html>
Line 157  $bodytag Line 157  $bodytag
 <table border=2>  <table border=2>
 <tr><th>$lt{'pa'}</th><th>$lt{'de'}</th><th>$lt{'va'}</th><th>$lt{'se'}?</th></tr>  <tr><th>$lt{'pa'}</th><th>$lt{'de'}</th><th>$lt{'va'}</th><th>$lt{'se'}?</th></tr>
 ENDDOCUMENT  ENDDOCUMENT
     %display=&Apache::lonlocal::texthash(%display);  ###    %display=&Apache::lonlocal::texthash(%display);
     my $enter=&mt('Enter');      my $enter=&mt('Enter');
     foreach (keys(%content)) {      foreach (sort(keys(%content))) {
         my $cur=$content{$_};          my $cur=$content{$_};
         # Should if(defined($value{$_})) be if(exists($value{$_})) ?          # Should if(defined($value{$_})) be if(exists($value{$_})) ?
         if (defined($value{$_})) { $cur=$value{$_}; };          if (defined($value{$_})) { $cur=$value{$_}; };
Removed from v.1.16  
changed lines
  Added in v.1.18

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