X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=sgf_rename;h=b6c9ff57e4baa50e8e6a3d3ad4a48e292ebd3f96;hb=3d5241a316e3ff729b19b878b0841558120f75e9;hp=759380ce65da4bd4e27100dca6e6fd9927d45ef1;hpb=881a2c98ccd186f8286a9c79d244b0958e5da5b4;p=bin.git

diff --git a/sgf_rename b/sgf_rename
index 759380c..b6c9ff5 100755
--- a/sgf_rename
+++ b/sgf_rename
@@ -39,4 +39,11 @@ for my $sgf (@ARGV) {
      next if $sgf eq $new_file;
      warn "$new_file already exists" and next if -e $new_file;
      rename($sgf,$new_file);
+     my $psgz = $sgf;
+     $psgz =~ s/\.sgf/.ps.gz/;
+     if (-e $psgz) {
+	  my $new_psgz = $new_file;
+	  $new_psgz =~ s/\.sgf/.ps.gz/;
+	  rename($psgz,$new_psgz);
+     }
 }