e-smith-base/sme7/e-smith-base-4.18.1-freebusy.patch2

diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm mezzanine_patched_e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm
--- e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm    2008-04-19 08:56:51.000000000 -0600
+++ mezzanine_patched_e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm  2008-04-19 08:56:32.000000000 -0600
@@ -757,9 +757,10 @@
             'Street'         => $self->{cgi}->param('Street'),
             'EmailForward'   => $self->{cgi}->param('EmailForward'),
             'ForwardAddress' => $self->{cgi}->param('ForwardAddress'),
-            'FreeBusy'       => $self->{cgi}->param('FreeBusy'),
             'VPNClientAccess'=> $self->{cgi}->param('VPNClientAccess'),
         );
+        $newProperties{'FreeBusy'} = $self->{cgi}->param('FreeBusy') 
+            if defined $self->{cgi}->param('FreeBusy');
         $acct->merge_props(%newProperties);
 
         $accountdb->create_user_auto_pseudonyms($acctName);
1	slords	1.1	diff -Nur -x '.orig' -x '.rej' e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm mezzanine_patched_e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm
2			--- e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm 2008-04-19 08:56:51.000000000 -0600
3			+++ mezzanine_patched_e-smith-base-4.18.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/useraccounts.pm 2008-04-19 08:56:32.000000000 -0600
4			@@ -757,9 +757,10 @@
5			'Street' => $self->{cgi}->param('Street'),
6			'EmailForward' => $self->{cgi}->param('EmailForward'),
7			'ForwardAddress' => $self->{cgi}->param('ForwardAddress'),
8			- 'FreeBusy' => $self->{cgi}->param('FreeBusy'),
9			'VPNClientAccess'=> $self->{cgi}->param('VPNClientAccess'),
10			);
11			+ $newProperties{'FreeBusy'} = $self->{cgi}->param('FreeBusy')
12			+ if defined $self->{cgi}->param('FreeBusy');
13			$acct->merge_props(%newProperties);
14
15			$accountdb->create_user_auto_pseudonyms($acctName);