Permalink
Browse files

Version 1.11

  • Loading branch information...
1 parent 1035bfc commit e9aa8a7b0722b742401a32fda4c460cf28d43be8 @pjcj committed Feb 21, 2005
Showing with 2,622 additions and 2,587 deletions.
  1. +4 −1 CHANGES
  2. +8 −8 Gedcom.pm
  3. +3 −3 Gedcom/CGI.pm
  4. +3 −3 Gedcom/Event.pm
  5. +3 −3 Gedcom/Family.pm
  6. +4 −3 Gedcom/Grammar.pm
  7. +2,470 −2,470 Gedcom/Grammar_5_5.pm
  8. +3 −3 Gedcom/Individual.pm
  9. +2 −2 Gedcom/Item.pm
  10. +3 −3 Gedcom/LifeLines.pm
  11. +49 −22 Gedcom/Record.pm
  12. +2 −2 Makefile.PL
  13. +1 −1 README
  14. +3 −3 cgi-bin/gedcom.cgi
  15. +19 −15 ged
  16. +1 −1 gedcom.vim
  17. +6 −6 lines2perl
  18. +3 −3 parse_grammar
  19. +3 −3 t/Basic.pm
  20. +3 −3 t/Engine.pm
  21. +3 −3 t/Lines.pm
  22. +1 −1 t/basic.t
  23. +1 −1 t/bias.t
  24. +2 −2 t/birthdates.t
  25. +3 −3 t/ged_create.t
  26. +1 −1 t/lines.t
  27. +1 −1 t/lines/bias
  28. +4 −4 t/lines/bias.plx
  29. +2 −2 t/lines/lines.plx
  30. +2 −2 t/lines/namefreq.plx
  31. +1 −1 t/namefreq.t
  32. +1 −1 t/parse_grammar.t
  33. +1 −1 t/read_only.t
  34. +1 −1 t/resolve.t
  35. +1 −1 t/resolve_read_only.t
  36. +4 −4 tkged
View
@@ -215,4 +215,7 @@ Release 1.10 - 5th March 2002
- Update copyright.
- A little work on the documentation.
- Some general tidying up.
- - A couple of workarounds for bleadperl bugs.
+ - A couple of workarounds for bleadperl bugs that are fixed now.
+
+Release 1.11 - 7th April 2002
+ - Improvements to the algorithm in Gedcom::Grammar::item().
View
@@ -26,7 +26,7 @@ my %Top_tag_order;
BEGIN
{
- $VERSION = "1.10";
+ $VERSION = "1.11";
$Tags =
{
@@ -216,10 +216,10 @@ sub AUTOLOAD
goto &$func
}
-use Gedcom::Grammar 1.10;
-use Gedcom::Individual 1.10;
-use Gedcom::Family 1.10;
-use Gedcom::Event 1.10;
+use Gedcom::Grammar 1.11;
+use Gedcom::Individual 1.11;
+use Gedcom::Family 1.11;
+use Gedcom::Event 1.11;
sub new
{
@@ -323,7 +323,7 @@ sub new
for (split /\n/, <<'EOH')
This output was generated by Gedcom.pm.
Gedcom.pm is Copyright 1999-2002, Paul Johnson (pjcj@cpan.org)
-Version 1.10 - 5th March 2002
+Version 1.11 - 7th April 2002
Gedcom.pm is free. It is licensed under the same terms as Perl itself.
@@ -375,7 +375,7 @@ sub write_xml
This output was generated by Gedcom.pm.
Gedcom.pm is Copyright 1999-2002, Paul Johnson (pjcj@cpan.org)
-Version 1.10 - 5th March 2002
+Version 1.11 - 7th April 2002
Gedcom.pm is free. It is licensed under the same terms as Perl itself.
@@ -634,7 +634,7 @@ __END__
Gedcom - a module to manipulate Gedcom genealogy files
-Version 1.10 - 5th March 2002
+Version 1.11 - 7th April 2002
=head1 SYNOPSIS
View
@@ -15,10 +15,10 @@ package Gedcom::CGI;
use CGI qw(:cgi :html);
-use Gedcom 1.10;
+use Gedcom 1.11;
use vars qw($VERSION);
-$VERSION = "1.10";
+$VERSION = "1.11";
sub gedcom
{
@@ -142,7 +142,7 @@ __END__
Gedcom::CGI - Basic CGI routines for Gedcom.pm
-Version 1.10 - 5th March 2002
+Version 1.11 - 7th April 2002
=head1 SYNOPSIS
View
@@ -13,10 +13,10 @@ require 5.005;
package Gedcom::Event;
-use Gedcom::Record 1.10;
+use Gedcom::Record 1.11;
use vars qw($VERSION @ISA);
-$VERSION = "1.10";
+$VERSION = "1.11";
@ISA = qw( Gedcom::Record );
# sub type
@@ -45,7 +45,7 @@ __END__
Gedcom::Event - a module to manipulate Gedcom events
-Version 1.10 - 5th March 2002
+Version 1.11 - 7th April 2002
=head1 SYNOPSIS
View
@@ -13,10 +13,10 @@ require 5.005;
package Gedcom::Family;
-use Gedcom::Record 1.10;
+use Gedcom::Record 1.11;
use vars qw($VERSION @ISA);
-$VERSION = "1.10";
+$VERSION = "1.11";
@ISA = qw( Gedcom::Record );
sub husband
@@ -112,7 +112,7 @@ __END__
Gedcom::Family - a module to manipulate Gedcom families
-Version 1.10 - 5th March 2002
+Version 1.11 - 7th April 2002
=head1 SYNOPSIS
View
@@ -15,10 +15,10 @@ package Gedcom::Grammar;
use Data::Dumper;
-use Gedcom::Item 1.10;
+use Gedcom::Item 1.11;
use vars qw($VERSION @ISA);
-$VERSION = "1.10";
+$VERSION = "1.11";
@ISA = qw( Gedcom::Item );
sub structure
@@ -41,6 +41,7 @@ sub item
my ($tag) = @_;
return unless defined $tag;
my $valid_items = $self->valid_items;
+ return unless exists $valid_items->{$tag};
map { $_->{grammar} } @{$valid_items->{$tag}}
}
@@ -137,7 +138,7 @@ __END__
Gedcom::Grammar - a module to manipulate Gedcom grammars
-Version 1.10 - 5th March 2002
+Version 1.11 - 7th April 2002
=head1 SYNOPSIS
Oops, something went wrong.

0 comments on commit e9aa8a7

Please sign in to comment.