haskell - 如何从 xmonad 默认配置中删除 "Full"布局中的边框？

Question

目前我在用

import XMonad.Layout.NoBorders
...
xmonad $ defaultConfig { layoutHook = noBorders  $  layoutHook defaultConfig }

但这使得 noBorder 成为所有布局，而不仅仅是“Full”。

我知道，我可以简单地从默认配置复制 layoutHook 定义并在“Full”之前添加 noBorder，但我想要漂亮的方式，希望Haskell提供一些方法。

Answer 1

您可以使用 smartBorders 而不是使用 noBorders ，当只有一个窗口(或 float 窗口覆盖整个屏幕)时隐藏边框。这与仅使用 Full 布局隐藏它并不完全相同，但它可能足以满足您的目的。

否则，最好的选择可能是复制默认的 layoutHook。它不是很大，无论如何您将来很可能想要自定义它。您可以为所有标准 LayoutClass 编写一个带有实例的类型类es 将 noBorders 应用于 Full，但它比简单地复制默认 layoutHook 更难看。