From 8995bc10746c397cb706167ac41c60bcb9961607 Mon Sep 17 00:00:00 2001
From: Andreas Neiser <neiser@kph.uni-mainz.de>
Date: Mon, 1 Jul 2013 10:30:48 +0200
Subject: [PATCH] Better entity loading

---
 xml-db/xml-db.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/xml-db/xml-db.pl b/xml-db/xml-db.pl
index d8ce180..2b635ad 100755
--- a/xml-db/xml-db.pl
+++ b/xml-db/xml-db.pl
@@ -149,8 +149,10 @@ sub LoadDBAndFiles {
       my $doc = $parser->parse_file($_);
       ValidateXML($doc, $schemas);
       my $dbname = $doc->getDocumentElement->getAttribute('name');
+      die "File <$_>: Entity with name $dbname already exists in database"
+        if exists $db->{$dbname};
       $db->{$dbname} = $doc;
-      print "Loaded and validated entity <$dbname> from db/$_\n" if $verbose;
+      print "Loaded and validated entity <$dbname> from database <$_>\n" if $verbose;
     }
   }
 
-- 
2.43.0