[clfswm-cvs] [clfswm-git]CLFSWM - A(nother) Common Lisp FullScreen Window Manager branch master updated. R-1106-76-ga91d6ae

[Philippe Brochard]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "CLFSWM - A(nother) Common Lisp FullScreen Window Manager".

The branch, master has been updated
       via  a91d6aedd4da7e9b32d02e84ed0004cb9233b199 (commit)
      from  856032b396ce727e4088dead645abccf3de0da2f (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit a91d6aedd4da7e9b32d02e84ed0004cb9233b199
Author: Philippe Brochard <pbrochard at common-lisp.net>
Date:   Fri Aug 3 22:48:45 2012 +0200

    src/clfswm-internal.lisp (parse-xinerama-info): Remove test code

diff --git a/src/clfswm-internal.lisp b/src/clfswm-internal.lisp
index 5057285..daa76cf 100644
--- a/src/clfswm-internal.lisp
+++ b/src/clfswm-internal.lisp
@@ -809,9 +809,9 @@ XINERAMA version 1.1 opcode: 150
                 (destructuring-bind (w h x y)
                     (parse-xinerama-info line)
                   (push (list x y w h) sizes))))
-        ;;(remove-duplicates sizes :test #'equal)))))
+        (remove-duplicates sizes :test #'equal)))))
         ;;'((10 10 500 300) (550 50 400 400) (100 320 400 270))))))
-        '((10 10 500 580) (540 50 470 500))))))
+        ;;'((10 10 500 580) (540 50 470 500))))))
 
 
 (defun place-frames-from-xinerama-infos ()

-----------------------------------------------------------------------

Summary of changes:
 src/clfswm-internal.lisp |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)


hooks/post-receive
-- 
CLFSWM - A(nother) Common Lisp FullScreen Window Manager