Changeset 14329 for gsdl

Timestamp:

2007-08-07T10:01:08+12:00 (17 years ago)

Author:

qq6

Message:

deleted BEGIN{} for GS3

File:

• gsdl/trunk/perllib/util.pm (modified) (1 diff)

gsdl/trunk/perllib/util.pm

@@ -26 +26 @@
 package util;
 
-BEGIN {                                                             
-    die "GSDLHOME not set\n" unless defined $ENV{'GSDLHOME'};       
-    die "GSDLOS not set\n" unless defined $ENV{'GSDLOS'};           
-    unshift (@INC, "$ENV{'GSDLHOME'}/perllib");                     
-    unshift (@INC, "$ENV{'GSDLHOME'}/perllib/cpan");                
-}                                                                   
 use File::Copy;
 use File::Basename;
-#use Win32::Hardlink;
 
 # removes files (but not directories)