summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2017-11-24 15:07:20 +0100
committerErich Eckner <git@eckner.net>2017-11-24 15:07:20 +0100
commit3c9b7073f95db84c234524e743dc5900bd30fa9b (patch)
treeed8b0e20b474834b0d3444ca4c79962473b0c9e2
parenta88cebe39e56cc99f407884456b80a01eeac7b70 (diff)
downloadMake-3c9b7073f95db84c234524e743dc5900bd30fa9b.tar.xz
bequemere Reihenfolge der %dirname% Parameter: Quelle, von, bis
-rw-r--r--Make.1.in6
-rw-r--r--dateibeziehungen.pas8
2 files changed, 7 insertions, 7 deletions
diff --git a/Make.1.in b/Make.1.in
index 1060668..08e8e54 100644
--- a/Make.1.in
+++ b/Make.1.in
@@ -81,9 +81,9 @@ file name of \fIn\fP-th source file
file name of \fIn\fP-th source file without extension(s)
.TP
.B "%dirname\fIn1\fP,\fIn2\fP,\fIn3\fP%" (*)
-components \fIn1\fP upto \fIn2\fP of path to \fIn3\fP-th source file.
-Negative numbers \fIn1\fP or \fIn2\fP are counted from the back - e.g. \fB-1\fP is the last path component, etc.
-If omitted, \fIn2\fP defaults to \fI-1\fP.
+components \fIn2\fP upto \fIn3\fP of path to \fIn1\fP-th source file.
+Negative numbers \fIn2\fP or \fIn3\fP are counted from the back - e.g. \fB-1\fP is the last path component, etc.
+If omitted, \fIn3\fP defaults to \fI-1\fP.
.TP
.B "%DIRNAME%"
path to \fIMachdatei\fP
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)+'.');