@@ -64,7 +64,7 @@ defmodule Scenic.Driver.KeyMap do
6464 """
6565 @ spec caps_lock? ( keys :: keys ) :: boolean
6666 def caps_lock? ( keys ) do
67- is_pressed ?( keys [ :virt_caps_lock ] )
67+ pressed ?( keys [ :virt_caps_lock ] )
6868 end
6969
7070 @ doc """
@@ -74,7 +74,7 @@ defmodule Scenic.Driver.KeyMap do
7474 """
7575 @ spec num_lock? ( keys :: keys ) :: boolean
7676 def num_lock? ( keys ) do
77- is_pressed ?( keys [ :virt_num_lock ] )
77+ pressed ?( keys [ :virt_num_lock ] )
7878 end
7979
8080 @ doc """
@@ -84,7 +84,7 @@ defmodule Scenic.Driver.KeyMap do
8484 """
8585 @ spec scroll_lock? ( keys :: keys ) :: boolean
8686 def scroll_lock? ( keys ) do
87- is_pressed ?( keys [ :virt_scroll_lock ] )
87+ pressed ?( keys [ :virt_scroll_lock ] )
8888 end
8989
9090 @ doc """
@@ -94,39 +94,39 @@ defmodule Scenic.Driver.KeyMap do
9494 """
9595 @ spec shift? ( keys :: keys ) :: boolean
9696 def shift? ( keys ) do
97- is_pressed ?( keys [ :key_shift ] ) ||
98- is_pressed ?( keys [ :key_leftshift ] ) ||
99- is_pressed ?( keys [ :key_rightshift ] )
97+ pressed ?( keys [ :key_shift ] ) ||
98+ pressed ?( keys [ :key_leftshift ] ) ||
99+ pressed ?( keys [ :key_rightshift ] )
100100 end
101101
102102 @ doc """
103103 Is any alt key pressed?
104104 """
105105 @ spec alt? ( keys :: keys ) :: boolean
106106 def alt? ( keys ) do
107- is_pressed ?( keys [ :key_alt ] ) ||
108- is_pressed ?( keys [ :key_leftalt ] ) ||
109- is_pressed ?( keys [ :key_rightalt ] )
107+ pressed ?( keys [ :key_alt ] ) ||
108+ pressed ?( keys [ :key_leftalt ] ) ||
109+ pressed ?( keys [ :key_rightalt ] )
110110 end
111111
112112 @ doc """
113113 Is any ctrl key pressed?
114114 """
115115 @ spec ctrl? ( keys :: keys ) :: boolean
116116 def ctrl? ( keys ) do
117- is_pressed ?( keys [ :key_ctrl ] ) ||
118- is_pressed ?( keys [ :key_leftctrl ] ) ||
119- is_pressed ?( keys [ :key_rightctrl ] )
117+ pressed ?( keys [ :key_ctrl ] ) ||
118+ pressed ?( keys [ :key_leftctrl ] ) ||
119+ pressed ?( keys [ :key_rightctrl ] )
120120 end
121121
122122 @ doc """
123123 Is any meta key pressed? This is usually the command button.
124124 """
125125 @ spec meta? ( keys :: keys ) :: boolean
126126 def meta? ( keys ) do
127- is_pressed ?( keys [ :key_meta ] ) ||
128- is_pressed ?( keys [ :key_leftmeta ] ) ||
129- is_pressed ?( keys [ :key_rightmeta ] )
127+ pressed ?( keys [ :key_meta ] ) ||
128+ pressed ?( keys [ :key_leftmeta ] ) ||
129+ pressed ?( keys [ :key_rightmeta ] )
130130 end
131131
132132 @ doc """
@@ -144,9 +144,9 @@ defmodule Scenic.Driver.KeyMap do
144144 |> add_if_set ( :scroll_lock , scroll_lock? ( keys ) )
145145 end
146146
147- defp is_pressed ?( nil ) , do: false
148- defp is_pressed ?( 0 ) , do: false
149- defp is_pressed ?( _ ) , do: true
147+ defp pressed ?( nil ) , do: false
148+ defp pressed ?( 0 ) , do: false
149+ defp pressed ?( _ ) , do: true
150150
151151 defp add_if_set ( list , value , true ) , do: [ value | list ]
152152 defp add_if_set ( list , _value , false ) , do: list
0 commit comments