Changeset 1071 for trunk/LATMOS-Accounts/t

Timestamp:

07/24/12 22:56:06 (12 years ago)

Author:

nanardon

Message:

• rename options() to config() to clarify its role

Location:

trunk/LATMOS-Accounts/t

Files:

• 11_bases_unix.t (modified) (2 diffs)
• 15_bases_mail.t (modified) (2 diffs)
• 25_la_synchro.t (modified) (1 diff)

trunk/LATMOS-Accounts/t/11_bases_unix.t

@@ -18 +18 @@
 ok(my $unixb = LATMOS::Accounts::Bases->new(
     'unix',
-    passwd  => "$dir/passwd",
-    shadow  => "$dir/shadow",
-    group   => "$dir/group",
-    gshadow => "$dir/gshadow",
+    { params => {
+        passwd  => "$dir/passwd",
+        shadow  => "$dir/shadow",
+        group   => "$dir/group",
+        gshadow => "$dir/gshadow",
+    } }
     ), "Can get unix base");
 isa_ok($unixb, 'LATMOS::Accounts::Bases');
@@ -52 +54 @@
 ok(my $unixbmod = LATMOS::Accounts::Bases->new(
     'unix',
+    { params => { 
     passwd  => "$dir/passwd",
     shadow  => "$dir/shadow",
     group   => "$dir/group",
     gshadow => "$dir/gshadow",
+    } }
     ), "Can get unix base");
 ok($unixbmod->load, "Can load saved db");

trunk/LATMOS-Accounts/t/15_bases_mail.t

@@ -18 +18 @@
 ok(my $mailb = LATMOS::Accounts::Bases->new(
     'mail',
-    aliases  => "$dir/aliases",
-    revaliases  => "$dir/revaliases",
+    {
+    params => {
+        aliases  => "$dir/aliases",
+        revaliases  => "$dir/revaliases",
+    }}
     ), "Can get mail base");
 
@@ -41 +44 @@
 ok(my $mailbmod = LATMOS::Accounts::Bases->new(
     'mail',
+    { params => {
     aliases  => "$dir/aliases",
     revaliases  => "$dir/revaliases",
+    }}
     ), "Can get mail base");
 

trunk/LATMOS-Accounts/t/25_la_synchro.t

@@ -49 +49 @@
 ok(my $unixb = LATMOS::Accounts::Bases->new(
         'unix',
-        passwd  => "$workdir/passwd",
-        shadow  => "$workdir/shadow",
-        group   => "$workdir/group",
-        gshadow => "$workdir/gshadow",
+        {
+        params => {
+            passwd  => "$workdir/passwd",
+            shadow  => "$workdir/shadow",
+            group   => "$workdir/group",
+            gshadow => "$workdir/gshadow",
+        }
+        }
     ), "Can get unix base");
 isa_ok($unixb, 'LATMOS::Accounts::Bases::Unix');