From 490a2eea2809575a7883a189069286074bcefd6f Mon Sep 17 00:00:00 2001
From: Jamie Cameron <jcameron@webmin.com>
Date: Sun, 18 Feb 2018 17:22:31 -0800
Subject: [PATCH] Deal with existing extracted module.info files

---
 extract-module-info-langs.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/extract-module-info-langs.pl b/extract-module-info-langs.pl
index f1d91ed29..7b9bb546a 100755
--- a/extract-module-info-langs.pl
+++ b/extract-module-info-langs.pl
@@ -18,7 +18,10 @@ foreach my $f (@files) {
 	my %extract;
 	foreach my $k (@keys) {
 		if ($k =~ /^(desc|longdesc)_(\S+)/) {
-			$extract{$2} ||= { };
+			if (!$extract{$2}) {
+				$extract{$2} ||= { };
+				&read_file($f.".".$2, $extract{$2});
+				}
 			$extract{$2}->{$k} = $minfo{$k};
 			delete($minfo{$k});
 			}