Mercurial > pub > Impl

view _test/Test/Config/Foo.pm @ 425:c27434cdd611 ref20150831

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sync
author cin
date Tue, 03 Apr 2018 19:30:01 +0300
parents 3ed0c58e9da3
children
line wrap: on
line source

package Test::Config::Foo;
use strict;
use IMPL::declare {
    base => [
       'IMPL::Object' => undef
    ],
    props => [
       value => 'r'
    ]
};

sub CTOR {
    my $this = shift;
    
    $this->value(shift) if @_;
}

1;