[STUMP] [PATCH] fix xinerama

[matthias.hinkfoth2]

Hi list,

the latest changes in git broke stumpwm for me.
I use a dual-head setup.
The last known good version is cc5ba9e.
The following patch, applied to b740b04 fixed the issue.

Regards,
Matthias

---
 head.lisp | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/head.lisp b/head.lisp
index 0dab8dd..12b7316 100644
--- a/head.lisp
+++ b/head.lisp
@@ -31,19 +31,19 @@
 
 (defun screen-info-head (screen-info)
   "Transform SCREEN-INFO structure from CLX to a HEAD structure from StumpWM."
-  (make-head :number (xlib/xinerama:screen-info-number screen-info)
-             :x (xlib/xinerama:screen-info-x screen-info)
-             :y (xlib/xinerama:screen-info-y screen-info)
-             :width (xlib/xinerama:screen-info-width screen-info)
-             :height (xlib/xinerama:screen-info-height screen-info)
+  (make-head :number (xlib.xinerama:screen-info-number screen-info)
+             :x (xlib.xinerama:screen-info-x screen-info)
+             :y (xlib.xinerama:screen-info-y screen-info)
+             :width (xlib.xinerama:screen-info-width screen-info)
+             :height (xlib.xinerama:screen-info-height screen-info)
              :window nil))
 
 (defun make-screen-heads (screen root)
   (declare (ignore screen))
   (cond ((and (xlib:query-extension *display* "XINERAMA")
-              (xlib/xinerama:xinerama-is-active *display*))
+              (xlib.xinerama:xinerama-is-active *display*))
          (mapcar 'screen-info-head
-                 (xlib/xinerama:xinerama-query-screens *display*)))
+                 (xlib.xinerama:xinerama-query-screens *display*)))
         (t (list (make-head :number 0 :x 0 :y 0
                             :width (xlib:drawable-width root)
                             :height (xlib:drawable-height root)
-- 
2.1.4