--- a/ma	Tue Jul 04 21:52:14 2006 +0000
+++ b/ma	Fri Jul 14 14:32:38 2006 +0000
@@ -24,6 +24,8 @@
 		        (comma sep.)    [!$Cf->other!]
        --group:s	Mail Group(s) this account is member of
 			(comma sep.)	[!$Cf->group!]
+       --forward:s	Forwarding	[!$Cf->forward!]
+
        --fullname=s	Real Name	[!$Cf->fullname!]
        --password=s	Passwort	[!$Cf->password!]
 
@@ -52,9 +54,10 @@
 use Cyrus::IMAP::Admin;
 use AppConfig qw(:expand);
 use File::Basename;
+use FindBin;
 use Carp;
 
-use lib qw(. /usr/local/lib/ma);
+use lib ("$FindBin::RealBin/..", "$FindBin::RealBin/../lib/ma");
 use ldapBase;
 
 use constant ME => basename $0;
@@ -91,6 +94,7 @@
 
     other =>	    { ARGS => ":s" },
     group =>	    { ARGS => ":s" },
+    forward =>	    { ARGS => ":s" },
     fullname =>	    { ARGS => "=s", ALIAS => "realname" },
     address =>	    { ARGS => "=s", ALIAS => "primary" },