summaryrefslogtreecommitdiffstats
path: root/src/mac/RunAppleScript.pl
diff options
context:
space:
mode:
Diffstat (limited to 'src/mac/RunAppleScript.pl')
-rw-r--r--src/mac/RunAppleScript.pl16
1 files changed, 0 insertions, 16 deletions
diff --git a/src/mac/RunAppleScript.pl b/src/mac/RunAppleScript.pl
deleted file mode 100644
index 8a4828b89..000000000
--- a/src/mac/RunAppleScript.pl
+++ /dev/null
@@ -1,16 +0,0 @@
-use Mac::Components;
-use Mac::OSA;
-use Mac::AppleEvents;
-
-undef $/;
-
-$applescript = OpenDefaultComponent(kOSAComponentType, "ascr") or die "AppleScript not installed";
-$script = AECreateDesc "TEXT", <STDIN>;
-
-$result = OSADoScript($applescript, $script, 0, "TEXT", 0) or die $^E;
-
-print AEPrint($result), "\n";
-
-AEDisposeDesc $result;
-AEDisposeDesc $script;
-CloseComponent $applescript;