]> hydra-www.ietfng.org Git - acmetensortoys-snakecontrol/commitdiff
Further fixes to lcdproc-remind
authorNathaniel Wesley Filardo <nwfilardo@gmail.com>
Fri, 9 Jun 2017 08:34:33 +0000 (04:34 -0400)
committerNathaniel Wesley Filardo <nwfilardo@gmail.com>
Fri, 9 Jun 2017 08:34:33 +0000 (04:34 -0400)
bin/lcdproc-remind.expect

index 7d7dc5a8a5403e4e27fc7d68976976c85703776e..a44bbbd31c5db4b49724755e5d8fede6e4ea747e 100755 (executable)
@@ -14,6 +14,8 @@ set lcdsid [::lcdproclib::spawnlcd "localhost" "13666"]
 ::lcdproclib::cmd ${lcdsid} "widget_set 1 ti Reminders"
 
 ::lcdproclib::cmd ${lcdsid} "widget_add 1 v1 string"
+::lcdproclib::cmd ${lcdsid} "widget_add 1 v2 string"
+::lcdproclib::cmd ${lcdsid} "widget_add 1 v3 string"
 
 ::lcdproclib::cmd ${lcdsid} "screen_set 1 -priority info"
 
@@ -29,12 +31,15 @@ proc reload {lcdsid filename} {
 
   ::lcdproclib::cmd ${lcdsid} "widget_set 1 ti {[gets $fp]}"
   ::lcdproclib::cmd ${lcdsid} "widget_set 1 v1 1 2 {[gets $fp]}"
+  ::lcdproclib::cmd ${lcdsid} "widget_set 1 v2 1 3 {[gets $fp]}"
+  ::lcdproclib::cmd ${lcdsid} "widget_set 1 v3 1 4 {[gets $fp]}"
 
   close ${fp}
 }
 
 proc spawninotify {filename} {
   spawn inotifywait -e CLOSE_WRITE,DELETE_SELF ${filename}
+  wait -nowait -i ${spawn_id}
   return ${spawn_id}
 }