Last change
on this file since 1987 was
1785,
checked in by broder, 16 years ago
|
Applescript for Mac users of kdo to open a tab for each server and connect
|
File size:
936 bytes
|
Rev | Line | |
---|
[1785] | 1 | set hosts to {"citadel-station.mit.edu", "aperture-science.mit.edu", "shadow-moses.mit.edu", "arklay-mansion.mit.edu", "xvm.mit.edu", "xvm-remote.mit.edu", "xvm-console.mit.edu"} |
---|
| 2 | |
---|
| 3 | tell application "Terminal" |
---|
| 4 | activate |
---|
| 5 | tell application "System Events" to tell process "Terminal" to keystroke "n" using command down |
---|
| 6 | |
---|
| 7 | set onFirst to true |
---|
| 8 | repeat with host in hosts |
---|
| 9 | if onFirst is true then |
---|
| 10 | set onFirst to false |
---|
| 11 | do script with command "kdo ${ATHENA_USER:-$USER}/root </dev/null >/dev/null" in selected tab of the first window |
---|
| 12 | else |
---|
| 13 | tell application "System Events" to tell process "Terminal" to keystroke "t" using command down |
---|
| 14 | end if |
---|
| 15 | do script with command "kdo ${ATHENA_USER:-$USER}/root ssh -o GSSAPIDelegateCredentials=no root@" & host in selected tab of the front window |
---|
| 16 | do script with command "aptitude update && aptitude dist-upgrade --without-recommends" in selected tab of the front window |
---|
| 17 | end repeat |
---|
| 18 | end tell |
---|
Note: See
TracBrowser
for help on using the repository browser.