From a66fc06a445caf27523b3f623a2a6453f75d62c9 Mon Sep 17 00:00:00 2001
From: Penny Leach <penny@mjollnir.org>
Date: Fri, 15 Apr 2011 08:17:12 +0200
Subject: [PATCH] new version of tv renaming

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

diff --git a/bin/renametv.pl b/bin/renametv.pl
index 7fcbf21..6a62dd0 100755
--- a/bin/renametv.pl
+++ b/bin/renametv.pl
@@ -13,7 +13,8 @@ my $somethingtodo = 0;
 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 fihtv kfv
+    vostfr p0w4 caph fihtv flatline brrip ac3 flawl3ss asap
+    proper bufu notyou kfv immerse
 /;
 
 GetOptions(
@@ -59,7 +60,6 @@ print "do you want to continue? [Y/n]";
 my $answer = <STDIN>;
 
 chomp $answer;
-
 if ($answer eq 'Y' || $answer eq 'y' || $answer eq '') {
     print 'Moving ...';
     foreach my $key (keys %$filenames) {
-- 
2.39.5