|
Lines 28-34
my @themes;
Link Here
|
| 28 |
# OPAC themes |
28 |
# OPAC themes |
| 29 |
my $opac_dir = 'koha-tmpl/opac-tmpl'; |
29 |
my $opac_dir = 'koha-tmpl/opac-tmpl'; |
| 30 |
opendir ( my $dh, $opac_dir ) or die "can't opendir $opac_dir: $!"; |
30 |
opendir ( my $dh, $opac_dir ) or die "can't opendir $opac_dir: $!"; |
| 31 |
for my $theme ( grep { not /^\.|lib|js/ } readdir($dh) ) { |
31 |
for my $theme ( grep { not /^\.|lib|js|xslt/ } readdir($dh) ) { |
| 32 |
push @themes, "$opac_dir/$theme/en"; |
32 |
push @themes, "$opac_dir/$theme/en"; |
| 33 |
} |
33 |
} |
| 34 |
close $dh; |
34 |
close $dh; |
| 35 |
- |
|
|