/[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.1 - (hide annotations) (download)
Tue Jun 12 15:27:27 2007 UTC (17 years, 4 months ago) by slords
Branch: MAIN
CVS Tags: e-smith-email-4_16_0-23_el4_sme, e-smith-email-4_16_0-20_el4_sme, e-smith-email-4_16_0-25_el4_sme, e-smith-email-4_16_0-22_el4_sme, e-smith-email-4_16_0-24_el4_sme, e-smith-email-4_16_0-21_el4_sme
Branch point for: e-smith-email-4_16-tree
Import on branch sme7 of package e-smith-email-4.16.0-20.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