metacity

collects/meta/drdr/config.rkt

@@ -9,7 +9,7 @@
 (drdr-directory "/opt/svn/drdr")
 (git-path "/usr/bin/git")
 (Xvfb-path "/usr/bin/Xnest")
-(fluxbox-path "/usr/bin/dwm")
+(fluxbox-path "/usr/bin/metacity")
 (vncviewer-path "/usr/bin/vncviewer")
 (current-make-install-timeout-seconds (* 90 60))
 (current-make-timeout-seconds (* 90 60))                                       

collects/meta/drdr/plt-build.rkt

@@ -403,10 +403,13 @@
                       (with-env
                        (["DISPLAY" (format ":~a" i)])
                        (sleep 2)
-                       (notify! "Starting fluxbox #~a" i)
+                       (notify! "Starting WM #~a" i)
                        (with-running-program
                         (fluxbox-path)
-                        empty
+                        (list "-d" (format ":~a" i)
+                              "--sm-disable"
+                              "--no-composite")
+                        #;empty
                         #;(list "-display"
                               (format ":~a" i)
                               "-rc" "/home/pltdrdr/.fluxbox/init")