line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
# mamgal - a program for creating static image galleries |
2
|
|
|
|
|
|
|
# Copyright 2007, 2008 Marcin Owsiany |
3
|
|
|
|
|
|
|
# See the README file for license information |
4
|
|
|
|
|
|
|
# A class for any non-directory which is not a picture, either |
5
|
|
|
|
|
|
|
package App::MaMGal::Entry::NonPicture; |
6
|
2
|
|
|
2
|
|
3797
|
use strict; |
|
2
|
|
|
|
|
4
|
|
|
2
|
|
|
|
|
43
|
|
7
|
2
|
|
|
2
|
|
10
|
use warnings; |
|
2
|
|
|
|
|
3
|
|
|
2
|
|
|
|
|
57
|
|
8
|
2
|
|
|
2
|
|
9
|
use base 'App::MaMGal::Entry'; |
|
2
|
|
|
|
|
4
|
|
|
2
|
|
|
|
|
1001
|
|
9
|
2
|
|
|
2
|
|
9
|
use Carp; |
|
2
|
|
|
|
|
4
|
|
|
2
|
|
|
|
|
161
|
|
10
|
|
|
|
|
|
|
|
11
|
|
|
|
0
|
0
|
|
sub make {} |
12
|
4
|
|
|
4
|
0
|
1736
|
sub page_path { shift->{base_name} } |
13
|
|
|
|
4
|
0
|
|
sub thumbnail_path { } |
14
|
|
|
|
|
|
|
|
15
|
|
|
|
|
|
|
1; |