(with-real-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-real-user) ( string/id quot -- )
    [ [ set-real-user ] curry ] dip compose real-user-id
    [ set-real-user ] curry finally ; inline