updated code to handle macosx from system-type
original commit: 0e070a88195f1ab3ffa3d3bd1ee5e881871e2462
This commit is contained in:
parent
860525b011
commit
c245f386ae
|
@ -1048,7 +1048,7 @@
|
|||
;(map "c:f" "move-to-search-or-search")
|
||||
|
||||
(map "c:i" "toggle-search-focus")]
|
||||
[(macos)
|
||||
[(macos macosx)
|
||||
(map "c:s" "move-to-search-or-search")
|
||||
(map "c:g" "hide-search")
|
||||
|
||||
|
@ -1105,7 +1105,7 @@
|
|||
(send kmap map-function
|
||||
(string-append
|
||||
(case (system-type)
|
||||
[(macos) "d:"]
|
||||
[(macosx macos) "d:"]
|
||||
[(windows) "c:"]
|
||||
[(unix) "a:"]
|
||||
[else (error 'keymap.ss "unknown platform: ~s" (system-type))])
|
||||
|
|
Loading…
Reference in New Issue
Block a user