Sophie

Sophie

distrib > Mageia > 5 > x86_64 > media > core-release > by-pkgid > aae65ab030b57bb481721f6823ecb9b0 > files > 30

apcupsd-3.14.13-3.mga5.x86_64.rpm

proc GetEvents {} {
   .events.text delete 0.0 end
   set fd [open "| ./client localhost:7000 events" "r"]
   while {[gets $fd line] > 0} {
      .events.text insert end "\n"
      .events.text insert end $line
   }    
   catch {close $fd}
   .events.text delete 0.0 2.0
}