Commit b7e8e96c authored by Wm Annis's avatar Wm Annis

Use open-default-display instead of open-display.

parent c6f0bc4d
......@@ -69,7 +69,7 @@
(with-slots (display screen window height-pixels width-pixels
stipple-gc default-grab-cursor color-p port-name) port
(setf port-name (list host display-number nscreen))
(setf display #-Allegro (xlib:open-display host :display display-number)
(setf display #-Allegro (xlib:open-default-display)
#+Allegro (open-display-with-auth host :display-number display-number))
(fill-keycode->modifier-state display)
(fill-clim-modifier-key-index->x-state display)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment