Commit bb58c9d5 authored by Leigh B Stoller's avatar Leigh B Stoller

Fix ssh command; set the Kex Exchange algo.

parent 1ae826a2
#!/usr/bin/perl -W
#
# Copyright (c) 2010 University of Utah and the Flux Group.
# Copyright (c) 2010, 2018 University of Utah and the Flux Group.
#
# {{{EMULAB-LGPL
#
......@@ -214,7 +214,8 @@ sub createExpectObject($)
{
my $self = shift;
my $spawn_cmd = "ssh -l admin $self->{NAME}";
my $spawn_cmd = "ssh -l admin ".
"-o KexAlgorithms=+diffie-hellman-group1-sha1 $self->{NAME}";
# Create Expect object and initialize it:
my $exp = new Expect();
if (!$exp) {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment