Mercurial > pub > Impl

diff Lib/IMPL/Security/Principal.pm @ 401:16ff604298c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
minor fixes
author cin
date Thu, 15 May 2014 18:24:28 +0400
parents 6d8092d8ce1b
children
line wrap: on
line diff
--- a/Lib/IMPL/Security/Principal.pm	Wed May 14 17:27:32 2014 +0400
+++ b/Lib/IMPL/Security/Principal.pm	Thu May 15 18:24:28 2014 +0400
@@ -13,7 +13,8 @@
         'IMPL::Security::AbstractPrincipal' => undef
     ],
     props => [
-        @{AbstractPrincipal->abstractProps()}
+        @{AbstractPrincipal->abstractProps()},
+        isNobody => PROP_RW
     ]
 };
 
@@ -22,7 +23,7 @@
 my $nobody;
 
 sub nobody {
-    $nobody = $_[0]->new(name => 'nobody', description => '') unless $nobody;
+    $nobody = $_[0]->new(name => 'nobody', description => '', isNobody => 1) unless $nobody;
     return $nobody;
 }