Changeset 14973

Show
Ignore:
Timestamp:
12.02.2008 15:40:39 (11 years ago)
Author:
davidb
Message:

Position of require "/perllib/util.pm"; reloated to assist with earlier call to &util::filename_cat

Files:
1 modified

Legend:

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

    r14220 r14973  
    193193    my $gsdlhome = $self->get_config_info("gsdlhome"); 
    194194 
    195     require "$gsdlhome/perllib/util.pm"; 
    196  
    197195    $gsdlhome =~ s/(\/|\\)$//; # remove trailing slash 
    198196 
     
    230228    $ENV{'GSDLHOME'} = $gsdlhome; 
    231229    $ENV{'GSDLOS'} = $gsdlos; 
     230 
     231    require "$gsdlhome/perllib/util.pm"; 
    232232 
    233233    my $gsdl_bin_script = &util::filename_cat($gsdlhome,"bin","script");