diff options
| author | Steve Bennett <steveb@workware.net.au> | 2016-01-18 09:32:08 +1000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2016-01-18 09:32:08 +1000 |
| commit | 745c42030221ddbca03120ed6e4a422be141fbdf (patch) | |
| tree | 2b2b8456e3baf792995bc1465c6f97559de62913 /autosetup/system.tcl | |
| parent | 749313615f97b2498f39d2f2e5e293d2d6fc63d3 (diff) | |
| download | jimtcl-745c42030221ddbca03120ed6e4a422be141fbdf.zip jimtcl-745c42030221ddbca03120ed6e4a422be141fbdf.tar.gz jimtcl-745c42030221ddbca03120ed6e4a422be141fbdf.tar.bz2 | |
Update autosetup to latest version
autosetup 0.6.1-87-g7a28043
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'autosetup/system.tcl')
| -rw-r--r-- | autosetup/system.tcl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/autosetup/system.tcl b/autosetup/system.tcl index 2712e39..0166616 100644 --- a/autosetup/system.tcl +++ b/autosetup/system.tcl @@ -109,9 +109,10 @@ proc write-if-changed {file buf {script {}}} { # Each pattern of the form @define@ is replaced the the corresponding # define, if it exists, or left unchanged if not. # -# The special value @srcdir@ is subsituted with the relative +# The special value @srcdir@ is substituted with the relative # path to the source directory from the directory where the output -# file is created. Use @top_srcdir@ for the absolute path. +# file is created, while the special value @top_srcdir@ is substituted +# with the relative path to the top level source directory. # # Conditional sections may be specified as follows: ## @if name == value @@ -153,8 +154,9 @@ proc make-template {template {out {}}} { # Make sure the directory exists file mkdir $outdir - # Set up srcdir to be relative to the target dir + # Set up srcdir and top_srcdir to be relative to the target dir define srcdir [relative-path [file join $::autosetup(srcdir) $outdir] $outdir] + define top_srcdir [relative-path $::autosetup(srcdir) $outdir] set mapping {} foreach {n v} [array get ::define] { |