set-pasteboard-string ( str pasteboard -- )
Cocoa bridge » Cocoa pasteboard utilities

Prev:

pasteboard-string ( pasteboard -- str )

Vocabulary
cocoa.pasteboard

Inputs

str	a string
pasteboard	an NSPasteBoard

Outputs
None

Word description
Sets the contents of the pasteboard.

Definition

USING: alien.c-types arrays cocoa.application cocoa.messages
cocoa.runtime kernel ;

IN: cocoa.pasteboard

: set-pasteboard-string ( str pasteboard -- )
    NSStringPboardType <NSString> dup 1array pick
    set-pasteboard-types [ swap <NSString> ] dip
    { char { id SEL id id } } "setString:forType:" send drop ;