/[smeserver]/rpms/e-smith-email/sme7/e-smith-email-4.16.0-danglingpseudonyms.patch
ViewVC logotype

Annotation of /rpms/e-smith-email/sme7/e-smith-email-4.16.0-danglingpseudonyms.patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.2 - (hide annotations) (download)
Fri Dec 28 03:24:07 2007 UTC (16 years, 10 months ago) by slords
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +0 -0 lines
FILE REMOVED
Import on branch sme7 of package e-smith-email-4.17.0-3.el4.sme.src.rpm

1 slords 1.1 diff -Nur -x '*.orig' -x '*.rej' e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm mezzanine_patched_e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm
2     --- e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm 2006-03-15 06:23:58.000000000 +1100
3     +++ mezzanine_patched_e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm 2006-04-05 14:50:00.862838246 +1000
4     @@ -304,6 +304,16 @@
5     if ($account->prop('type') eq "pseudonym") {
6     my $target = $accounts->get($account->prop('Account'));
7    
8     + unless ($target)
9     + {
10     + warn "WARNING: pseudonym ("
11     + . $account->key
12     + . ") => missing Account("
13     + . $account->prop('Account')
14     + . ")\n";
15     + next;
16     + }
17     +
18     $existingAccounts{$account->key} = $account->key
19     unless ($target->prop('type') eq "pseudonym");
20     }

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed