Diff for /loncom/Attic/lchtmldir between versions 1.19 and 1.22

version 1.19, 2007/08/22 19:03:04 version 1.22, 2010/10/12 09:53:45
Line 2 Line 2
   
 # The Learning Online Network with CAPA  # The Learning Online Network with CAPA
 #  #
   # $Id$
   #
 # Copyright Michigan State University Board of Trustees  # Copyright Michigan State University Board of Trustees
 #  #
 # This file is part of the LearningOnline Network with CAPA (LON-CAPA).  # This file is part of the LearningOnline Network with CAPA (LON-CAPA).
Line 76  use LONCAPA qw(:match); Line 78  use LONCAPA qw(:match);
 $ENV{'PATH'} = '/bin:/usr/bin:/usr/local/sbin:/home/httpd/perl';  $ENV{'PATH'} = '/bin:/usr/bin:/usr/local/sbin:/home/httpd/perl';
 delete @ENV{qw{IFS CDPATH ENV BASH_ENV}};  delete @ENV{qw{IFS CDPATH ENV BASH_ENV}};
   
 my $DEBUG = 1;                         # .nonzero -> Debug printing enabled.  my $DEBUG = 0;                         # .nonzero -> Debug printing enabled.
 my $path_sep = "/"; # Unix like operating systems.  my $path_sep = "/"; # Unix like operating systems.
   
   
Line 86  if ($DEBUG) { Line 88  if ($DEBUG) {
     print("Checking uid...\n");      print("Checking uid...\n");
 }  }
 my $wwwid = getpwnam('www');  my $wwwid = getpwnam('www');
 &DisableRoot;  
 if($wwwid != $>) {  if($wwwid != $<) {
     if ($DEBUG) {      if ($DEBUG) {
  print("User ID incorrect.  This program must be run as user 'www'\n");   print("User ID incorrect.  This program must be run as user 'www'\n");
     }      }
Line 127  if( $authentication ne "unix:"     && Line 129  if( $authentication ne "unix:"     &&
     $authentication ne "localauth:") {      $authentication ne "localauth:") {
     if($DEBUG) {      if($DEBUG) {
  print("Invalid authentication parameter: ".$authentication."\n");   print("Invalid authentication parameter: ".$authentication."\n");
  print("Should be one of: unix, internal, krb4, localauth\n");   print("Should be one of-- unix: internal: krb4: krb5: localauth:\n");
     }      }
     exit 3;      exit 3;
 }  }

Removed from v.1.19  
changed lines
  Added in v.1.22


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