NPC dialogue revamp. Arpan script reviewed.

1 files changed, 3 insertions, 4 deletions

diff --git a/npc/000-2-1/arpan.txt b/npc/000-2-1/arpan.txt
index 433242c5..0116c8ac 100644
--- a/npc/000-2-1/arpan.txt
+++ b/npc/000-2-1/arpan.txt
@@ -146,9 +146,10 @@ l_Menu:
         l("Who are you?"), l_Who,
         rif(getq(ShipQuests_ArpanMoney) == 0, l("Where are my old clothes?")), l_WhereOldClothes,
         rif(!@equipped, lg("What should I do after taking these clothes?")), l_WhatCloth,
-        rif(!@equipped, l("Thank you, I'll take them and put them on.")), l_Quit,
-        l("Nothing, sorry."), l_Quit;
+        rif(!@equipped, l("Thank you, I'll take them and put them on.")), -,
+        l("Nothing, sorry."), -;
 
+    closedialog;
     close;
 
 l_Where:
@@ -221,6 +222,4 @@ l_EquipDone:
     setq ShipQuests_Arpan, 3;
     goto l_Menu;
 
-l_Quit:
-    close;
 }