epostunit.pas: erzeugeLinearesBild(): Fehlermeldung korrigiert

1 files changed, 4 insertions, 3 deletions

diff --git a/epostunit.pas b/epostunit.pas
index 39decce..8789aa0 100644
--- a/epostunit.pas
+++ b/epostunit.pas
@@ -6081,7 +6081,7 @@ end;
 
 function tWerte.erzeugeLinearesBild(sT: boolean; var f: tMyStringList; threads: longint): boolean;
 var
-  s,datei,achsenDatei:                   string;
+  s,t,datei,achsenDatei:                 string;
   i,j,k,schriftgroesze:                  longint;
   xZoom,yZoom,wert,schritt,miW,maW,Zeit,
   xp0,tp0:                               extended;
@@ -6324,10 +6324,11 @@ begin
         end;
         while s<>'' do begin
           setLength(verwKonturen,length(verwKonturen)+1);
-          i:=findeKontur(erstesArgument(s),nil,wertes,konturen,false);
+          t:=erstesArgument(s);
+          i:=findeKontur(t,nil,wertes,konturen,false);
           if (i<0) or (i>=length(konturen^)) then begin
             bekannteBefehle.sort;
-            gibAus('Die Kontur '''+s+''' gibt es nicht!'#10+bekannteBefehle.text,3);
+            gibAus('Die Kontur '''+t+''' gibt es nicht!'#10'Ansonsten kenne ich noch die Befehle:'#10+bekannteBefehle.text,3);
             aufraeumen;
             exit;
           end;