aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAngelo Naselli <anaselli@linux.it>2015-12-22 23:46:15 +0100
committerAngelo Naselli <anaselli@linux.it>2015-12-22 23:46:15 +0100
commite140445b6f29e7e8830486d96163410e79325ede (patch)
tree5e8bb5fd9673b6f67245f5e498517ba7c52121bf
parentb832530fdb864cd7d8d3d27151558d630893b5d8 (diff)
downloadmanatools-e140445b6f29e7e8830486d96163410e79325ede.tar
manatools-e140445b6f29e7e8830486d96163410e79325ede.tar.gz
manatools-e140445b6f29e7e8830486d96163410e79325ede.tar.bz2
manatools-e140445b6f29e7e8830486d96163410e79325ede.tar.xz
manatools-e140445b6f29e7e8830486d96163410e79325ede.zip
Added a quick fix to manage local configuration for testing purpose
-rw-r--r--lib/ManaTools/Module/Firewall.pm11
1 files changed, 10 insertions, 1 deletions
diff --git a/lib/ManaTools/Module/Firewall.pm b/lib/ManaTools/Module/Firewall.pm
index 873fb44b..8cfebb8e 100644
--- a/lib/ManaTools/Module/Firewall.pm
+++ b/lib/ManaTools/Module/Firewall.pm
@@ -139,9 +139,18 @@ has 'aboutDialog' => (
has 'conf' => (
is => 'ro',
isa => 'Str',
- default => sub { return $::prefix."/etc/manatools/manawall/spec.conf" },
+ builder => '_confBuilder',
);
+sub _confBuilder {
+ my $self = shift();
+ my $confDir = $self->commandline()->conf_dir() || "/etc/manatools";
+ chop $confDir if substr($confDir, -1) eq '/';
+ $confDir .= "/manawall/spec.conf";
+
+ return $confDir;
+}
+
sub _setupAboutDialog {
my $self = shift();
return {