projects
/
feisty_meow.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
adding path support to spacemall
[feisty_meow.git]
/
scripts
/
files
/
renlower.pl
diff --git
a/scripts/files/renlower.pl
b/scripts/files/renlower.pl
index d4e3f11fa9d2ec4d9bdef70ce7a92a05eba830ab..1fe9fa1ff27490ac9851b305cc25cc3ec4ccaa4f 100644
(file)
--- a/
scripts/files/renlower.pl
+++ b/
scripts/files/renlower.pl
@@
-45,9
+45,9
@@
sub rename_lower {
#print "new name='$new_name'\n";
local $intermediate_name = $dir . "RL" . rand() . ".tmp";
#print "\n";
#print "new name='$new_name'\n";
local $intermediate_name = $dir . "RL" . rand() . ".tmp";
#print "\n";
-
#
print "command A is: rename [$old_name] [$intermediate_name]\n";
-
#
print "command B is: rename [$intermediate_name] [$new_name]\n";
-
#
print "\n";
+print "command A is: rename [$old_name] [$intermediate_name]\n";
+print "command B is: rename [$intermediate_name] [$new_name]\n";
+print "\n";
rename($old_name, $intermediate_name)
|| die "failed to do initial rename";
rename($intermediate_name, $new_name)
rename($old_name, $intermediate_name)
|| die "failed to do initial rename";
rename($intermediate_name, $new_name)