@@ -273,15 +273,14 @@ end
273273
274274function Panel :onInput (keys )
275275 if self .kbd_get_pos then
276- if keys .SELECT or keys .LEAVESCREEN or keys ._MOUSE_R_DOWN then
276+ if keys .SELECT or keys .LEAVESCREEN or keys ._MOUSE_R then
277277 Panel_end_drag (self , not keys .SELECT and self .saved_frame or nil ,
278278 not not keys .SELECT )
279279 return true
280280 end
281281 for code in pairs (keys ) do
282282 local dx , dy = guidm .get_movement_delta (code , 1 , 10 )
283283 if dx then
284- local frame_rect = self .frame_rect
285284 local kbd_pos = self .kbd_get_pos ()
286285 kbd_pos .x = kbd_pos .x + dx
287286 kbd_pos .y = kbd_pos .y + dy
@@ -292,17 +291,17 @@ function Panel:onInput(keys)
292291 return
293292 end
294293 if self .drag_offset then
295- if keys ._MOUSE_R_DOWN then
294+ if keys ._MOUSE_R then
296295 Panel_end_drag (self , self .saved_frame )
297- elseif keys ._MOUSE_L then
296+ elseif keys ._MOUSE_L_DOWN then
298297 Panel_update_frame (self , Panel_make_frame (self ))
299298 end
300299 return true
301300 end
302301 if Panel .super .onInput (self , keys ) then
303302 return true
304303 end
305- if not keys ._MOUSE_L_DOWN then return end
304+ if not keys ._MOUSE_L then return end
306305 local x ,y = self :getMouseFramePos ()
307306 if not x then return end
308307
@@ -489,7 +488,7 @@ function Panel:onRenderFrame(dc, rect)
489488 dc :seek (pos .x , pos .y ):pen (pen ):char (string.char (0xDB ))
490489 end
491490 if self .drag_offset and not self .kbd_get_pos
492- and df .global .enabler .mouse_lbut == 0 then
491+ and df .global .enabler .mouse_lbut_down == 0 then
493492 Panel_end_drag (self , nil , true )
494493 end
495494end
@@ -718,7 +717,7 @@ function EditField:onInput(keys)
718717 end
719718 end
720719
721- if self .key and (keys .LEAVESCREEN or keys ._MOUSE_R_DOWN ) then
720+ if self .key and (keys .LEAVESCREEN or keys ._MOUSE_R ) then
722721 self :setText (self .saved_text )
723722 self :setFocus (false )
724723 return true
@@ -740,8 +739,8 @@ function EditField:onInput(keys)
740739 end
741740 end
742741 return not not self .key
743- elseif keys ._MOUSE_L then
744- local mouse_x , mouse_y = self :getMousePos ()
742+ elseif keys ._MOUSE_L_DOWN then
743+ local mouse_x = self :getMousePos ()
745744 if mouse_x then
746745 self :setCursor (self .start_pos + mouse_x - (self .text_offset or 0 ))
747746 return true
@@ -986,7 +985,7 @@ function Scrollbar:onRenderBody(dc)
986985 if self .is_dragging then
987986 scrollbar_do_drag (self )
988987 end
989- if df .global .enabler .mouse_lbut == 0 then
988+ if df .global .enabler .mouse_lbut_down == 0 then
990989 self .last_scroll_ms = 0
991990 self .is_dragging = false
992991 self .scroll_spec = nil
@@ -1023,7 +1022,7 @@ function Scrollbar:onInput(keys)
10231022 return true
10241023 end
10251024 end
1026- if not keys ._MOUSE_L_DOWN then return false end
1025+ if not keys ._MOUSE_L then return false end
10271026 local _ ,y = self :getMousePos ()
10281027 if not y then return false end
10291028 local scroll_spec = nil
@@ -1386,11 +1385,11 @@ function Label:onInput(keys)
13861385 if self :inputToSubviews (keys ) then
13871386 return true
13881387 end
1389- if keys ._MOUSE_L_DOWN and self :getMousePos () and self .on_click then
1388+ if keys ._MOUSE_L and self :getMousePos () and self .on_click then
13901389 self .on_click ()
13911390 return true
13921391 end
1393- if keys ._MOUSE_R_DOWN and self :getMousePos () and self .on_rclick then
1392+ if keys ._MOUSE_R and self :getMousePos () and self .on_rclick then
13941393 self .on_rclick ()
13951394 return true
13961395 end
@@ -1498,7 +1497,7 @@ end
14981497function HotkeyLabel :onInput (keys )
14991498 if HotkeyLabel .super .onInput (self , keys ) then
15001499 return true
1501- elseif keys ._MOUSE_L_DOWN and self :getMousePos () and self .on_activate
1500+ elseif keys ._MOUSE_L and self :getMousePos () and self .on_activate
15021501 and not is_disabled (self ) then
15031502 self .on_activate ()
15041503 return true
@@ -1658,7 +1657,7 @@ end
16581657function CycleHotkeyLabel :onInput (keys )
16591658 if CycleHotkeyLabel .super .onInput (self , keys ) then
16601659 return true
1661- elseif keys ._MOUSE_L_DOWN and self :getMousePos () and not is_disabled (self ) then
1660+ elseif keys ._MOUSE_L and self :getMousePos () and not is_disabled (self ) then
16621661 self :cycle ()
16631662 return true
16641663 end
@@ -1962,7 +1961,7 @@ function List:onInput(keys)
19621961 return self :submit ()
19631962 elseif keys .CUSTOM_SHIFT_ENTER then
19641963 return self :submit2 ()
1965- elseif keys ._MOUSE_L_DOWN then
1964+ elseif keys ._MOUSE_L then
19661965 local idx = self :getIdxUnderMouse ()
19671966 if idx then
19681967 local now_ms = dfhack .getTickCount ()
@@ -2317,7 +2316,7 @@ end
23172316
23182317function Tab :onInput (keys )
23192318 if Tab .super .onInput (self , keys ) then return true end
2320- if keys ._MOUSE_L_DOWN and self :getMousePos () then
2319+ if keys ._MOUSE_L and self :getMousePos () then
23212320 self .on_select (self .id )
23222321 return true
23232322 end
@@ -2419,7 +2418,7 @@ local function rangeslider_get_width_per_idx(self)
24192418end
24202419
24212420function RangeSlider :onInput (keys )
2422- if not keys ._MOUSE_L_DOWN then return false end
2421+ if not keys ._MOUSE_L then return false end
24232422 local x = self :getMousePos ()
24242423 if not x then return false end
24252424 local left_idx , right_idx = self .get_left_idx_fn (), self .get_right_idx_fn ()
@@ -2527,7 +2526,7 @@ function RangeSlider:onRenderBody(dc, rect)
25272526 if self .is_dragging_target then
25282527 rangeslider_do_drag (self , width_per_idx )
25292528 end
2530- if df .global .enabler .mouse_lbut == 0 then
2529+ if df .global .enabler .mouse_lbut_down == 0 then
25312530 self .is_dragging_target = nil
25322531 self .is_dragging_idx = nil
25332532 end
0 commit comments