Bommels05/Mozilla
Bommels05/Mozilla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

merge in change from Chris Nandor (pudge@pobox.com). Thought scc was

Browse Source 
going to handle this. sorry for the delay.


git-svn-id: svn://10.0.0.236/trunk@13211 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
cyeh%netscape.com 1998-10-20 20:18:13 +00:00
parent f3b963f1b8
commit 16417acbfc
1 changed files with 13 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
mozilla/build/mac/CodeWarriorLib.pm
View File

@ -33,7 +33,7 @@ use Mac::Types;
use File::Basename;
use vars qw($VERSION);
$VERSION = '1.01';
$VERSION = '1.02';
my($app) = 'CWIE';
@ -163,8 +163,9 @@ sub activate () {
foreach $psi (values(%Process)) {
if ($psi->processSignature() eq $app) {
$appath = $psi->processAppSpec(), "\n";
_save_appath($filepath, $appath);
last;
}
_save_appath($filepath, $appath);
}
if ((!$appath || ! -x $appath) && open(F, $filepath)) {
@ -186,9 +187,9 @@ sub activate () {
local(*D);
my $cwd = `pwd`;
$appath = _get_folder(
'Where is the folder containing CodeWarrior IDE?',
'Where is the CW IDE folder?',
dirname($Application{$app})
) . ':';
);
die "CodeWarrior IDE not found.\n" if !$appath;
opendir(D, $appath) or die $!;
chdir($appath);
@ -211,7 +212,10 @@ sub activate () {
launchAppSpec => $appath,
launchControlFlags => launchContinue() + launchNoFileFlags()
);
LaunchApplication($lp) or die $^E;
unless (LaunchApplication($lp)) {
unlink($filepath);
die $^E;
}
}
sub _build ($;$) {
@ -332,6 +336,10 @@ sub _test ($) {
=over 4
=item v1.02, September 23, 1998
Made fixes in finding and saving location of CodeWarrior IDE.
=item v1.01, June 1, 1998
Made fixes to C<chdir()> in C<activate()>, made C<activate()> more robust