From: Martin Q. <mqu...@us...> - 2007-11-09 13:38:19
|
Update of /cvsroot/flexml/flexml In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv22892 Modified Files: Makefile.defs flexml.pl Log Message: Version 1.8.1: Remove root tag starting condition from the list when checking whether the current tag is allowed here or not. Either it is, or it is checked by elsewhere or the root tag does not exist (raising a warning at lexing time) Index: Makefile.defs =================================================================== RCS file: /cvsroot/flexml/flexml/Makefile.defs,v retrieving revision 1.17 retrieving revision 1.18 diff -u -d -r1.17 -r1.18 --- Makefile.defs 11 Oct 2007 14:47:34 -0000 1.17 +++ Makefile.defs 9 Nov 2007 13:38:20 -0000 1.18 @@ -6,7 +6,7 @@ #SUFF ?=-$(VER) SUFF ?= -VER = 1.8 +VER = 1.8.1 # SETUP. Index: flexml.pl =================================================================== RCS file: /cvsroot/flexml/flexml/flexml.pl,v retrieving revision 1.63 retrieving revision 1.64 diff -u -d -r1.63 -r1.64 --- flexml.pl 11 Oct 2007 14:46:08 -0000 1.63 +++ flexml.pl 9 Nov 2007 13:38:20 -0000 1.64 @@ -1389,7 +1389,6 @@ if (exists $instates{$tag}) { for (split /,/,$instates{$tag}) { $ins{$_} = 'true'; } } - $ins{"ROOT_${tagprefix}$myctag"} = $roottags{$tag} ? 'true' : 'false'; my $str = '<' . join(',', grep {$ins{$_} eq 'false'} keys %ins); if ($str ne '<') { print "$str>\"<$tag\"{s} FAIL(\"Starting tag <$tag> is not allowed here.\");\n"; |