+static void
+registry_set_ior (SpiRegistry *registry){
+ Atom AT_SPI_IOR = XInternAtom (spi_get_display (), "AT_SPI_IOR", FALSE);
+ char *iorstring = NULL;
+
+ iorstring = SPI_DBUS_NAME_REGISTRY;
+
+ XChangeProperty (spi_get_display(),
+ XDefaultRootWindow (spi_get_display ()),
+ AT_SPI_IOR, (Atom) 31, 8,
+ PropModeReplace,
+ (unsigned char *) iorstring,
+ iorstring ? strlen (iorstring) : 0);
+}