File: Authority.pm

package info (click to toggle)
libmessage-passing-perl 0.116-4
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster
  • size: 556 kB
  • ctags: 258
  • sloc: perl: 2,758; makefile: 21
file content (19 lines) | stat: -rw-r--r-- 292 bytes parent folder | download | duplicates (19) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
#line 1
package Module::Install::Authority;
use strict;
use warnings;
use base qw/Module::Install::Base/;

our $VERSION = '0.03';
$VERSION = eval $VERSION;

sub authority {
    my $self = shift;
    my $pause_id = shift;
    $self->Meta->{values}->{x_authority} = $pause_id;
}

1;

#line 69