Last change
on this file since 1856 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
|
Line | |
---|
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.