diff --git a/gedcom b/gedcom index 829232a..924590f 100755 --- a/gedcom +++ b/gedcom @@ -170,6 +170,7 @@ foreach my $module(@needfull) { } $module =~ s/\-/::/g; $module =~ s/\.tar\.gz$//; + $module =~ s/::(\d)+$/ $1/; eval "require $module"; if($@) { die $@;