(with-effective-user) ( string/id quot -- )

Vocabulary

unix.users

Inputs

string/id	an object
quot	an object

Outputs

None

Definition

USING: continuations kernel ;

IN: unix.users

: (with-effective-user) ( string/id quot -- )
    [ [ set-effective-user ] curry ] dip compose
    effective-user-id [ set-effective-user ] curry finally ;
    inline