[Haskell-cafe] Using Haskell to write dbus server