X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/07d8e0861073c9aabaf3592d52629114e8bf00b9..2d689f2ba483997f2fad02fddf99b701f88b9f9a:/dieren.plp

diff --git a/dieren.plp b/dieren.plp
index 8abcdfd..4332d56 100644
--- a/dieren.plp
+++ b/dieren.plp
@@ -96,16 +96,20 @@ my @table = qw(
 	#>olifant: olifant    zeeolifant   olifantsvis    kamerolifant? -           #olifantsoor
 	 >beer:    beer       zeebeer      waterbeertje   ijsbeer      wasbeer      #neusbeer
 	 >leeuw:   leeuw      zeeleeuw     waterleeuw??   aardleeuw??=kameleon
-	                                                               mierenleeuw  #
+	                                                               mierenleeuw  #leeuwerik
 	 >wolf:    wolf       zeewolf      waterwolf??=snoek  aardwolf korenwolf    #strandwolf=bruine_hyena
 	 >haan:    haan       zeehaan      waterhaan      rotshaan     sprinkhaan   #wilde_haan??=wildrooster
 	#>pad:     pad        zebrapad?    waterpad?      landpad      schildpad    #paddenstoel
-	#>draak:   draak      zeedraak     waterdraak=agame          - komododraak=varaan #
-	#>vlo:     vlo        zeevlo       watervlo       aardvlo      vlok?        #
-	#>mot:     mot        marmot       watermot       bergamot     -            #
+	 >draak:   draak      zeedraak     waterdraak=agame aarddraak?=戊辰
+	                                                   komododraak=varaan       #drakenkop
+	#>vlo:     vlo        zeevlo       watervlo       aardvlo      -            vlok?
+	#>mot:     mot        marmot       watermot       bergamot     behemoth?    #
 	#>bij:     bij        -            waterbij       aardbei      moerbei      hommelbij
 );
-$table[4 + 9*7] = 'grasmodderpaard?=草泥马' if $Request eq 'standaard'; # replace turnpaard
+if ($Request eq 'standaard') {
+	$table[4 + 9*7] = 'grasmodderpaard?=草泥马'; # replace turnpaard
+	$table[1 + 18*7] = 'draak_'; # irl animal
+}
 
 @table = qw(
 	>hond    zeehond    prairiehond