# HG changeset patch
# User edogawaconan <edho@myconan.net>
# Date 1320036889 -25200
# Node ID cf328bd0607828f48f59e9a091e3aa34623866e5
# Parent  2c94b1e14592aec2b55e2083117ead3a70a19e6f
Special check for windows. What the hell.

diff -r 2c94b1e14592 -r cf328bd06078 bin/ren
--- a/bin/ren	Mon Oct 31 11:35:05 2011 +0700
+++ b/bin/ren	Mon Oct 31 11:54:49 2011 +0700
@@ -460,6 +460,7 @@
   $newname =~ s/^Naruto - (\d{2}) /Naruto - 0$1 /;
   $newname =~ s/^Fairy Tail - (\d{2}) /Fairy Tail - 0$1 /;
   $newname =~ s/^Naruto - (\d{2})-(\d{2}) /Naruto - 0$1-0$2 /;
+  if ($^O eq "MSWin32") { $newname =~ s/ *\\ */\\/g; }
   print(qq($_: $newname already exists, skipping\n)) and next() if -e $newname and $_ ne $newname;
   if ($_ eq $newname) {
     print("$_: no need to rename, skipping\n");