Moin Ich habe gestern im Linuxmagazin den tcl/tk-kurs gelesen. Dabei kam mir die Idee für ein Programm, daß mich mit einem Mausclick auf verschiedenen Maschinen einloggen kann. Dann habe ic mir ein passendes Beispiel aus dem 'samples' Verzeichnis genommen und es umgeschrieben. Es funktioniert auch ziemlich gut. Dummerweise werden aber immer zwei Fenster geöffnet. Kennt sich jemand mit tcl/tk aus? Hier der Code: #!/bin/sh # \ exec wish "$0" "$@" toplevel .fwssh wm title .fwssh "ssh to a firewall" wm iconname .fwssh "fw-ssh" label .fwssh.msg -wraplength 4i -justify left -text "Please choose a firewall." pack .fwssh.msg -side top frame .fwssh.buttons pack .fwssh.buttons -side bottom -fill x -pady 2m button .fwssh.buttons.dismiss -text Dismiss -command "destroy .fwssh" pack .fwssh.buttons.dismiss -side left -expand 1 frame .fwssh.frame -borderwidth .5c pack .fwssh.frame -side top -expand yes -fill y scrollbar .fwssh.frame.scroll -command ".fwssh.frame.list yview" listbox .fwssh.frame.list -yscroll ".fwssh.frame.scroll set" -setgrid 1 -height 12 pack .fwssh.frame.scroll -side right -fill y pack .fwssh.frame.list -side left -expand 1 -fill both bind .fwssh.frame.list <Double-1> { exec /usr/bin/X11/xterm -ls -sb -rv -e ssh [selection get] -l hajo } .fwssh.frame.list insert 0 ente.mediaways.net \ oma.mediaways.net \ opa.mediaways.net -- Hans-Joachim Hoetger voice: +49-5241-80-88990 mediaWays GmbH NMW-T1 (Technologie) "Gut ist auch des Emporkommen von Linux als Herausforderer von Microsoft." Angela Merkel (Die Zeit, 4.Mai 2000) - Hinweise zur Benutzung dieser (und anderer Mailing-Listen) bitte beachten: --> http://lug-owl.de/mailinglist_hints.html <--
Teilnehmer (1)
-
Hans-Joachim Hoetger