From bb8a3a439bbbcf92314f69225437e852c8159528 Mon Sep 17 00:00:00 2001
From: lace <>
Date: Wed, 11 Apr 2007 14:46:27 +0000
Subject: [PATCH] Handle present `File::Remove'.

---
 bin/cvsutil | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/bin/cvsutil b/bin/cvsutil
index 26b49a9..7aa18ec 100755
--- a/bin/cvsutil
+++ b/bin/cvsutil
@@ -18,8 +18,8 @@ use Cwd qw(chdir fastgetcwd);
 use Errno qw(ENOENT);
 use Carp qw(confess cluck croak carp);
 BEGIN {
-	if (!eval q{use File::Remove qw(remove);}) {{
-		sub main::remove
+	if (!eval q{ use File::Remove qw(remove); 1; }) {{
+		sub main::remove(@)
 		{
 			my $r="";
 			if ("SCALAR" eq ref $_[0]) {
-- 
1.8.3.1