From 1a78945c445dd03f10de7edad944c486653c56b8 Mon Sep 17 00:00:00 2001
From: Ian C <ianc@noddybox.co.uk>
Date: Sat, 13 Oct 2007 00:02:13 +0000
Subject: Added strict mode

---
 menu.bmx | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'menu.bmx')

diff --git a/menu.bmx b/menu.bmx
index b441a0f..68e1c98 100644
--- a/menu.bmx
+++ b/menu.bmx
@@ -3,6 +3,8 @@
 '
 ' $Id$
 '
+Strict
+
 Import noddybox.bitmapfont
 
 Type TMenu
@@ -47,7 +49,7 @@ Type TMenu
 		
 		For Local s:String=EachIn list
 			If (mx>xpos And mx<xpos+w And my>y And my<y+h)
-				If KeyDown(KEY_MOUSELEFT)
+				If MouseDown(1)
 					mbdown=True
 					DrawImage(img,xpos,y+2)
 					font.Centre(s,y+yoff+2,255,255,0)
-- 
cgit v1.2.3