File: ConfigHome.pm

package info (click to toggle)
libmoosex-app-perl 1.43-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 712 kB
  • sloc: perl: 4,011; makefile: 2
file content (47 lines) | stat: -rw-r--r-- 919 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
# ============================================================================
package MooseX::App::Plugin::ConfigHome;
# ============================================================================

use 5.010;
use utf8;

use namespace::autoclean;
use Moose::Role;
with qw(MooseX::App::Plugin::Config);

sub plugin_metaroles {
    my ($self,$class) = @_;

    return {
        class   => [
            'MooseX::App::Plugin::Config::Meta::Class',
            'MooseX::App::Plugin::ConfigHome::Meta::Class'
        ],
    }
}

1;

__END__

=encoding utf8

=head1 NAME

MooseX::App::Plugin::ConfigHome - Config files in users home directory

=head1 SYNOPSIS

In your base class:

 package MyApp;
 use MooseX::App qw(ConfigHome);

=head1 DESCRIPTION

Works just like L<MooseX::App::Plugin::Config> but assumes that the config
file always resides in the user's home directory.

 ~/.${app-base}/config.(yml|xml|ini|...)

=cut