summaryrefslogtreecommitdiff
path: root/ACE/bin/PerlACE/TestTarget_WinCE.pm
diff options
context:
space:
mode:
Diffstat (limited to 'ACE/bin/PerlACE/TestTarget_WinCE.pm')
-rw-r--r--ACE/bin/PerlACE/TestTarget_WinCE.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/ACE/bin/PerlACE/TestTarget_WinCE.pm b/ACE/bin/PerlACE/TestTarget_WinCE.pm
index b1d650e5c88..17e736c95da 100644
--- a/ACE/bin/PerlACE/TestTarget_WinCE.pm
+++ b/ACE/bin/PerlACE/TestTarget_WinCE.pm
@@ -18,6 +18,7 @@ use PerlACE::TestTarget;
use PerlACE::ProcessVX;
use File::Copy;
use Cwd;
+use English;
our @ISA = qw(PerlACE::TestTarget);
@@ -107,8 +108,11 @@ sub LocalFile {
sub CreateProcess {
my $self = shift;
- my $process = new PerlACE::ProcessVX ($self, @_);
- return $process;
+if ($OSNAME eq "MSWin32") {
+ my $process = new PerlACE::ProcessVX ($self, @_); return $process;
+} else {
+ my $process = new PerlACE::ProcessVX (@_, $self); return $process;
+}
}
# Need a reboot when this target is destroyed.