From 29d8cc60353d21240e3a696155b159b047dd22e7 Mon Sep 17 00:00:00 2001 From: Mariano Alvira Date: Sat, 9 May 2009 16:39:42 -0400 Subject: [PATCH 1/2] only send the aux string if there is one to send --- mc1322x-load.pl | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/mc1322x-load.pl b/mc1322x-load.pl index 45c13b3a8..7aaefb9d3 100755 --- a/mc1322x-load.pl +++ b/mc1322x-load.pl @@ -103,9 +103,11 @@ while(1) { print "done sending files.\n"; -print "sending " ; -print @ARGV; -print ",\n"; +if(scalar(@ARGV)!=0) { + print "sending " ; + print @ARGV; + print ",\n"; +} $ob->write(@ARGV); $ob->write(','); From ad1927f2c8273836d06edc096f7ee4f267dca78f Mon Sep 17 00:00:00 2001 From: Mariano Alvira Date: Sat, 9 May 2009 16:40:43 -0400 Subject: [PATCH 2/2] send aux string only when there is one to send --- mc1322x-load.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/mc1322x-load.pl b/mc1322x-load.pl index 7aaefb9d3..6145768c9 100755 --- a/mc1322x-load.pl +++ b/mc1322x-load.pl @@ -107,10 +107,10 @@ if(scalar(@ARGV)!=0) { print "sending " ; print @ARGV; print ",\n"; -} -$ob->write(@ARGV); -$ob->write(','); + $ob->write(@ARGV); + $ob->write(','); +} my $c; my $count; while(1) {