From 6e973f4b5da283aaced157493cf6fbe5b4491275 Mon Sep 17 00:00:00 2001
From: Penny Leach <penny@mjollnir.org>
Date: Wed, 28 Sep 2011 10:06:53 +0200
Subject: [PATCH] fixed formatting and added another exclusion in renametv.pl

---
 bin/renametv.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/bin/renametv.pl b/bin/renametv.pl
index 4470b8f..6e5db45 100755
--- a/bin/renametv.pl
+++ b/bin/renametv.pl
@@ -14,7 +14,7 @@ my @usualsuspects = qw/
     xvid xor ffndvd repack preair aaf 720p x264 dimension dvdrip
     hdtv 0tv fqm 2hd notv ws pdtv lol vtv xii dvdscr sys fov dot
     vostfr p0w4 caph fihtv flatline brrip ac3 flawl3ss asap
-    proper bufu notyou kfv immerse ctu webrip avdroid
+    proper bufu notyou kfv immerse ctu webrip avdroid haggis
 /;
 
 GetOptions(
@@ -46,6 +46,9 @@ while (<$inputdir/*>) {
         if ($epno =~ /^\d$/) {
             $epno = "0$epno";
         }
+        if ($epno =~ /^0(\d{3})$/) {
+            $epno = $1;
+        }
         $_ = $path . $series . '.' . $epno . '.' . $title;
     }
     next if $current eq $_;
-- 
2.39.5