[%# Manage privileges for a given user, or see who has a given privilege. # # Authors: # Amy Hendrix -- original page # Jen Griffin -- TT conversion # # Copyright (c) 2009-2020 by Dreamwidth Studios, LLC. # # This program is free software; you may redistribute it and/or modify it # under the same terms as Perl itself. For a copy of the license, please # reference 'perldoc perlartistic' or 'perldoc perlgpl'. # %] [%- sections.title='.title' | ml -%] [%- sections.head = BLOCK %] [% END %] [%- CALL dw.active_resource_group( "foundation" ) -%]

[% '.backlink' | ml %]

[% form.textbox( name = 'user', label = dw.ml( '.label.viewuserprivs' ), size = site.maxlength_user, maxlength = site.maxlength_user ) %] [% form.submit( value = dw.ml( '.btn.load' ) ) %]

[% '.label.viewprivusers' | ml %]

[%- FOREACH priv IN privs; da = priv.des.split( 'arg=' ); des = da.0; args = da.1 -%]
{ priv => priv.privcode } ) %]'> [% priv.privcode %]: [% priv.privname %] [% IF priv.scope == 'local'; '.txt.localpriv' | ml; END %]
[% des; IF args %]
[% '.label.argument' | ml %] [% args; END %]

[%- END -%]