From e07ff25be6a1996f0d4d4acd1bf38bf336a0c027 Mon Sep 17 00:00:00 2001
From: spjspj <spjspj4@gmail.com>
Date: Sat, 29 Oct 2016 16:14:00 +1100
Subject: [PATCH] spjspj - Rudimentary help for wrong card name in gen-card.pl

---
 Utils/gen-card.pl | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/Utils/gen-card.pl b/Utils/gen-card.pl
index b7648abdee2..1f6236beb94 100755
--- a/Utils/gen-card.pl
+++ b/Utils/gen-card.pl
@@ -96,7 +96,14 @@ if(!$cardName) {
     chomp $cardName;
 }
 
+
 if (!exists $cards{$cardName}) {
+    my $possible;
+    foreach $possible (sort keys (%cards)) {
+        if ($possible =~ m/^$cardName.*/img && $cardName =~ m/..../) {
+            print ("Did you mean $possible ?\n");
+        }
+    }
     die "Card name doesn't exist: $cardName\n";
 }