db_lint: don't whine about translated quotes for untranslated descs.

1 files changed, 13 insertions, 0 deletions

diff --git a/crawl-ref/source/util/db_lint b/crawl-ref/source/util/db_lint
index 7df1f8b396..3bedcbeb8b 100755
--- a/crawl-ref/source/util/db_lint
+++ b/crawl-ref/source/util/db_lint
@@ -213,6 +213,19 @@ if (read_file("descript/monsters"))
 check_desc_links();
 $described{$_} = 1 for keys %entries;
 __________________________________________________________________________();
+if ($lang)
+{
+    # Quotes may be already translated even if the desc they're appended to
+    # is not yet.
+    my $real_lang = $lang;
+    undef $lang;
+    read_file("descript/$_") for qw(features items unident unrand monsters spells
+        gods branches skills ability cards commands);
+    $described{$_} = 1 for keys %entries;
+    $lang = $real_lang;
+}
+__________________________________________________________________________();
+# These go to GameStartDB rather than DescriptionDB.
 read_file("descript/$_") for qw(species backgrounds);
 __________________________________________________________________________();
 read_file("database/$_") for qw(randname rand_wpn rand_arm rand_all randbook monname);