From 3b6d582988f46aa312c975ecd7206338c6f85208 Mon Sep 17 00:00:00 2001
From: Eugene Sandulenko
Date: Tue, 24 Dec 2019 15:37:44 +0100
Subject: DIRECTOR: LINGO: Add test for 'when' statements with 'if'

---
 engines/director/lingo/tests/if.lingo | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/engines/director/lingo/tests/if.lingo b/engines/director/lingo/tests/if.lingo
index bcf1a09120..05176dfa07 100644
--- a/engines/director/lingo/tests/if.lingo
+++ b/engines/director/lingo/tests/if.lingo
@@ -121,6 +121,9 @@ else put 6
 
 if the selection = the text of cast A31 then go to frame "sEnd" else put 7 end if
 
+when keyDown then if the key = RETURN then checkField
+when keyDown then if the key = QUOTE then checkField else put "bar"
+
 macro WindowHorzP X
     set X1 = constrainH( 14, X )
     if X1 = X then return( TRUE )
-- 
cgit v1.2.3