Add some spelling words. Make local_versionsync fail gracefully (instead of
planning twice) if File::Slurp isn't found. Make spelling skip all tests if Test::Spelling isn't found.
This commit is contained in:
@@ -5,7 +5,10 @@
|
|||||||
use warnings;
|
use warnings;
|
||||||
use strict;
|
use strict;
|
||||||
use Test::More;
|
use Test::More;
|
||||||
use Test::Spelling;
|
|
||||||
|
eval "use Test::Spelling";
|
||||||
|
plan skip_all => "Test::Spelling required for checking spelling"
|
||||||
|
if $@;
|
||||||
|
|
||||||
set_spell_cmd('aspell list');
|
set_spell_cmd('aspell list');
|
||||||
add_stopwords(<DATA>);
|
add_stopwords(<DATA>);
|
||||||
@@ -22,7 +25,9 @@ alteon
|
|||||||
airespace
|
airespace
|
||||||
aironet
|
aironet
|
||||||
airos
|
airos
|
||||||
|
Alcatel
|
||||||
alcatel
|
alcatel
|
||||||
|
AOS
|
||||||
ap
|
ap
|
||||||
APs
|
APs
|
||||||
arn
|
arn
|
||||||
@@ -49,6 +54,7 @@ bitmask
|
|||||||
bladecenter
|
bladecenter
|
||||||
bln
|
bln
|
||||||
bpdus
|
bpdus
|
||||||
|
BSSID
|
||||||
bulkrepeaters
|
bulkrepeaters
|
||||||
bulkwalk
|
bulkwalk
|
||||||
cabletron
|
cabletron
|
||||||
@@ -84,6 +90,7 @@ eigrp
|
|||||||
erszenyi
|
erszenyi
|
||||||
ess
|
ess
|
||||||
etherlike
|
etherlike
|
||||||
|
ethernet
|
||||||
enterasys
|
enterasys
|
||||||
extranet
|
extranet
|
||||||
fastiron
|
fastiron
|
||||||
@@ -122,6 +129,7 @@ loopback
|
|||||||
loopdetect
|
loopdetect
|
||||||
lorensen
|
lorensen
|
||||||
lsb
|
lsb
|
||||||
|
Lucent
|
||||||
lucent
|
lucent
|
||||||
luiggi
|
luiggi
|
||||||
lwapp
|
lwapp
|
||||||
@@ -155,6 +163,7 @@ oem
|
|||||||
ofdm
|
ofdm
|
||||||
oid
|
oid
|
||||||
oids
|
oids
|
||||||
|
OmniSwitch
|
||||||
os
|
os
|
||||||
osi
|
osi
|
||||||
ospf
|
ospf
|
||||||
@@ -210,6 +219,8 @@ telesys
|
|||||||
tftp
|
tftp
|
||||||
tftpfilename
|
tftpfilename
|
||||||
tftpserver
|
tftpserver
|
||||||
|
TiMOS
|
||||||
|
tmnxModel
|
||||||
tuttle
|
tuttle
|
||||||
ucsc
|
ucsc
|
||||||
uninstall
|
uninstall
|
||||||
|
|||||||
@@ -5,12 +5,14 @@
|
|||||||
use warnings;
|
use warnings;
|
||||||
use strict;
|
use strict;
|
||||||
use File::Find;
|
use File::Find;
|
||||||
use Test::More qw(no_plan);
|
use Test::More;
|
||||||
|
|
||||||
eval "use File::Slurp";
|
eval "use File::Slurp";
|
||||||
plan skip_all => "File::Slurp required for testing version sync"
|
plan skip_all => "File::Slurp required for testing version sync"
|
||||||
if $@;
|
if $@;
|
||||||
|
|
||||||
|
plan qw(no_plan);
|
||||||
|
|
||||||
my $last_version = undef;
|
my $last_version = undef;
|
||||||
find({wanted => \&check_version, no_chdir => 1}, 'blib');
|
find({wanted => \&check_version, no_chdir => 1}, 'blib');
|
||||||
if (! defined $last_version) {
|
if (! defined $last_version) {
|
||||||
|
|||||||
Reference in New Issue
Block a user