source:
project/release/4/dbus/trunk/examples/introspect-avahi.scm
@
25884
| Last change on this file since 25884 was 25884, checked in by , 9 years ago | |
|---|---|
| File size: 234 bytes | |
| Line | |
|---|---|
| 1 | (use (prefix dbus dbus:)) |
| 2 | |
| 3 | (define ctxt (dbus:make-context |
| 4 | bus: dbus:system-bus |
| 5 | service: 'org.freedesktop.Avahi |
| 6 | ; path: '/ ;; by default is '/ anyway |
| 7 | )) |
| 8 | |
| 9 | (let ([response (dbus:discover-api-xml ctxt)]) |
| 10 | (display response) |
| 11 | ) |
| 12 | |
| 13 | (exit) |
Note: See TracBrowser
for help on using the repository browser.
