cocoa.touchbar: another experiment for the 10.11 build machine.
NSButton.buttonWithTitle:target:action: is 10.12 and later.paths
parent
ade70ab813
commit
1bffdff33a
|
@ -12,6 +12,8 @@ IN: cocoa.touchbar
|
||||||
[ nip ]
|
[ nip ]
|
||||||
} 2cleave ;
|
} 2cleave ;
|
||||||
|
|
||||||
|
{ id { id SEL id id SEL } } cache-stubs
|
||||||
|
|
||||||
:: make-NSTouchBar-button ( self identifier label-string action-string -- button )
|
:: make-NSTouchBar-button ( self identifier label-string action-string -- button )
|
||||||
NSCustomTouchBarItem -> alloc
|
NSCustomTouchBarItem -> alloc
|
||||||
identifier <CFString> { id { id SEL id } } ?-> initWithIdentifier: :> item
|
identifier <CFString> { id { id SEL id } } ?-> initWithIdentifier: :> item
|
||||||
|
|
Loading…
Reference in New Issue