Project Aon Git Repositories
/
project-aon.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fixing condition in gblint.pl that leads to undefined section; adding sections found...
[project-aon.git]
/
common
/
scripts
/
gblint.pl
diff --git
a/common/scripts/gblint.pl
b/common/scripts/gblint.pl
index
c824503
..
0caf1b4
100755
(executable)
--- a/
common/scripts/gblint.pl
+++ b/
common/scripts/gblint.pl
@@
-70,6
+70,13
@@
my %sectionDocLookup = (
'howcarry' => 'equipmnt',
'howmuch' => 'equipmnt',
'howuse' => 'equipmnt',
'howcarry' => 'equipmnt',
'howmuch' => 'equipmnt',
'howuse' => 'equipmnt',
+ 'backpack' => 'equipmnt',
+ 'ammpouch' => 'equipmnt',
+ 'medikit' => 'equipmnt',
+ 'canteen' => 'equipmnt',
+ 'weapons' => 'weapons',
+ 'close' => 'weapons',
+ 'missile' => 'weapons',
'cmbtrulz' => 'cmbtrulz',
'evasion' => 'cmbtrulz',
'lorecrcl' => 'lorecrcl',
'cmbtrulz' => 'cmbtrulz',
'evasion' => 'cmbtrulz',
'lorecrcl' => 'lorecrcl',
@@
-170,7
+177,7
@@
while( $#ARGV > -1 && $ARGV[ 0 ] =~ /^-/ ) {
}
my $lineNumber = 1;
}
my $lineNumber = 1;
-my $currentSection =
"_unknown"
;
+my $currentSection =
''
;
while( my $line = <> ) {
my @section = ( $line =~ /<section[^>]+id="([^"]*)"/g );
while( my $line = <> ) {
my @section = ( $line =~ /<section[^>]+id="([^"]*)"/g );
@@
-182,6
+189,7
@@
while( my $line = <> ) {
else {
$currentSection = $sectionDocLookup{$section[ 0 ]};
}
else {
$currentSection = $sectionDocLookup{$section[ 0 ]};
}
+ $currentSection = '_unknown' unless defined $currentSection;
}
if( $skipLines >= $lineNumber ) {
}
if( $skipLines >= $lineNumber ) {