Changeset 2930


Ignore:
Timestamp:
Mar 28, 2012, 8:06:20 AM (2 years ago)
Author:
wmb
Message:

GUI - Fixed bug introduced by recent mouse/touchscreen/pointer revamp. menu was broken on systems without a touchscreen.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • ofw/gui/mouse.fth

    r2920 r2930  
    204204; 
    205205: mouse-event?  ( -- false | x y buttons true ) 
     206   mouse-ih 0=  if  false exit  then 
    206207   " stream-poll?" mouse-ih $call-method 
    207208; 
     
    230231; 
    231232: touchscreen-event?  ( -- false | x y buttons true ) 
     233   touchscreen-ih  0=  if  false exit  then 
    232234   " stream-poll?" touchscreen-ih $call-method 
    233235; 
Note: See TracChangeset for help on using the changeset viewer.