steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ui.backend.windows: 2sequence cleanup

clean-linux-x86-64
Doug Coleman 2019-08-02 18:29:19 -05:00
parent c70d1f6c4a
commit f7e4774d3f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/ui/backend/windows/windows.factor
View File

@ -361,7 +361,7 @@ SYMBOL: upper-surrogate-wm-char
{ [ dup under-surrogate? ] [ { [ dup under-surrogate? ] [
drop drop
upper-surrogate-wm-char get-global [ upper-surrogate-wm-char get-global [
1string wParam 1string 2array "" join wParam "" 2sequence
utf16n encode utf16n decode hWnd window user-input utf16n encode utf16n decode hWnd window user-input
] when* ] ] when* ]
} }