Ignore:
Timestamp:
2000-05-12T17:08:42+12:00 (24 years ago)
Author:
sjboddie
Message:

more changes to try to get end-user collection building working
under windows

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsdl/cgi-bin/GSDLHOME.pm

    r1157 r1171  
    33BEGIN {
    44
    5     $ENV{'GSDLHOME'} = '**GSDLHOME**' unless defined $ENV{'GSDLHOME'};
     5    if (!defined $ENV{'GSDLHOME'}) {
     6    # read gsdlhome from gsdlsite.cfg
     7    open (GSDLSITE, "gsdlsite.cfg") || die
     8        "GSDLHOME.pm: unable to open gsdlsite.cfg\n";
     9    my $line = "";
     10    while (defined ($line = <GSDLSITE>)) {
     11        if ($line =~ /^gsdlhome\s+(.*?)\s*$/) {
     12        $ENV{'GSDLHOME'} = $1;
     13        last;
     14        }
     15    }
     16    die "GSDLHOME.pm: couldn't find gsdlhome field in gsdlsite.cfg\n"
     17        unless defined $ENV{'GSDLHOME'};
     18    }
    619
    720    # just in case GSDLHOME has a slash on the end which would cause
Note: See TracChangeset for help on using the changeset viewer.