Add En, Fr, Ru, Sp, Pt and Vls as defined language for Beta1 release.

3 files changed, 8 insertions, 15 deletions

diff --git a/langs/langs.txt b/langs/langs.txt
index 7940858b..d99571dd 100644
--- a/langs/langs.txt
+++ b/langs/langs.txt
@@ -2,9 +2,6 @@ en
 fr
 ru
 es
-vls
-de
-nl
-it
 pt_BR
-pl
+de
+vls
diff --git a/npc/000-0/sailors.txt b/npc/000-0/sailors.txt
index 630c76cf..0106d09d 100644
--- a/npc/000-0/sailors.txt
+++ b/npc/000-0/sailors.txt
@@ -45,13 +45,11 @@ OnTouch:
     "Je vous entends..." + " (Français)", -,
     "Да я вас слышу..." + " (Русский)", -,
     "Te oigo..." + " (Español)", -,
-    "'k hoar ui wel..." + " (West-Vloams)", -,
-    "I höre euch..." + " (Deutsch)", -,
-    "Ik hoor je..." + " (Nederlands)", -,
-    "Ti sento..." + " (Italiano)", -,
     "Eu te ouço..." + " (Português)", -;
+    "I höre euch..." + " (Deutsch)", -,
+    "'k hoar ui wel..." + " (Vloams)", -,
     set @lang, @menu-1;
-    if (@lang < 0 || @lang > 8) close;
+    if (@lang < 0 || @lang > 6) close;
     setlang @lang;
 
   mesn;
diff --git a/npc/000-2-0/julia.txt b/npc/000-2-0/julia.txt
index b1fc0841..9ff2162d 100644
--- a/npc/000-2-0/julia.txt
+++ b/npc/000-2-0/julia.txt
@@ -46,15 +46,13 @@
       l("I speak French") + " (Français)", -,
       l("I speak Russian") + " (Русский)", -,
       l("I speak Spanish") + " (Español)", -,
-      l("I speak Flemish") + " (West-Vloams)", -,
-      l("I speak German") + " (Deutsch)", -,
-      l("I speak Dutch") + " (Nederlands)", -,
-      l("I speak Italian") + " (Italiano)", -,
       l("I speak Portuguese") + " (Português)", -,
+      l("I speak German") + " (Deutsch)", -,
+      l("I speak Flemish") + " (Vloams)", -,
 
       @s$, l_NoChanges;
     set @lang, @menu-1;
-    if (@lang < 0 || @lang > 8) close;
+    if (@lang < 0 || @lang > 6) close;
     setlang @lang;
     mesn;
     mesq l("Ok, Done. I'm sure that you've got some questions for me, feel free to ask them!");