On Friday, December 13, 2002, at 10:50 AM, Chris Nandor wrote:
Okay, I installed the 0.02 binaries, and then one-liner above worked fine.At 10:35 +1100 2002.12.13, Ken Williams wrote:Hm. That's in AEMach.h. This is the workaround I was using to get AESendChris, do you know where 'keyReplyPortAttr' is defined?
to work at all on Mac OS X. If that won't work, I wonder if even
precompiled binaries will work.
To see if it will, use the 0.02 binaries you have installed and try this
one-liner:
% perl -MMac::AppleEvents -e '$e = AEBuildAppleEvent(qw(misc actv sign MACS
-1 0), ""); AESend($e, kAEWaitReply); AEDisposeDesc($e)'
It should activate the Finder, then the script should exit.
The EU::MM shipped with perl 5.6.1 doesn't have the ExtUtils::Command::MM package, so you might want to mention that an ExtUtils::MakeMaker upgrade may be required in order to run the tests manually. Or there's probably another way to write that one-liner that works with older EU::MMs.
After upgrading EU::MM (this is a different computer than I was using a few days ago), I ran the test suite from the 0.02_01 source and got the following warnings & failures:
====================================================================
MacPerl/t/MacPerl..............1..13
ok 1 - Volumes: FF9C00000001:Snowdrop
ok 2 - MakePath: /
ok 3 - MakeFSSpec
Argument "10.1.2" isn't numeric in numeric ge (>=) at MacPerl/t/MacPerl.t line 40.
ok 4 - Finder v10.1.2
ok 5 - creator of '/System/Library/CoreServices/Finder'
ok 6 - type of '/System/Library/CoreServices/Finder'
ok 7 - creator of './foo'
ok 8 - type of './foo'
ok 9 - creator of './foo'
ok 10 - type of './foo'
Use of uninitialized value in pattern match (m//) at /Library/Perl/darwin/MacPerl.pm line 144.
Use of uninitialized value in substitution (s///) at /Library/Perl/darwin/MacPerl.pm line 145.
Use of uninitialized value in substitution (s///) at /Library/Perl/darwin/MacPerl.pm line 146.
not ok 11 - Pick()
# Failed test (MacPerl/t/MacPerl.t at line 88)
# got: undef
# expected: '3'
Use of uninitialized value in pattern match (m//) at /Library/Perl/darwin/MacPerl.pm line 125.
Use of uninitialized value in substitution (s///) at /Library/Perl/darwin/MacPerl.pm line 126.
Use of uninitialized value in substitution (s///) at /Library/Perl/darwin/MacPerl.pm line 127.
# Failed test (MacPerl/t/MacPerl.t at line 91)
# got: 'ken'
# expected: undef
not ok 12 - Ask()
Use of uninitialized value in substitution (s///) at /Library/Perl/darwin/MacPerl.pm line 107.
Use of uninitialized value in substitution (s///) at /Library/Perl/darwin/MacPerl.pm line 108.
Use of uninitialized value in string eq at /Library/Perl/darwin/MacPerl.pm line 110.
Use of uninitialized value in string eq at /Library/Perl/darwin/MacPerl.pm line 110.
Use of uninitialized value in string eq at /Library/Perl/darwin/MacPerl.pm line 110.
not ok 13 - Answer()
# Failed test (MacPerl/t/MacPerl.t at line 94)
# got: ''
# expected: '1'
# Looks like you failed 3 tests of 13.
dubious
Test returned status 3 (wstat 768, 0x300)
DIED. FAILED tests 11-13
Failed 3/13 tests, 76.92% okay
Notification/t/Notification....1..10
Can't call method "processLauncher" on an undefined value at Notification/t/Notification.t line 27.
# Looks like your test died before it could output anything.
dubious
Test returned status 206 (wstat 52736, 0xce00)
DIED. FAILED tests 1-10
Failed 10/10 tests, 0.00% okay
Processes/t/Processes..........1..6
ok 1 - check process paths
not ok 2 - psn == pid
# Failed test (Processes/t/Processes.t at line 22)
# got: undef
# expected: '1916'
not ok 3 - pid == psn
# Failed test (Processes/t/Processes.t at line 23)
# got: undef
# expected: '0'
Use of uninitialized value in subroutine entry at Processes/t/Processes.t line 24.
ok 4 - SameProcess(psn, pid)
Can't call method "processLauncher" on an undefined value at Processes/t/Processes.t line 28.
# Looks like you planned 6 tests but only ran 4.
# Looks like your test died just after 4.
dubious
Test returned status 255 (wstat 65280, 0xff00)
DIED. FAILED tests 2-3, 5-6
Failed 4/6 tests, 33.33% okay
Failed Test Stat Wstat Total Fail Failed List of Failed
-------------------------------------------------------------------------------
MacPerl/t/MacPerl.t 3 768 13 3 23.08% 11-13
Notification/t/Notification.t 206 52736 10 10 100.00% 1-10
Processes/t/Processes.t 255 65280 6 4 66.67% 2-3 5-6
Failed 3/13 test scripts, 76.92% okay. 17/85 subtests failed, 80.00% okay.
====================================================================
I didn't see any dialog boxes during the MacPerl test.
Again for the record, this is perl 5.6.1 and OS X 10.1.5.
-Ken
