diff --git a/tools/mesh/lib/r0ket.pm b/tools/mesh/lib/r0ket.pm index 62741fb..9920b91 100755 --- a/tools/mesh/lib/r0ket.pm +++ b/tools/mesh/lib/r0ket.pm @@ -336,6 +336,10 @@ sub r0ket_init{ $term->setcc(VMIN,0); $term->setattr(fileno($bridge),TCSANOW); + #empty buffer, in case there is old data + my $dummy; + sysread($bridge,$dummy,1024); + return $ser; };