From 975d448244c77be812f1a54fb184ace04287fa4c Mon Sep 17 00:00:00 2001
From: lissav <lissav@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 2 Jul 2012 12:47:01 +0000
Subject: [PATCH]  fix defect 3538653

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@13226 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/DSHCLI.pm | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/perl-xCAT/xCAT/DSHCLI.pm b/perl-xCAT/xCAT/DSHCLI.pm
index 4b544c42f..14e70991e 100644
--- a/perl-xCAT/xCAT/DSHCLI.pm
+++ b/perl-xCAT/xCAT/DSHCLI.pm
@@ -777,6 +777,7 @@ sub fork_fanout_dcp
             #eval "require RemoteShell::$rsh_extension";
             eval "require xCAT::$rsh_extension";
             my $remoteshell = "xCAT::$rsh_extension";
+            # HERE: Build the dcp command based on the arguments
             @dcp_command =
               $remoteshell->remote_copy_command(\%rcp_config, $remote_copy);
 
@@ -4251,9 +4252,13 @@ sub parse_and_run_dcp
             }
 
             else
-            {
-                $options{'target'} = '';
-                $options{'source'} = pop @ARGV;
+            {  
+                # HERE:only one line of input source and target in that line
+                # such as xdcp -R " /test/* /test"
+                my $tmparg = pop @ARGV;
+                my ($src,$tgt) = split " ", $tmparg;
+                $options{'target'} = $tgt;
+                $options{'source'} = join $::__DCP_DELIM, $src;
             }
         }
 
@@ -4266,6 +4271,7 @@ sub parse_and_run_dcp
 
         else
         {
+            # Get the source and the target
             $options{'target'} = pop @ARGV;
             $options{'source'} = join $::__DCP_DELIM, @ARGV;
         }
@@ -4273,6 +4279,7 @@ sub parse_and_run_dcp
     }
 
     # Execute the dcp api
+    # HERE:  Run xdcp
     @results = xCAT::DSHCLI->runDcp_api(\%options, 0);
     $::FAILED_NODES = $::RUNCMD_RC;