Subject: | MacOSX Lion the display is set as type INET instead of unix with patch |
In MacOSX Lion the display is set as type INET instead of Unix.
How to reproduce
echo $DISPLAY
/tmp/launch-asdbas/x.org:0
In line 2270 of version 0.56 this turns out as
host=tmp/launch-asdbas/x.org
dispnum=0
This is the relevant patch (please review for sideeffects)
--- /usr/lib/qvd/lib/perl5/site_perl/5.14.2/X11/Protocol.pm.orig
2012-07-30 13:12:39.000000000 +0200
+++ /usr/lib/qvd/lib/perl5/site_perl/5.14.2/X11/Protocol.pm 2012-07-30
13:26:08.000000000 +0200
@@ -2253,13 +2253,14 @@
}
unless ($conn) {
- $display =~ /^(?:[^:]*?\/)?(.*):(\d+)(?:.(\d+))?$/
+ $display =~ /^(?:[^:]*?)?(.*):(\d+)(?:.(\d+))?$/
or croak "Invalid display: `$display'\n";
$host = $Default_Display unless $host = $1;
$dispnum = $2;
$screen = 0 unless $screen = $3;
+ print "$display\n$1\n$2\n$host\n";
if ($] >= 5.00301) { # IO::Socket is bundled
- if ($host eq 'unix') {
+ if ($host eq 'unix' || $host =~ /^\//) {
require 'X11/Protocol/Connection/UNIXSocket.pm';
$conn = X11::Protocol::Connection::UNIXSocket
->open($host, $dispnum);