#!/usr/local/perl
# $HopeName: MMQA_harness!script:dirs(trunk.3) $
#
# harness_init is called from qa after loading everything in,
# but before calling the command
#

1;

sub harness_init {
 &platform_detect;
 &process_options;
 &set_dirs;
 &platform_settings;
 &identify;
 &auto_settings;
 &platform_settings;
}