[ macperl-Bugs-486245 ] OS error -111 during DoAppleScript

Bugs item #486245, was opened at 2001-11-27 15:21
You can respond by visiting: 
http://sourceforge.net/tracker/?func=detail&atid=107940&aid=486245&group_id=7940

Category: None
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: Axel Rose (axelrose)
Assigned to: Nobody/Anonymous (nobody)
Summary: OS error -111 during DoAppleScript


Initial Comment:
The test script below results in an OS error -111 message
but only from time to time, though reliably.

It couldn't find circumstances which lead to this.
The error may disappears after running the script again
in the same MacPerl session but may also reappear after
restarting MacPerl.


	my $script = <<eos;
tell application "$^X"
	save file "$self->{file}" ¬
	in file "$self->{outputdir}:$self->{outputfile}" as Runtime
end tell
eos
	MacPerl::DoAppleScript( $script ) or die "$^E\n$script\n";

# Attempt to operate on a free block (OS error -111)
# tell application "MacPerl"
# 	save file "Festplatte:Desktop Folder:perl:module-finder:t:t3.pm" ¬
# 	in file "Festplatte:Desktop Folder:perl:module-finder:t:t3 ƒ:t3" as Runtime
# end tell
# 

----------------------------------------------------------------------

You can respond by visiting: 
http://sourceforge.net/tracker/?func=detail&atid=107940&aid=486245&group_id=7940