blob: b6f8a7ca110e5dd6f0b1b2e299469fb449ea2713 (
plain)
1
2
3
4
5
6
7
8
9
|
tell application "Finder"
set outputFile to (folder of (path to application "GSSSample.ppc") as string) & "GSS Sample Output"
end tell
tell application "GSSSample.ppc"
activate
Query "-port 13136 dcl.mit.edu sample@dcl.mit.edu hi"
save document "GSS Sample" in file outputFile
end tell
|
