Changeset 410

Timestamp:

09/02/09 12:31:42 (15 years ago)

Author:

nanardon

Message:

• add tools to warn user when their will expire (script still need documentation)

Location:

LATMOS-Accounts

Files:

• bin/la-warn-expire (added)
• lib/LATMOS/Accounts/Bases/Ad/User.pm (modified) (3 diffs)
• lib/LATMOS/Accounts/Maintenance.pm (added)
• t/20_accounts.t (modified) (1 diff)
• templates (added)
• templates/mail (added)
• templates/mail/account_expire.mail (added)

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad/User.pm

@@ -73 +73 @@
         locked
         memberOf
+        winhomeDirectory
         ),
         ($mode !~ /w/
@@ -148 +149 @@
         $field = 'unixHomeDirectory';
     };
+    $field eq 'winhomeDirectory' and do {
+        $field = 'homeDirectory';
+    };
     $self->SUPER::get_field($field);
 }
@@ -161 +165 @@
         /^homeDirectory$/ and do {
             $field = 'unixHomeDirectory';
+            next;
+        };
+        /^winhomeDirectory$/ and do {
+            $field = 'homeDirectory';
             next;
         };

LATMOS-Accounts/t/20_accounts.t

@@ -1 +1 @@
 use strict;
 use warnings;
-use Test::More tests => 3;
+use Test::More tests => 4;
 use File::Temp;
 
 use_ok('LATMOS::Accounts');
+use_ok('LATMOS::Accounts::Maintenance');
 
 isa_ok(