summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2015-11-13 13:05:02 -0800
committerIvan Kohler <ivan@freeside.biz>2015-11-13 13:05:02 -0800
commit655d0f5576a9a5e217c3ea5930a96b47831884f4 (patch)
tree3d294cd5ef15da42bd61f18045d08e158f4bb8cc
parent410d81606237abe4ab1c916239bd2c5b884b5032 (diff)
no need for runtime dep on Net::OpenSSH
-rw-r--r--FS/FS/part_export/cardfortress.pm6
1 files changed, 1 insertions, 5 deletions
diff --git a/FS/FS/part_export/cardfortress.pm b/FS/FS/part_export/cardfortress.pm
index 154f979..8c94135 100644
--- a/FS/FS/part_export/cardfortress.pm
+++ b/FS/FS/part_export/cardfortress.pm
@@ -4,6 +4,7 @@ use strict;
use base 'FS::part_export';
use vars qw( %info );
use String::ShellQuote;
+use Net::OpenSSH;
#tie my %options, 'Tie::IxHash';
#;
@@ -21,8 +22,6 @@ sub rebless { shift; }
sub _export_insert {
my($self, $svc_acct) = (shift, shift);
- eval "use Net::OpenSSH;";
- return $@ if $@;
open my $def_in, '<', '/dev/null' or die "unable to open /dev/null";
my $ssh = Net::OpenSSH->new( $self->machine,
@@ -61,9 +60,6 @@ sub _export_delete {
#well, we're just going to disable them for now, but there you go
- eval "use Net::OpenSSH;";
- return $@ if $@;
-
open my $def_in, '<', '/dev/null' or die "unable to open /dev/null";
my $ssh = Net::OpenSSH->new( $self->machine,
default_stdin_fh => $def_in );