[Sawfish] sawfish.wm.prg.xrandr

[Christopher Roy Bratusek <nano@xxxxxxxxxxxxx>]

Hi folks,

Have been playing around with xrandr stuff just for fun, not complete
or well tested, feel free to test/improve/trash or whatever.

Regards,
Chris

diff --git a/lisp/sawfish/wm/user.jl b/lisp/sawfish/wm/user.jl
index a810c1b..6a0a700 100644
--- a/lisp/sawfish/wm/user.jl
+++ b/lisp/sawfish/wm/user.jl
@@ -61,7 +61,8 @@
 	   sawfish.wm.prg.xgamma
 	   sawfish.wm.prg.xmobar
 	   sawfish.wm.prg.xmodmap
-	   sawfish.wm.prg.xsettingsd)
+	   sawfish.wm.prg.xsettingsd
+	   sawfish.wm.prg.xrandr)
      (access sawfish.wm.integration.kde
 	     sawfish.wm.integration.gnome
 	     sawfish.wm.integration.xfce
@@ -267,6 +268,10 @@ Possible values are \"kde\", \"gnome\", \"mate\", \"xfce\", \"razor\", \"lxde\"
   (unless batch-mode
     (when init-xgamma
       (add-hook 'after-initialization-hook (lambda () (xgamma-set-from-cfg t t t)) t))
+    (when init-xrandr
+      (add-hook 'after-initialization-hook xrandr-rotate-from-cfg t)
+      (when xrandr-scale-output
+        (add-hook 'after-initialization-hook xrandr-scale-from-cfg)))
     (when init-wallpaper
       (add-hook 'after-initialization-hook set-wallpaper t))
     (when init-fehlstart

Attachment: xrandr.jl
Description: Binary data