apple-script-elevated ( command -- )

Vocabulary

elevate.macosx.private

Inputs

command

an object

Outputs

None

Definition

USING: cocoa.apple-script formatting sequences ;

IN: elevate.macosx.private

: apple-script-elevated ( command -- )
    first quote-apple-script
    "do shell script %s with administrator privileges without alte..."
    sprintf run-apple-script ;