From 5d2be2320dbfc5c65d17785c5ec3b2dc0f154716 Mon Sep 17 00:00:00 2001
From: Flavio Poletti <flavio@polettix.it>
Date: Mon, 8 Sep 2008 11:55:01 +0200
Subject: [PATCH] Fixed bug due to a typo.

---
 remote | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/remote b/remote
index 6448e4b..c02a23b 100755
--- a/remote
+++ b/remote
@@ -283,17 +283,17 @@ sub _interact_with_program {
    binmode $in;
    binmode $out;
 
-   my $offset = 0;    # for taking stuff from $self->{_programfile}
+   my $offset = 0;    # for taking stuff from $self->{_tarfile}
    my $to_select = IO::Select->new($in);
    my $from_select = IO::Select->new($out, $err);
    my @result;
    while ($from_select->exists($out)) {
       if ($to_select->can_write(0)) {
-         my $nwritten = syswrite $in, $self->{_programfile}, 4096, $offset
+         my $nwritten = syswrite $in, $self->{_tarfile}, 4096, $offset
            or die "print(): $OS_ERROR";
 
          $offset += $nwritten;
-         if ($offset == length($self->{_programfile})) {
+         if ($offset == length($self->{_tarfile})) {
             $to_select->remove($in);
             undef $in;
          }
-- 
2.11.4.GIT