|
Lines 74-83
Link Here
|
| 74 |
#use Thread 'yield'; # Should be uncommented if you have Thread.pm (untested) |
74 |
#use Thread 'yield'; # Should be uncommented if you have Thread.pm (untested) |
| 75 |
|
75 |
|
| 76 |
if (defined $ENV{CWS_WORK_STAMP}) { |
76 |
if (defined $ENV{CWS_WORK_STAMP}) { |
| 77 |
use lib ("$ENV{SOLARENV}/bin/modules", "$ENV{COMMON_ENV_TOOLS}/modules"); |
77 |
require lib; import lib ("$ENV{SOLARENV}/bin/modules", "$ENV{COMMON_ENV_TOOLS}/modules"); |
| 78 |
use Cws; |
78 |
require Cws; import Cws; |
| 79 |
use CvsModule; |
79 |
require CvsModule; import CvsModule; |
| 80 |
use GenInfoParser; |
80 |
require GenInfoParser; import GenInfoParser; |
| 81 |
}; |
81 |
}; |
| 82 |
|
82 |
|
| 83 |
#### script id ##### |
83 |
#### script id ##### |
|
Lines 91-97
Link Here
|
| 91 |
print "$script_name -- version: $script_rev\n"; |
91 |
print "$script_name -- version: $script_rev\n"; |
| 92 |
|
92 |
|
| 93 |
if ($ENV{GUI} eq 'UNX') { |
93 |
if ($ENV{GUI} eq 'UNX') { |
| 94 |
use Cwd 'chdir'; |
94 |
require Cwd; import Cwd 'chdir'; |
| 95 |
}; |
95 |
}; |
| 96 |
|
96 |
|
| 97 |
######################### |
97 |
######################### |