cross-plat-dev-utils/fix_epoc32.pl
changeset 2 39c28ec933dd
child 40 68f68128601f
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/cross-plat-dev-utils/fix_epoc32.pl	Mon May 10 19:54:49 2010 +0100
@@ -0,0 +1,24 @@
+#!/usr/bin/perl
+# Copyright (c) 2010 Symbian Foundation Ltd
+# This component and the accompanying materials are made available
+# under the terms of the License "Eclipse Public License v1.0"
+# which accompanies this distribution, and is available
+# at the URL "http://www.eclipse.org/legal/epl-v10.html".
+#
+# Initial Contributors:
+# Mike Kinghan, mikek@symbian.org for Symbian Foundation Ltd - initial contribution.
+
+# Script to patch the epoc32 tree as required.
+
+use strict;
+use check_os;
+use perl_run;
+
+if (os_is_windows()) {
+	exit perl_run("fix_epoc32_win.pl @ARGV");
+}
+if (os_is_linux()) {
+	exit perl_run("fix_epoc32_linux.pl @ARGV");
+}
+die "*** Unsupported OS $^O ***";
+