$args{selenium_rc}{port} = $ENV{SELENIUM_RC_PORT};
$args{selenium_rc}{start} = $ENV{SELENIUM_RC_START};
}
+ $args{selenium_rc}{xvnc_display} //= '0';
my $self = \%args;
bless $self, $class;
}
my($self) = @_;
if($self->{selenium_rc}{start}) {
$self->{selenium_rc}{xvnc_server_proc} = Child->new(sub {
- system('ssh', $self->{selenium_rc}{host}, 'vncserver');
+ system('ssh', $self->{selenium_rc}{host}, 'vncserver',
+ ":$self->{selenium_rc}{xvnc_display}");
}
);
$self->{selenium_rc}{xvnc_server_proc}->start;