summaryrefslogtreecommitdiff
path: root/unit1.pas
diff options
context:
space:
mode:
Diffstat (limited to 'unit1.pas')
-rw-r--r--unit1.pas4
1 files changed, 3 insertions, 1 deletions
diff --git a/unit1.pas b/unit1.pas
index 835bb19..84ef36f 100644
--- a/unit1.pas
+++ b/unit1.pas
@@ -90,8 +90,10 @@ begin
raise exception.create(''''+s+''' ist kein gültiger Wert für ''Ton geben'' (ja|nein)!');
s:=sl.grepFirst('^gültiger\s+Adressat\s*=');
- if s<>'' then
+ if s<>'' then begin
+ erstesArgument(s,'=');
ga:=s;
+ end;
sl.free;
end;