From: ivan <ivan>
Date: Fri, 26 Mar 2004 04:46:54 +0000 (+0000)
Subject: don't depend on Net::Telnet unless necessary
X-Git-Tag: NET_WHOIS_RAW_0_31~26
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=af21dde2210a7584837d9bcc6bb8a43599a9b768;hp=6464c76c549ba420f98e67aaca1c26327a8a2671

don't depend on Net::Telnet unless necessary
---

diff --git a/FS/FS/part_export/router.pm b/FS/FS/part_export/router.pm
index e2cde53d4..648a4372b 100644
--- a/FS/FS/part_export/router.pm
+++ b/FS/FS/part_export/router.pm
@@ -55,7 +55,7 @@ tie my %options, 'Tie::IxHash',
   'svc'     => 'svc_broadband',
   'desc'    => 'Send a command to a router.',
   'options' => \%options,
-  'notes'   => '( more detailed description from Kristian / fire2wire? )',
+  'notes'   => 'Installation of Net::Telnet from CPAN is required for telnet connections.  ( more detailed description from Kristian / fire2wire? )',
 );
 
 @saltset = ( 'a'..'z' , 'A'..'Z' , '0'..'9' , '.' , '/' );
@@ -164,7 +164,8 @@ sub ssh_cmd { #subroutine, not method
 }
 
 sub telnet_cmd {
-  use Net::Telnet;
+  eval 'use Net::Telnet;';
+  die $@ if $@;
 
   warn join(', ', @_);