268 |
|
|
269 |
|
sub spawnversion |
270 |
|
{ |
271 |
+ |
############################################################### |
272 |
+ |
# spawnversion # |
273 |
+ |
############################################################### |
274 |
+ |
# modified : Fri Aug 10 15:42:08 2001 / SFA # |
275 |
+ |
# params : # |
276 |
+ |
# : # |
277 |
+ |
# : # |
278 |
+ |
# : # |
279 |
+ |
# function : Check for version of scram to run, and run it. # |
280 |
+ |
# : # |
281 |
+ |
# : # |
282 |
+ |
############################################################### |
283 |
+ |
|
284 |
|
my $self=shift; |
285 |
|
my $version=shift; |
286 |
|
my $rv=0; |