Diff for /loncom/interface/lonparmset.pm between versions 1.3 and 1.4

version 1.3, 2000/11/21 22:57:53 version 1.4, 2000/11/22 12:16:03
Line 9 Line 9
 #  #
 # 10/11,10/12,10/16 Gerd Kortemeyer)  # 10/11,10/12,10/16 Gerd Kortemeyer)
 #  #
 # 11/20,11/21 Gerd Kortemeyer  # 11/20,11/21,11/22 Gerd Kortemeyer
   
 package Apache::lonparmset;  package Apache::lonparmset;
   
Line 17  use strict; Line 17  use strict;
 use Apache::lonnet;  use Apache::lonnet;
 use Apache::Constants qw(:common :http REDIRECT);  use Apache::Constants qw(:common :http REDIRECT);
 use GDBM_File;  use GDBM_File;
   use Apache::lonmeta;
   
   
 my %courseopt;  my %courseopt;
 my %useropt;  my %useropt;
Line 201  sub handler { Line 203  sub handler {
  if ($uhome eq 'no_host') {   if ($uhome eq 'no_host') {
             $r->print($message);              $r->print($message);
          }           }
    $r->print('<table border=2>');
   map {    map {
      $r->print($_.'<br>');      $r->print('<tr>');
   # ------------------------------------------------------ Entry for one resource
               my %metadata=&Apache::lonmeta::unpackagemeta(
     &Apache::lonnet::getfile('/home/httpd/html/'.$bighash{'src_'.$_}.'.meta'),1);
               map {
                   if ($_=~/^parameter\_(\d+)\_(\w+)\_\_dis\_\_(.+)$/) {
       my $part=$1;
                       my $name=$2;
                       my $display=$3;
                       my $type=$metadata{$_};
                   }
               } keys %metadata;
   # -------------------------------------------------- End entry for one resource
               $r->print('</tr>');
  } @ids;   } @ids;
          $r->print('</body></html>');           $r->print('</table></body></html>');
          untie(%bighash);           untie(%bighash);
  untie(%parmhash);   untie(%parmhash);
       }        }

Removed from v.1.3  
changed lines
  Added in v.1.4


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
500 Internal Server Error

Internal Server Error

The server encountered an internal error or misconfiguration and was unable to complete your request.

Please contact the server administrator at root@localhost to inform them of the time this error occurred, and the actions you performed just before this error.

More information about this error may be available in the server error log.