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 | |
| 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.
| -rwxr-xr-x | Doc/node2label.pl | 6 | ||||
| -rwxr-xr-x | Doc/tools/node2label.pl | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/Doc/node2label.pl b/Doc/node2label.pl index 8a77cbf..8159900 100755 --- a/Doc/node2label.pl +++ b/Doc/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}"); } 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}"); } |