summaryrefslogtreecommitdiff
path: root/dateibeziehungen.pas
diff options
context:
space:
mode:
Diffstat (limited to 'dateibeziehungen.pas')
-rw-r--r--dateibeziehungen.pas8
1 files changed, 4 insertions, 4 deletions
diff --git a/dateibeziehungen.pas b/dateibeziehungen.pas
index 764ff9e..a27b0e4 100644
--- a/dateibeziehungen.pas
+++ b/dateibeziehungen.pas
@@ -348,6 +348,10 @@ begin
anfang:=erstesArgument(worin,'%dirname',false);
mitte:=erstesArgument(worin,'%',false);
if mitte='' then
+ qNum:=0
+ else
+ qNum:=strtoint(erstesArgument(mitte,',',true));
+ if mitte='' then
li:=0
else
li:=strtoint(erstesArgument(mitte,',',true));
@@ -355,10 +359,6 @@ begin
re:=-1
else
re:=strtoint(erstesArgument(mitte,',',true));
- if mitte='' then
- qNum:=0
- else
- qNum:=strtoint(erstesArgument(mitte,',',true));
if qNum>=momentanePosition then
fehler('Quellersetzung sieht ''%dirname%'' für Quelle Nummer '+inttostr(qNum)+' an Position '+inttostr(momentanePosition)+'.');