thh/newsstats
1
0
Fork 0
Code Issues 4 Pull requests Packages Projects Releases Activity

Fix some typos.

Browse source 
groupsstats.pl: Fix typo in lead-in comment.
groupsstats.pl/NewsStats.pm: Fix typo concerning
GetMaxLength - it isn't 'GetMaxLenght' ...

Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
Thomas Hochstein 2010-11-01 01:18:33 +01:00
parent 71f0178b2a
commit d3b6810d3d
2 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
NewsStats.pm
View file

@ -36,11 +36,11 @@ require Exporter;
FormatOutput FormatOutput
SQLHierarchies SQLHierarchies
SQLGroupList SQLGroupList
GetMaxLenght GetMaxLength
); );
%EXPORT_TAGS = ( TimePeriods => [qw(GetTimePeriod LastMonth CheckMonth SplitPeriod ListMonth)], %EXPORT_TAGS = ( TimePeriods => [qw(GetTimePeriod LastMonth CheckMonth SplitPeriod ListMonth)],
Output => [qw(OutputData FormatOutput)], Output => [qw(OutputData FormatOutput)],
SQLHelper => [qw(SQLHierarchies SQLGroupList GetMaxLenght)]); SQLHelper => [qw(SQLHierarchies SQLGroupList GetMaxLength)]);
$VERSION = '0.01'; $VERSION = '0.01';
our $PackageVersion = '0.01'; our $PackageVersion = '0.01';
@ -412,7 +412,7 @@ sub SQLHierarchies {
}; };
################################################################################ ################################################################################
sub GetMaxLenght { sub GetMaxLength {
################################################################################ ################################################################################
### get length of longest field in future query result ### get length of longest field in future query result
### IN : $DBHandle : database handel ### IN : $DBHandle : database handel

4
groupstats.pl
View file

@ -3,7 +3,7 @@
# groupstats.pl # groupstats.pl
# #
# This script will get statistical data on newgroup usage # This script will get statistical data on newgroup usage
# form a database. # from a database.
# #
# It is part of the NewsStats package. # It is part of the NewsStats package.
# #
@ -151,7 +151,7 @@ my $WhereClause = sprintf('month BETWEEN ? AND ? AND %s AND %s %s',$QueryGroupLi
# get length of longest newsgroup delivered by query for formatting purposes # get length of longest newsgroup delivered by query for formatting purposes
# FIXME # FIXME
my $MaxLength = &GetMaxLenght($DBHandle,$Conf{'DBTableGrps'},'newsgroup',$WhereClause,$StartMonth,$EndMonth,(@GroupList,@Params)); my $MaxLength = &GetMaxLength($DBHandle,$Conf{'DBTableGrps'},'newsgroup',$WhereClause,$StartMonth,$EndMonth,(@GroupList,@Params));
my ($OrderClause,$DBQuery); my ($OrderClause,$DBQuery);
# -b (best of / top list) defined? # -b (best of / top list) defined?