amassivus/clusterssh
1
0
Fork 0
mirror of https://github.com/duncs/clusterssh.git synced 2025-04-22 09:22:24 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix Alt-n pasting in a resolved hostname instead of the connection hostname

Browse source
This commit is contained in:
duncan_ferguson 2009-06-02 15:03:03 +00:00
parent d14f31e57a
commit 3a366fec70
2 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
clusterssh/ChangeLog
View file

@ -24,6 +24,7 @@
This is until Tk allows for scrollable menus
* Amend default key_addhost from 'Control-plus' to 'Control-Shift-plus'
* Add in a 'default' cluster tag, used when no tags provided on command line
* Fix Alt-n pasting in a resolved hostname instead of the connection hostname
2009-03-26 Duncan Ferguson <duncan_ferguson@user.sf.net> - v3.25-1

8
clusterssh/src/cssh.pl
View file

@ -815,7 +815,7 @@ sub send_text($@) {
sub send_clientname() {
foreach my $svr ( keys(%servers) ) {
send_text( $svr, $servers{$svr}{realname} )
send_text( $svr, $servers{$svr}{givenname} )
if ( $servers{$svr}{active} == 1 );
}
}
@ -997,6 +997,7 @@ sub open_client_windows(@) {
next unless ($_);
my ( $username, $server, $port ) = split_hostname($_);
my $given_server_name = $server;
# see if we can find the hostname - if not, drop it
my $realname = check_host($server);
@ -1031,6 +1032,7 @@ sub open_client_windows(@) {
$server .= q{ } . $count;
$servers{$server}{connect_string} = $_;
$servers{$server}{givenname} = $given_server_name;
$servers{$server}{realname} = $realname;
$servers{$server}{username} = $username;
$servers{$server}{port} = $port || '';
@ -2329,8 +2331,8 @@ names can be entered, separated by spaces.
=item Alt-n
Paste in the specific connection server name to each client, minus any
username or port, i.e.
Paste in the hostname part of the specific connection string to each
client, minus any username or port, i.e.
C<< scp /etc/hosts server:files/<Alt-n>.hosts >>