From b2a152dd54e86247a06fa91c5c0ff6f092acc943 Mon Sep 17 00:00:00 2001
From: Eugene Sandulenko
Date: Mon, 27 Jun 2016 00:40:22 +0200
Subject: DIRECTOR: Lingo: Fix handler calling

---
 engines/director/director.cpp | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'engines/director/director.cpp')

diff --git a/engines/director/director.cpp b/engines/director/director.cpp
index 3c82fd9e91..6d8e51ccb8 100644
--- a/engines/director/director.cpp
+++ b/engines/director/director.cpp
@@ -85,6 +85,7 @@ end if\n\
 if x >1 then\n\
 exit\n\
 end if\n\
+put 100\n\
 \n\
 --\n\
 macro ZIPX\n\
@@ -104,9 +105,14 @@ if par1 = 3 then\n\
 else\n\
   put 9\n\
 end if\n\
-shipx\n\
 ", kMovieScript, 1);
 
+_lingo->addCode("shipx\n\
+put x\n\
+", kMovieScript, 2);
+
+_lingo->executeScript(kMovieScript, 2);
+
 return Common::kNoError;
 
 
-- 
cgit v1.2.3