forked from webmin/authentic-theme
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathsettings.pm
More file actions
20 lines (18 loc) · 684 Bytes
/
settings.pm
File metadata and controls
20 lines (18 loc) · 684 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#
# Authentic Theme (https://github.com/qooob/authentic-theme)
# Copyright Ilia Rostovtsev <programming@rostovtsev.ru>
# Licensed under MIT (https://github.com/qooob/authentic-theme/blob/master/LICENSE)
#
our @_s_e = _settings('exclusions', undef, undef);
my @settings = _settings('get', undef, undef);
print _settings('header', undef, undef);
for (my $i = 0; $i < scalar(@settings) - 1; $i += 2) {
if ($settings[$i] ne '__') {
print _settings('content', $settings[$i], $settings[$i + 1]);
} else {
my @section = split /\~/, $settings[$i + 1];
print _settings('section', $section[0], $section[1]);
}
}
print _settings('footer', undef, undef);
1;