Fixed typos, issue #760

git-svn-id: svn://192.168.202.10@2117 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2014-05-13 00:37:04 +00:00
parent 5834630833
commit 16b072fdd8
+8 -7
View File
@@ -1,6 +1,6 @@
#!/usr/bin/perl
#
# AST_DB_dead_cb_purge.pl version 2.6
# AST_DB_dead_cb_purge.pl version 2.8
#
# DESCRIPTION:
# OPTIONAL!!!
@@ -9,12 +9,13 @@
#
# It is recommended that you run this program on the local Asterisk machine
#
# Copyright (C) 2013 Matt Florell <vicidial@gmail.com> LICENSE: AGPLv2
# Copyright (C) 2014 Matt Florell <vicidial@gmail.com> LICENSE: AGPLv2
#
# CHANGES
# 101128-0149 - first build
# 110212-2343 - added scheduled callback custom statuses capacity
# 130414-2145 - added option to remove duplicate callback entries, keeping the newest
# 140512-2036 - Fixed typos, issue #760
#
### begin parsing run-time options ###
@@ -40,11 +41,11 @@ if (length($ARGV[0])>1)
}
else
{
if ($args =~ /-quiet/i)
if ($args =~ /--quiet/i)
{
$Q=1;
}
if ($args =~ /-purge-non-cb/i)
if ($args =~ /--purge-non-cb/i)
{
$purge_non_cb=1;
}
@@ -52,15 +53,15 @@ if (length($ARGV[0])>1)
{
$remove_dup_cb=1;
}
if ($args =~ /-debug/i)
if ($args =~ /--debug/i)
{
$DB=1; # Debug flag, set to 0 for no debug messages, On an active system this will generate hundreds of lines of output per minute
}
if ($args =~ /-debugX/i)
if ($args =~ /--debugX/i)
{
$DBX=1; # Debug flag, set to 0 for no debug messages, On an active system this will generate hundreds of lines of output per minute
}
if ($args =~ /-test/i)
if ($args =~ /--test/i)
{
$TEST=1;
$T=1;