diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2005-10-11 17:48:49 +0300 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-10-11 11:30:22 +0000 |
| commit | d32793394506cce30e5ae4fb6827bb6a2d170dd1 (patch) | |
| tree | 58d51db611f0ef046991a427fd1625306ba2845a /symbian | |
| parent | 7043dac286be2ce0ee23303b16692db73651f3ae (diff) | |
| download | perl-d32793394506cce30e5ae4fb6827bb6a2d170dd1.tar.gz | |
Symbian blead fix
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F24E7A5D4@esebe105.NOE.Nokia.com>
p4raw-id: //depot/perl@25736
Diffstat (limited to 'symbian')
| -rw-r--r-- | symbian/PerlApp.cpp | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/symbian/PerlApp.cpp b/symbian/PerlApp.cpp index 8be786b2f8..2c5883ae4e 100644 --- a/symbian/PerlApp.cpp +++ b/symbian/PerlApp.cpp @@ -458,8 +458,13 @@ TBool CPerlAppUi::ProcessCommandParametersL(TApaCommand aCommand, TFileName& /* TFileName appName = Application()->AppFullName(); TParse p; p.Set(KDefaultScript, &appName, NULL); - DoRunScriptL(p.FullName()); - return EFalse; + TEntry aEntry; + RFs aFs; + aFs.Connect(); + if (aFs.Entry(p.FullName(), aEntry) == KErrNone) { + DoRunScriptL(p.FullName()); + Exit(); + } } return aCommand == EApaCommandOpen ? ETrue : EFalse; } |