ui.backend.cocoa.views,bittorrent: Fix syntax for new parser
parent
82f9cea1c1
commit
00c85b6cdc
|
@ -367,7 +367,7 @@ PRIVATE>
|
||||||
gadget [
|
gadget [
|
||||||
gadget preedit? not [
|
gadget preedit? not [
|
||||||
window event send: action utf8 alien>string validate-action
|
window event send: action utf8 alien>string validate-action
|
||||||
[ >c-bool ] [ drop self event super: validateUserInterfaceItem: ] if
|
[ >c-bool ] [ drop self event super: \validateUserInterfaceItem: ] if
|
||||||
] [ 0 ] if
|
] [ 0 ] if
|
||||||
] [ 0 ] if
|
] [ 0 ] if
|
||||||
] [ 0 ] if
|
] [ 0 ] if
|
||||||
|
|
|
@ -12,9 +12,9 @@ IN: bittorrent
|
||||||
<<
|
<<
|
||||||
CONSTANT: ALPHANUMERIC $[
|
CONSTANT: ALPHANUMERIC $[
|
||||||
[
|
[
|
||||||
CHAR: a CHAR: z [a,b] %
|
char: a char: z [a,b] %
|
||||||
CHAR: A CHAR: Z [a,b] %
|
char: A char: Z [a,b] %
|
||||||
CHAR: 0 CHAR: 9 [a,b] %
|
char: 0 char: 9 [a,b] %
|
||||||
".-_~" %
|
".-_~" %
|
||||||
] { } make
|
] { } make
|
||||||
]
|
]
|
||||||
|
|
Loading…
Reference in New Issue