--- gvpe/src/device-tincd.C	2005/03/03 16:54:34	1.12
+++ gvpe/src/device-tincd.C	2005/03/17 23:59:37	1.13
@@ -123,6 +123,9 @@
 # define IF_istun 1
 # include "tincd/raw_socket/device.c"
 
+#elif IF_uml_socket
+# include "tincd/uml_socket/device.c"
+
 #else
 # error No interface implementation for your IFTYPE/IFSUBTYPE combination.
 #endif
@@ -141,7 +144,12 @@
 {
   device = "(null)";
 
-  if (setup_device ())
+  bool ok = setup_device ();
+
+  if (device_info)
+    device = device_info;
+
+  if (ok)
     {
       slog (L_DEBUG, _("interface %s on %s initialized"), info (), device);
       fd = device_fd;
@@ -167,7 +175,7 @@
   if (!read_packet (reinterpret_cast<vpn_packet_t *>(pkt)))
     {
       delete pkt;
-      slog (L_ERR, _("can't read from to %s %s: %s"), info (), DEFAULT_DEVICE,
+      slog (L_ERR, _("can't read from to %s %s: %s"), info (), device,
             strerror (errno));
       return 0;
     }
@@ -195,7 +203,7 @@
       ether_emu.tap_to_tun (pkt) &&
 #endif
       !write_packet (reinterpret_cast<vpn_packet_t *>(pkt)))
-    slog (L_ERR, _("can't write to %s %s: %s"), info (), DEFAULT_DEVICE,
+    slog (L_ERR, _("can't write to %s %s: %s"), info (), device,
           strerror (errno));
 }