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
SQLHierarchies
SQLGroupList
GetMaxLenght
GetMaxLength
);
%EXPORT_TAGS = ( TimePeriods => [qw(GetTimePeriod LastMonth CheckMonth SplitPeriod ListMonth)],
Output => [qw(OutputData FormatOutput)],
SQLHelper => [qw(SQLHierarchies SQLGroupList GetMaxLenght)]);
SQLHelper => [qw(SQLHierarchies SQLGroupList GetMaxLength)]);
$VERSION = '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
### IN : $DBHandle : database handel

4
groupstats.pl
View file

@ -3,7 +3,7 @@
# groupstats.pl
#
# This script will get statistical data on newgroup usage
# form a database.
# from a database.
#
# 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
# 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);
# -b (best of / top list) defined?