DBus binding for Tcl

list apply {{name info str} {if {$str eq $name} exit}} $name
Login

Empty Page