diff options
author | Erich Eckner <git@eckner.net> | 2019-06-27 22:15:19 +0200 |
---|---|---|
committer | Erich Eckner <git@eckner.net> | 2019-06-27 22:15:19 +0200 |
commit | 57a20764ecd58a76e6959f395025450a92ae1f4d (patch) | |
tree | 3691fb06fd619c6b6b6beac3f164a12ed5aeb069 /unit1.pas | |
parent | ba7cfaaed229ccc9b3c8595e1edf6025c686efcb (diff) | |
download | Emails-57a20764ecd58a76e6959f395025450a92ae1f4d.tar.xz |
Diffstat (limited to 'unit1.pas')
-rw-r--r-- | unit1.pas | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -267,8 +267,10 @@ var ausgabe: string; begin for i:=pc.nAnz-1 downto 0 do - if pc.spam(i)=slSpam then + if pc.spam(i)=slSpam then begin pc.loesche(i); + exit; // we will be notified again (iff there are new messages left) + end; mitMarkeDa:=0; memo1.lines.clear; ung:=0; |