package Kwiki::UserName::Remote;
use strict;
use warnings;

use Kwiki::UserName -Base;
use mixin 'Kwiki::Installer';

our $VERSION = "0.04";

const class_title => 'Kwiki user name from HTTP authentication';

sub register {
    my $registry = shift;
    $registry->add( preload => 'user_name' );


=head1 NAME 

Kwiki::UserName::Remote - display the remote user name


See L<Kwiki::Users::Remote> for more information.

=head1 AUTHORS

Ian Langworth <> 

=head1 SEE ALSO

L<Kwiki>, L<Kwiki::Users::Remote>


Copyright (C) 2004, 2005 by Ian Langworth

This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.


div #user_name_title {
    font-size: small;
    float: right;
<div id="user_name_title">
<em>(Logged in as 
<a href="[% script_name %]?[% %]">
[%- || '???' -%]