Changeset 861 for LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Mail.pm

Timestamp:

12/02/11 11:42:17 (13 years ago)

Author:

nanardon

Message:

• reimport missing files from previous svn

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Mail.pm (modified) (1 diff)

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Mail.pm

@@ -15 +15 @@
 
     my $base = {
-        file => {
-            aliases => $options{aliases} || '/etc/aliases',
-            revaliases => $options{revaliases} || '/etc/revaliases',
-        },
+        file => {},
         aliases => {},
         revaliases => {},
     };
+
+    foreach (qw(aliases revaliases)) {
+        if ($options{$_}) {
+            $base->{file}{$_} = $options{$_};
+        } elsif ($options{directory}) {
+            $base->{file}{$_} = $options{directory} . '/' . $_;
+        } else {
+            $base->{file}{$_} = "/etc/$_";
+        }
+    }
+
 
     bless($base, $class);