git://git.jankratochvil.net
/
nethome.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Handle present `File::Remove'.
[nethome.git]
/
bin
/
cvsutil
diff --git
a/bin/cvsutil
b/bin/cvsutil
index
26b49a9
..
7aa18ec
100755
(executable)
--- 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 {
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]) {
{
my $r="";
if ("SCALAR" eq ref $_[0]) {