New upstream version 0.84

4 files changed, 26 insertions, 10 deletions

diff --git a/Changes b/Changes
index 0d0f2af..12924f1 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,10 @@
 Revision history for Perl extension Net::OpenSSH.
 
+0.84  Jul 2, 2023
+        - Fix scp/rsync_get handling of multiple source files (bug
+          report by Diab Jerius).
+        - Document how to run interative sftp sessions.
+
 0.83  Jan 22, 2023
         - Skip quoting test for broken AIX csh shell (bug report by
           jrtaisto@gmail.com, #rt133092).
diff --git a/META.json b/META.json
index c9a706c..0ecae32 100644
--- a/META.json
+++ b/META.json
@@ -4,7 +4,7 @@
       "Salvador Fandino <sfandino@yahoo.com>"
    ],
    "dynamic_config" : 1,
-   "generated_by" : "ExtUtils::MakeMaker version 7.62, CPAN::Meta::Converter version 2.150010",
+   "generated_by" : "ExtUtils::MakeMaker version 7.64, CPAN::Meta::Converter version 2.150010",
    "license" : [
       "perl_5"
    ],
@@ -42,6 +42,6 @@
          "url" : "https://github.com/salva/p5-Net-OpenSSH"
       }
    },
-   "version" : "0.83",
-   "x_serialization_backend" : "JSON::PP version 4.06"
+   "version" : "0.84",
+   "x_serialization_backend" : "JSON::PP version 4.07"
 }
diff --git a/META.yml b/META.yml
index 6acf70c..4ba6847 100644
--- a/META.yml
+++ b/META.yml
@@ -7,7 +7,7 @@ build_requires:
 configure_requires:
   ExtUtils::MakeMaker: '0'
 dynamic_config: 1
-generated_by: 'ExtUtils::MakeMaker version 7.62, CPAN::Meta::Converter version 2.150010'
+generated_by: 'ExtUtils::MakeMaker version 7.64, CPAN::Meta::Converter version 2.150010'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -21,5 +21,5 @@ requires:
   Test::More: '0'
 resources:
   repository: https://github.com/salva/p5-Net-OpenSSH
-version: '0.83'
+version: '0.84'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff --git a/lib/Net/OpenSSH.pm b/lib/Net/OpenSSH.pm
index c9db163..49fc9f7 100644
--- a/lib/Net/OpenSSH.pm
+++ b/lib/Net/OpenSSH.pm
@@ -1,6 +1,6 @@
 package Net::OpenSSH;
 
-our $VERSION = '0.83';
+our $VERSION = '0.84';
 
 use strict;
 use warnings;
@@ -2222,10 +2222,9 @@ sub _scp_get_args {
     my $prefix = $self->{_host_squared};
     $prefix = "$self->{_user}\@$prefix" if defined $self->{_user};
 
-    my $src = "$prefix:". join(" ", $self->_quote_args({quote_args => 1,
-                                                        glob_quoting => $glob},
-                                                       @_));
-    ($self, \%opts, $target, $src);
+    my @src = map "$prefix:". $self->_quote_args({quote_args => 1,
+                                                  glob_quoting => $glob}, $_), @_;
+    ($self, \%opts, $target, @src);
 }
 
 sub scp_get {
@@ -5114,6 +5113,18 @@ B<A>: Just call the C<system> method with an empty argument list:
    my $ssh = Net::OpenSSH->new(...);
    $ssh->system;
 
+B<Q>: How about running an interactive C<sftp> session?
+
+B<A>: Programs that use an underlying ssh connection usually provide
+some way (for instance, command line option C<-o>) to pass additional
+options for the C<ssh> command used to run that connection. We just
+need to use such mechanism to pass the path to the control socket.
+
+For instance, for the particular case of C<sftp>:
+
+  $cp = $ssh->get_ctl_path;
+  system "sftp", "-oControlPath=$cp", $host;
+
 =back
 
 =head1 SEE ALSO