Sam*_*mat 2 configuration haskell xmonad
目前我用
import XMonad.Layout.NoBorders
...
xmonad $ defaultConfig { layoutHook = noBorders $ layoutHook defaultConfig }
Run Code Online (Sandbox Code Playgroud)
但这会产生noBorder所有布局,而不仅仅是" Full".
我知道,我可以简单地layoutHook从默认配置复制定义并noBorder在" Full" 之前添加,但我想要美丽的方式,希望Haskell为它提供一些方法.
noBorders您可以使用smartBorders,而不是使用,当只有一个窗口(或浮动窗口覆盖整个屏幕)时隐藏边框.这与将Full布局隐藏起来并不完全相同,但它可能足够接近您的目的.
如果做不到这一点,最好的选择可能是复制默认值layoutHook.它不是很大,无论如何你很可能想要在未来定制它.你也许可以写与实例一类型类的所有标准LayoutClass适用ES noBorders到Full,但它会是不是简单的拷贝默认的丑陋layoutHook.