===================================================================
RCS file: /cvs/trango/Net-Telnet-Trango/lib/Net/Telnet/Trango.pm,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -r1.30 -r1.31
--- trango/Net-Telnet-Trango/lib/Net/Telnet/Trango.pm	2007/02/02 17:51:52	1.30
+++ trango/Net-Telnet-Trango/lib/Net/Telnet/Trango.pm	2007/02/02 18:54:22	1.31
@@ -1,5 +1,5 @@
 package Net::Telnet::Trango;
-# $RedRiver: Trango.pm,v 1.29 2007/02/01 17:58:33 andrew Exp $
+# $RedRiver: Trango.pm,v 1.30 2007/02/02 17:51:52 andrew Exp $
 use strict;
 use warnings;
 use base 'Net::Telnet';
@@ -329,6 +329,12 @@
 
   $t->su_info($suid);
 
+=item B<su_testrflink>
+
+- tests the RF Link to an su
+
+  $t->su_testrflink($suid|'all');
+
 =item B<save_ss>
 
 - saves the config.  
@@ -355,6 +361,7 @@
   maclist_reset => { String => 'maclist reset', expect => 'done' },
   eth_link    => { String => 'eth link', expect => $success },
   su_info     => { String => 'su info', decode => 'all', expect => $success },
+  su_testrflink => { String => 'su testrflink', decode => 'all', expect => $success },
   save_ss     => { String => 'save ss', expect => $success },
   opmode      => { decode => 'all',   expect => $success },
   # eth r, w and reset???