From b17840b95cd827903721838c767828d839b3e8c0 Mon Sep 17 00:00:00 2001
From: Chris Cormack <crc@liblime.com>
Date: Tue, 20 Nov 2007 12:44:35 -0600
Subject: [PATCH] Fix for if instead of while in the installer

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
---
 Makefile.PL | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Makefile.PL b/Makefile.PL
index 7033e6006f..76eb8f5369 100755
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -96,7 +96,7 @@ while ($marc_value ne 'marc21' && $marc_value ne 'unimarc'){
    my $message= "Chose your flavour of MARC, unimarc or marc21 [marc21]";
    $marc_value=prompt($message) || 'marc21';
 }
-if ($lang_value ne 'en' && $lang_value ne 'fr'){
+while ($lang_value ne 'en' && $lang_value ne 'fr'){
    my $message= "Choose your language, en or fr [en]";
    $lang_value=prompt($message) || 'en';
 }
-- 
2.20.1