4 files changed, 22 insertions, 22 deletions
diff --git a/net-p2p/torrentsniff/Makefile b/net-p2p/torrentsniff/Makefile
index eca0a26e6794..e843760b96da 100644
--- a/net-p2p/torrentsniff/Makefile
+++ b/net-p2p/torrentsniff/Makefile
@@ -14,7 +14,7 @@ RUN_DEPENDS=	p5-libwww>=0:www/p5-libwww \
 		p5-Digest-SHA1>=0:security/p5-Digest-SHA1
 
 NO_BUILD=	yes
-USES=		shebangfix perl5
+USES=		dos2unix shebangfix perl5
 SHEBANG_FILES=	torrentsniff
 
 do-install:
diff --git a/net-p2p/torrentsniff/files/patch-BitTorrent-BDecode.pm b/net-p2p/torrentsniff/files/patch-BitTorrent-BDecode.pm
deleted file mode 100644
index 9caadb0eda4e..000000000000
--- a/net-p2p/torrentsniff/files/patch-BitTorrent-BDecode.pm
+++ /dev/null
@@ -1,10 +0,0 @@
---- BitTorrent/BDecode.pm.orig	Sun Jun 15 05:47:46 2003
-+++ BitTorrent/BDecode.pm	Fri Nov 14 18:42:44 2003
-@@ -5,7 +5,6 @@
- use Carp;
- use base 'Exporter';
- use strict;
--our @EXPORT_OK = qw(bdecode);
- 
- sub bdecode {
-   my ($dataref) = @_;
diff --git a/net-p2p/torrentsniff/files/patch-BitTorrent_BDecode.pm b/net-p2p/torrentsniff/files/patch-BitTorrent_BDecode.pm
new file mode 100644
index 000000000000..43b9a4dab7ac
--- /dev/null
+++ b/net-p2p/torrentsniff/files/patch-BitTorrent_BDecode.pm
@@ -0,0 +1,10 @@
+--- BitTorrent/BDecode.pm.orig	2016-06-20 14:38:26 UTC
++++ BitTorrent/BDecode.pm
+@@ -5,7 +5,6 @@ package BitTorrent::BDecode;
+ use Carp;
+ use base 'Exporter';
+ use strict;
+-our @EXPORT_OK = qw(bdecode);
+ 
+ sub bdecode {
+   my ($dataref) = @_;
diff --git a/net-p2p/torrentsniff/files/patch-torrentsniff b/net-p2p/torrentsniff/files/patch-torrentsniff
index 03062bb7be8e..6c14566c0ed9 100644
--- a/net-p2p/torrentsniff/files/patch-torrentsniff
+++ b/net-p2p/torrentsniff/files/patch-torrentsniff
@@ -1,11 +1,11 @@
---- torrentsniff.orig	Fri Nov 14 18:17:20 2003
-+++ torrentsniff	Fri Nov 14 18:27:24 2003
-@@ -115,7 +115,7 @@
- 	my($file, $report_file_info, $report_tracker_info) = @_;
- 	print "$file\n";
- 	local *TOR;
--	if( not open(TOR, "<", $file) ) {
-+	if( not open(TOR, "< $file") ) {
- 		print STDERR "Unable to read $file because of $!\n";
- 		return 0;
- 	}
+--- torrentsniff.orig	2016-06-20 14:38:26 UTC
++++ torrentsniff
+@@ -115,7 +115,7 @@ sub process_file {
+ 	my($file, $report_file_info, $report_tracker_info) = @_;
+ 	print "$file\n";
+ 	local *TOR;
+-	if( not open(TOR, "<", $file) ) {
++	if( not open(TOR, "< $file") ) {
+ 		print STDERR "Unable to read $file because of $!\n";
+ 		return 0;
+ 	}