simplify discard of extraneous lines in lcdproclib

diff --git a/bin/lcdproclib.tcl b/bin/lcdproclib.tcl
index cffe11f54ea0339fd94f4b95aaac913ffdf07157..95ec8ad9e9c1cfe8f4100b4389630a625b0fbcfa 100644 (file)
--- a/bin/lcdproclib.tcl
+++ b/bin/lcdproclib.tcl
@@ -10,15 +10,12 @@ proc ::lcdproclib::cmd {sid cmd} {
          while { true } {
            expect {
              -i ${sid} -re "^success\[^\n\]*\n" { return }
-             -i ${sid} -re "^\r\n" { }
-             -i ${sid} -re "^listen\[^\n\]*\n" {}
-             -i ${sid} -re "^ignore\[^\n\]*\n" {}
+             -i ${sid} -re "\[^\n\]*\n" { }
              timeout { error "LCD protocol failure while waiting for success?" } 
            }
          }
        }
-      -i ${sid} -re "^listen\[^\n\]*\n" {}
-      -i ${sid} -re "^ignore\[^\n\]*\n" {}
+      -i ${sid} -re "\[^\n\]*\n" { }
       timeout { error "LCD protocol failure while waiting for echo?" } 
     }
   }