From 703e539acc3806467765be696edf8f60404f0898 Mon Sep 17 00:00:00 2001
From: Matt Sergeant <matt@sergeant.org>
Date: Sun, 5 Sep 2004 17:28:38 +0000
Subject: [PATCH] Make libscan work with subversion

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@305 958fd67b-6ff1-0310-b445-bb7760255be9
---
 Makefile.PL | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/Makefile.PL b/Makefile.PL
index c6a5720..9e0e220 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -11,3 +11,10 @@ WriteMakefile(
     AUTHOR         => 'Ask Bjorn Hansen <ask@develooper.com>',
     EXE_FILES      => [qw(qpsmtpd qpsmtpd-forkserver)],
 );
+
+sub MY::libscan {
+    my $path = $_[1];
+    return '' if $path =~ /\B\.svn\b/;
+    return $path;
+}
+