| 1 | #!/opt/perl/bin/perl | 1 | #!/opt/perl/bin/perl |
|---|---|---|---|
| 2 | |||
| 2 | 3 | ||
| 3 | use strict; | 4 | use strict; |
| 4 | use warnings; | 5 | use warnings; |
| 5 | use utf8; | 6 | use utf8; |
| 6 | 7 | ||
| … | … | ||
| 115 | 116 | ||
| 116 | use strict; | 117 | use strict; |
| 117 | use warnings; | 118 | use warnings; |
| 118 | use utf8; | 119 | use utf8; |
| 119 | 120 | ||
| 120 | my $rcsid = '$Id: generate,v 1.21 2009/04/05 20:55:04 elmex Exp $'; | 121 | my $rcsid = '$Id: generate,v 1.22 2009/04/05 21:02:51 root Exp $'; |
| 121 | 122 | ||
| 122 | use base "Pod::POM::View"; | 123 | use base "Pod::POM::View"; |
| 123 | 124 | ||
| 124 | our $subdir; | 125 | our $subdir; |
| 125 | our $dir; | 126 | our $dir; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |