Mercurial > pub > Impl
diff Lib/IMPL/Security/Principal.pm @ 48:1c3c3e63a314
security in progress
author | Sergey |
---|---|
date | Fri, 26 Feb 2010 01:43:42 +0300 |
parents | a9b70d836b28 |
children | 16ada169ca75 |
line wrap: on
line diff
--- a/Lib/IMPL/Security/Principal.pm Tue Feb 23 22:57:16 2010 +0300 +++ b/Lib/IMPL/Security/Principal.pm Fri Feb 26 01:43:42 2010 +0300 @@ -10,6 +10,11 @@ public property Description => prop_get; } +my $nobody; +sub nobody { + $nobody = $_[0]->new(Name => 'nobody', Description => '') unless $nobody; + return $nobody; +} 1;