11 lines
580 B
Perl
11 lines
580 B
Perl
#!/usr/bin/perl -w
|
|
|
|
use esmith::Build::CreateLinks qw(:all);
|
|
|
|
safe_symlink("/usr/share/lemonldap-ng/portal-skins/ipasserelle", "root/var/lib/lemonldap-ng/portal/skins/ipasserelle");
|
|
foreach my $file (qw(info.tpl login.tpl openid.tpl openidform.tpl password.tpl standardform.tpl
|
|
yubikeyform.tpl confirm.tpl error.tpl mail.tpl notification.tpl redirect.tpl
|
|
header.tpl footer.tpl menu.tpl customhead.tpl)) {
|
|
safe_symlink("/usr/share/lemonldap-ng/portal-skins/pastel/$file", "root/usr/share/lemonldap-ng/portal-skins/ipasserelle/$file");
|
|
}
|