ViciDial/agc_2-X
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added note about required version of Perl module Net Telnet 3.0.4. Must upgrade if using version older than April 21, 2013.

Browse Source 
Disabled telnet logging in two of the new AMI2 scripts

git-svn-id: svn://192.168.202.10@2818 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2017-09-21 22:36:21 +00:00
parent 7c00875818
commit efc974d2c7
3 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
UPGRADE
+4
View File
@@ -200,6 +200,10 @@ OTHER CHANGES:
48. Added System Settings option to set lists to inactive once they pass their 48. Added System Settings option to set lists to inactive once they pass their
expiration date expiration date
49. NEW REQUIREMENT!!! Perl CPAN Net::Telnet version 3.0.4(April 21, 2013)
If you are using an older Net::Telnet version, you will need to upgrade!
this should take just two commands: "cpan" and "install Net::Telnet"
bin/AST_manager_listen_AMI2.pl
+1 -1
View File
@@ -195,7 +195,7 @@ $tn = new Net::Telnet (
); );
$LItelnetlog = "$PATHlogs/listen_telnet_log.txt"; # uncomment for telnet log $LItelnetlog = "$PATHlogs/listen_telnet_log.txt"; # uncomment for telnet log
$fh = $tn->dump_log("$LItelnetlog"); # uncomment for telnet log #$fh = $tn->dump_log("$LItelnetlog"); # uncomment for telnet log
if (length($ASTmgrUSERNAMElisten) > 3) {$telnet_login = $ASTmgrUSERNAMElisten;} if (length($ASTmgrUSERNAMElisten) > 3) {$telnet_login = $ASTmgrUSERNAMElisten;}
else {$telnet_login = $ASTmgrUSERNAME;} else {$telnet_login = $ASTmgrUSERNAME;}
$tn->open("$telnet_host"); $tn->open("$telnet_host");
bin/AST_update_AMI2.pl
+1 -1
View File
@@ -232,7 +232,7 @@ $tn = new Net::Telnet (
); );
$UPtelnetlog = "$PATHlogs/update_telnet_log.txt"; # uncomment for telnet log $UPtelnetlog = "$PATHlogs/update_telnet_log.txt"; # uncomment for telnet log
$fh = $tn->dump_log("$UPtelnetlog"); # uncomment for telnet log #$fh = $tn->dump_log("$UPtelnetlog"); # uncomment for telnet log
if (length($ASTmgrUSERNAMEupdate) > 3) {$telnet_login = $ASTmgrUSERNAMEupdate;} if (length($ASTmgrUSERNAMEupdate) > 3) {$telnet_login = $ASTmgrUSERNAMEupdate;}
else {$telnet_login = $ASTmgrUSERNAME;} else {$telnet_login = $ASTmgrUSERNAME;}