fix some stuff

git-svn-id: https://ws10smt.googlecode.com/svn/trunk@419 ec762483-ff6d-05da-a07a-a48fb63a330f

1 files changed, 2 insertions, 1 deletions

diff --git a/vest/dist-vest.pl b/vest/dist-vest.pl
index e445b4a0..3a39545b 100755
--- a/vest/dist-vest.pl
+++ b/vest/dist-vest.pl
@@ -58,7 +58,7 @@ my $oracleb=20;
 my $dirargs='';
 my $density_prune;
 my $usefork;
-my $cpbin=1;
+my $cpbin=0;
 # Process command-line options
 Getopt::Long::Configure("no_auto_abbrev");
 if (GetOptions(
@@ -174,6 +174,7 @@ sub modbin {
     for (@_) {
         my $src=$$_;
         $$_="$bindir/".`basename $src`;
+        chomp $$_;
         `cp $src $$_`;
         die "cp $src $$_ failed: $!" unless $? == 0;
     }