Unicode::UCD: Add prop_values() function

[perl5.git] / autodoc.pl

diff --git a/autodoc.pl b/autodoc.pl
index 6ba223e..9395d91 100644 (file)
--- a/autodoc.pl
+++ b/autodoc.pl
@@ -159,6 +159,10 @@ DOC:
                $ret = $docref->{retval};
            }
 
+           if (exists $docs{$inline_where}{$curheader}{$name}) {
+                warn "$0: duplicate API entry for '$name' in $inline_where/$curheader\n";
+                next;
+            }
            $docs{$inline_where}{$curheader}{$name}
                = [$flags, $docs, $ret, $file, @args];