View | Details | Raw Unified | Return to bug 11190
Collapse All | Expand All

(-)a/Koha/Sitemapper.pm (-4 / +4 lines)
Lines 28-34 has url => ( is => 'rw', ); Link Here
28
28
29
has dir => (
29
has dir => (
30
    is => 'rw',
30
    is => 'rw',
31
    default => '.',
31
    default => sub { '.' },
32
    trigger => sub {
32
    trigger => sub {
33
        my ($self, $dir) = @_;
33
        my ($self, $dir) = @_;
34
        unless (-d $dir) {
34
        unless (-d $dir) {
Lines 38-52 has dir => ( Link Here
38
    }
38
    }
39
);
39
);
40
40
41
has short => ( is => 'rw', default => 1 );
41
has short => ( is => 'rw', default => sub { 1 } );
42
42
43
has verbose => ( is => 'rw', default => 0 );
43
has verbose => ( is => 'rw', default => sub { 0 } );
44
44
45
has sth => ( is => 'rw' );
45
has sth => ( is => 'rw' );
46
46
47
has writer => ( is => 'rw', );
47
has writer => ( is => 'rw', );
48
48
49
has count => ( is => 'rw', default => 0);
49
has count => ( is => 'rw', default => sub { 0 } );
50
50
51
51
52
sub run {
52
sub run {
(-)a/Koha/Sitemapper/Writer.pm (-4 / +3 lines)
Lines 31-39 my $MAX = 50000; Link Here
31
31
32
has sitemapper => (is => 'rw', );
32
has sitemapper => (is => 'rw', );
33
33
34
has current => ( is => 'rw', default => $MAX );
34
has current => ( is => 'rw', default => sub { $MAX } );
35
35
36
has count => ( is => 'rw', default => 0 );
36
has count => ( is => 'rw', default => sub { 0 } );
37
37
38
has writer => ( is => 'rw',  );
38
has writer => ( is => 'rw',  );
39
39
Lines 122-125 sub end { Link Here
122
}
122
}
123
123
124
124
125
1;
125
1;
126
- 

Return to bug 11190