Mercurial > pub > Impl
diff Lib/IMPL/Security/Principal.pm @ 49:16ada169ca75
migrating to the Eclipse IDE
author | wizard@linux-odin.local |
---|---|
date | Fri, 26 Feb 2010 10:49:21 +0300 |
parents | 1c3c3e63a314 |
children | 84aa8c395fce |
line wrap: on
line diff
--- a/Lib/IMPL/Security/Principal.pm Fri Feb 26 01:43:42 2010 +0300 +++ b/Lib/IMPL/Security/Principal.pm Fri Feb 26 10:49:21 2010 +0300 @@ -1,20 +1,20 @@ -package IMPL::Security::Principal; -use strict; -use warnings; - -use base qw(IMPL::Object); -use IMPL::Class::Property; - -BEGIN { - public property Name => prop_get; - public property Description => prop_get; -} - -my $nobody; - -sub nobody { - $nobody = $_[0]->new(Name => 'nobody', Description => '') unless $nobody; - return $nobody; -} - -1; +package IMPL::Security::Principal; +use strict; +use warnings; + +use base qw(IMPL::Object); +use IMPL::Class::Property; + +BEGIN { + public property Name => prop_get; + public property Description => prop_get; +} + +my $nobody; + +sub nobody { + $nobody = $_[0]->new(Name => 'nobody', Description => '') unless $nobody; + return $nobody; +} + +1;