diff options
| author | Miro Jurisic <meeroh@mit.edu> | 1999-05-27 20:48:41 +0000 |
|---|---|---|
| committer | Miro Jurisic <meeroh@mit.edu> | 1999-05-27 20:48:41 +0000 |
| commit | bcbbc106a28254cb10acdb88a3d0c90e1799d184 (patch) | |
| tree | 5fae5eb322a14ad4f471e57864194ba7d9542ae7 /src/mac/RunAppleScript.pl | |
| parent | 0e6789171f43dd5c029aa76eb61050a51c8da9d4 (diff) | |
| download | krb5-bcbbc106a28254cb10acdb88a3d0c90e1799d184.tar.gz krb5-bcbbc106a28254cb10acdb88a3d0c90e1799d184.tar.xz krb5-bcbbc106a28254cb10acdb88a3d0c90e1799d184.zip | |
Removed metric buttload of old Mac crap that hasn't been used for years
git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@11480 dc483132-0cff-0310-8789-dd5450dbe970
Diffstat (limited to 'src/mac/RunAppleScript.pl')
| -rw-r--r-- | src/mac/RunAppleScript.pl | 16 |
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; |