diff options
| author | Anton Berezin <tobez@FreeBSD.org> | 2004-01-12 12:15:27 +0000 |
|---|---|---|
| committer | Anton Berezin <tobez@FreeBSD.org> | 2004-01-12 12:15:27 +0000 |
| commit | c31ff7536d460472e0024d3007bf12cd8dfdf7b1 (patch) | |
| tree | 2ce5795c6246d583b47a7e7e428e95b01c9c9e49 /net/p5-File-RsyncP/files/patch-FileIO.pm | |
| parent | - Update to 0.77.1 (chase xmame port) (diff) | |
Add p5-File-RsyncP 0.44, perl Rsync client.
PR: 61240
Submitted by: Lars Thegler <lars@thegler.dk>
Diffstat (limited to 'net/p5-File-RsyncP/files/patch-FileIO.pm')
| -rw-r--r-- | net/p5-File-RsyncP/files/patch-FileIO.pm | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/net/p5-File-RsyncP/files/patch-FileIO.pm b/net/p5-File-RsyncP/files/patch-FileIO.pm new file mode 100644 index 000000000000..fe77c84a211a --- /dev/null +++ b/net/p5-File-RsyncP/files/patch-FileIO.pm @@ -0,0 +1,20 @@ +--- lib/File/RsyncP/FileIO.pm.orig Thu Jul 24 04:33:37 2003 ++++ lib/File/RsyncP/FileIO.pm Mon Jan 12 10:57:29 2004 +@@ -44,7 +44,7 @@ + use File::Find; + use Data::Dumper; + +-our $VERSION = '0.44'; ++use vars qw($VERSION); $VERSION = '0.44'; + + use constant S_IFMT => 0170000; # type of file + use constant S_IFDIR => 0040000; # directory +@@ -664,7 +664,7 @@ + + foreach my $str ( @logStr ) { + next if ( $str eq "" ); +- $fio->{logHandler}($str); ++ $fio->{logHandler}->($str); + } + } + |