CVS daily diff
FreeXP CVS-Server
cvs-list at freexp.de
Die Nov 22 00:00:23 CET 2005
Index: freexp/xp3o.inc
===================================================================
RCS file: /server/cvs/freexp/xp3o.inc,v
retrieving revision 1.39
retrieving revision 1.40
diff -u -r1.39 -r1.40
--- freexp/xp3o.inc 21 Oct 2005 15:26:24 -0000 1.39
+++ freexp/xp3o.inc 21 Nov 2005 08:27:34 -0000 1.40
@@ -8,7 +8,7 @@
{ Die Nutzungsbedingungen fuer diesen Quelltext finden Sie in der }
{ Datei SLIZENZ.TXT oder auf www.crosspoint.de/oldlicense.html. }
{ --------------------------------------------------------------- }
-{ $Id: xp3o.inc,v 1.39 2005/10/21 15:26:24 mw Exp $ }
+{ $Id: xp3o.inc,v 1.40 2005/11/21 08:27:34 mw Exp $ }
procedure readpuffer;
@@ -233,12 +233,26 @@
begin
okay:=false;
if sender<>'' then
- { 05.01.05 HJT: UUZ versorgt jetzt aus 'Sender' den WAB }
- { damit muessen wir hier auch gegen den WAB pruefen }
- { okay:=((hdp2^.absender=sender) or (hdp2^.cust1=sender)) and (hdp2^.msgid=id) }
- okay:=((hdp2^.absender=sender) or (hdp2^.wab=sender)) and (hdp2^.msgid=id)
+ { 05.01.05 HJT: UUZ versorgt jetzt aus 'Sender' den WAB }
+ { damit muessen wir hier auch gegen den WAB pruefen }
+ { 18.11.05 MY: Wir müssen 'abs' sowohl gegen 'cust1' als }
+ { auch gegen 'wab' prüfen, weil 'Sender:' in dem einen }
+ { wie in dem anderen Header gelandet sein kann (je nach }
+ { UUZ, der das zu ersetzende Posting konvertiert hat). }
+ { okay:=((hdp2^.absender=sender) or (hdp2^.cust1=sender)) and
+ (hdp2^.msgid=id) }
+ okay:=((hdp2^.absender=sender) or (hdp2^.cust1=sender) or
+ (hdp2^.wab=sender)) and (hdp2^.msgid=id)
else
- okay:=(hdp2^.absender=abs) or (hdp2^.cust1=abs) and (hdp2^.msgid=id);
+ { 05.01.05 HJT: sieht auch merkwuerdig aus, }
+ { (der Vergleich auf cust1=abs macht keinen }
+ { Sinn, schadet aber auch nicht) }
+ { 18.11.05 MY: Wir müssen 'abs' sowohl gegen 'cust1' als }
+ { auch gegen 'wab' prüfen, weil 'Sender:' in dem einen }
+ { wie in dem anderen Header gelandet sein kann (je nach }
+ { UUZ, der das zu ersetzende Posting konvertiert hat). }
+ okay:=((hdp2^.absender=abs) or (hdp2^.cust1=abs) or
+ (hdp2^.wab=abs)) and (hdp2^.msgid=id);
end;
begin
@@ -1274,6 +1288,9 @@
end;
{
$Log: xp3o.inc,v $
+ Revision 1.40 2005/11/21 08:27:34 mw
+ MY: - Korrektur von Okay
+
Revision 1.39 2005/10/21 15:26:24 mw
HJT: - Hotfix gegen einen Fehler in der Supersedes-Behandlung
Mehr Informationen über die CVS-List Mailingliste