diff options
author | Fred Drake <fdrake@acm.org> | 1998-02-18 14:52:24 (GMT) |
---|---|---|
committer | Fred Drake <fdrake@acm.org> | 1998-02-18 14:52:24 (GMT) |
commit | 9acafa8bb54c42eaa1ec252511eb7720ca4c268c (patch) | |
tree | 3c4efde0e5d3d4ce0fe4e1a543a483e1ee30a7ff /Doc/tools | |
parent | 0c17d661e03fa71801456193a7f141798d933aad (diff) | |
download | cpython-9acafa8bb54c42eaa1ec252511eb7720ca4c268c.zip cpython-9acafa8bb54c42eaa1ec252511eb7720ca4c268c.tar.gz cpython-9acafa8bb54c42eaa1ec252511eb7720ca4c268c.tar.bz2 |
Don't make backups.
Use "mv" instead of "ln -s" to install the new names.
Diffstat (limited to 'Doc/tools')
-rwxr-xr-x | Doc/tools/node2label.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Doc/tools/node2label.pl b/Doc/tools/node2label.pl index 8a77cbf..8159900 100755 --- a/Doc/tools/node2label.pl +++ b/Doc/tools/node2label.pl @@ -1,4 +1,4 @@ -#!/depot/gnu/plat/bin/perl -i~ +#!/depot/gnu/plat/bin/perl -i # read the labels, then reverse the mappings require "labels.pl"; @@ -33,6 +33,6 @@ while (<>) { } foreach $oldname (keys %newnames) { -# or mv - system("ln -s $oldname $newnames{$oldname}"); +# or ln -s + system("mv $oldname $newnames{$oldname}"); } |