summaryrefslogtreecommitdiffstats
path: root/unix/mkLinks.tcl
diff options
context:
space:
mode:
authorredman <redman>1999-07-29 23:17:38 (GMT)
committerredman <redman>1999-07-29 23:17:38 (GMT)
commitdfd80e527ae80304b861420b7bd87131ecbe90df (patch)
tree169add5d3b87fb40af4ad770241d1ee4d1d3c18c /unix/mkLinks.tcl
parent2a5093e8452e5ec2c6d52b77e936eda1508cb2f1 (diff)
downloadtcl-dfd80e527ae80304b861420b7bd87131ecbe90df.zip
tcl-dfd80e527ae80304b861420b7bd87131ecbe90df.tar.gz
tcl-dfd80e527ae80304b861420b7bd87131ecbe90df.tar.bz2
* unix/mkLinks.tcl: Applied patch to avoid linking pack.n to
pack-old.n. Patch from Don Porter. [Bug: 2469] * doc/Encoding.n: Applied patch to fix typo in .SH NAME line. Patch from Don Porter. [Bug: 2451]
Diffstat (limited to 'unix/mkLinks.tcl')
-rw-r--r--unix/mkLinks.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/mkLinks.tcl b/unix/mkLinks.tcl
index f9afcb2..22f54f3 100644
--- a/unix/mkLinks.tcl
+++ b/unix/mkLinks.tcl
@@ -52,7 +52,7 @@ foreach file $argv {
regsub {\\-.*} $line {} line
foreach name [split $line ,] {
regsub -all { } $name "" name
- if {[string compare $tail $name$ext] != 0} {
+ if {![string match $name*$ext $tail]} {
puts "if test -r $tail; then"
puts " rm -f $name$ext"
puts " ln $tail $name$ext"