diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2005-11-07 15:32:15 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-11-07 11:39:57 +0000 |
| commit | d0d72822ba0a68d160ea4c98ca80f24b8f73969b (patch) | |
| tree | 735ce6a98b4d91d05a26f9573f8e62ca8f91738f /symbian/sanity.pl | |
| parent | 7d0beb42a2610634ab455d4519a64df3ca90bc2f (diff) | |
| download | perl-d0d72822ba0a68d160ea4c98ca80f24b8f73969b.tar.gz | |
Symbian update blead@26025
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F24E7A70C@esebe105.NOE.Nokia.com>
p4raw-id: //depot/perl@26030
Diffstat (limited to 'symbian/sanity.pl')
| -rw-r--r-- | symbian/sanity.pl | 27 |
1 files changed, 15 insertions, 12 deletions
diff --git a/symbian/sanity.pl b/symbian/sanity.pl index 4d00ac0532..6487c575c3 100644 --- a/symbian/sanity.pl +++ b/symbian/sanity.pl @@ -3,21 +3,24 @@ use strict; if (exists $ENV{'!C:'}) { print "You are running this under Cygwin, aren't you? (found '!C' in %ENV)\n"; print "Are you perhaps using Cygwin Perl? (\$^O is '$^O')\n" if $^O =~ /cygwin/; - print "I'm sorry but only cmd.exe will work.\n"; + print "I'm sorry but only cmd.exe with e.g. the ActivePerl will work.\n"; exit(1); } -if (# S60 2.x or S80 2.x - $ENV{PATH} !~ m!\\program files\\common files\\symbian\\tools!i - && - # S60 1.2 - $ENV{PATH} !~ m!\\symbian\\6.1\\shared\\epoc32\\tools!i - && - # UIQ - $ENV{PATH} !~ m!\\symbian\\uiq.+?\\epoc32!i - ) { - print "I do not think you have installed the Symbian SDK.\n"; - exit(1); +unless(# S60 2.x + $ENV{PATH} =~ m!\\program files\\common files\\symbian\\tools!i + || + # S60 1.2 + $ENV{PATH} =~ m!\\symbian\\6.1\\shared\\epoc32\\tools!i + || + # S80 + $ENV{PATH} =~ m!\\s80_.+?\\epoc32\\!i + || + # UIQ + $ENV{PATH} =~ m!\\uiq_.+?\\epoc32\\!i + ) { + print "I do not think you have installed a Symbian SDK, your PATH is:\n$ENV{PATH}\n"; + exit(1); } unless (-f "symbian/symbianish.h") { |