主页 / unix / 问题 / 413095
Accepted
Avaq
Asked: 2017-12-27 03:04:59 +0800 CST

在 XMonad 中的特定一侧渲染窗口边框

  • 772

XMobar 允许配置边框位置以及宽度：

{ border = BottomB
, borderColor = "#4F5B66"
, borderWidth = 1 }

我希望在 XMonad 中做同样的事情，但似乎边界只能通过以下属性进行配置：

{ borderWidth = 1
, normalBorderColor = "#4F5B66"
, focusedBorderColor = "#96B5B4" }

即使使用XMonad.Layout.NoBorders，这似乎也不是一个选项（或不是一个简单的选项）。

最后，我想要一个像素的底部边框，它总是被绘制并根据焦点改变颜色。这目前是否可行，我将如何进行这样的设置？

xmonad haskell

1 个回答

  1. Best Answer

    在这个问题很少受到关注之后，我打开的 GitHub 问题已经充分回答了这个问题。

    这样做的问题是 xmonad 不绘制自己的边界。它只是告诉 X 它们应该有多厚和什么颜色。

    [可以] 告诉 X [with]结构border_pixmap中的元素使用某些模式XSetWindowAttributes。

    如果您假设 [ https://tronche.com/gui/x/xlib/window/attributes/border.html]中的所有警告 [描述]实际上并不存在或没有任何意义，那么您可能会得出结论[...] 可以通过指定一个环绕整个窗口的非常大的像素图来设置仅底部边框。

    [就目前而言，] 图形驱动程序编写者不断打破服务器端边界，因为现在只有 xmonad 和 dwm 使用它们。而且两者都没有使用borderPixmap，所以那里可能隐藏了很多错误。

    这里的要点是，虽然理论上应该可以为此使用窗口属性，但这不是一个好主意。有一种替代方法可能更好：

    要在 xmonad 中获得此结果，您需要有宽度为 0 的边框，然后实现窗口装饰，在您想要“边框”的位置放置一个彩色条。

    实际上很容易编写一个装饰样式类的实例，它将在窗口的一侧放置一个类似边框的装饰。如果那一侧是顶部或底部，那么栏将足够宽，并且窗口的标题文本将在其中呈现，但可以通过将文本设置为与栏相同的颜色或提供空白来解决问题字体。

    {-# LANGUAGE MultiParamTypeClasses, FlexibleInstances #-}

import qualified XMonad.StackSet as W
import XMonad.Layout.Decoration
import XMonad.Util.Types

data SideDecoration a = SideDecoration Direction2D
  deriving (Show, Read)

instance Eq a => DecorationStyle SideDecoration a where

  shrink b (Rectangle _ _ dw dh) (Rectangle x y w h)
    | SideDecoration U <- b = Rectangle x (y + fi dh) w (h - dh)
    | SideDecoration R <- b = Rectangle x y (w - dw) h
    | SideDecoration D <- b = Rectangle x y w (h - dh)
    | SideDecoration L <- b = Rectangle (x + fi dw) y (w - dw) h

  pureDecoration b dw dh _ st _ (win, Rectangle x y w h)
    | win `elem` W.integrate st && dw < w && dh < h = Just $ case b of
      SideDecoration U -> Rectangle x y w dh
      SideDecoration R -> Rectangle (x + fi (w - dw)) y dw h
      SideDecoration D -> Rectangle x (y + fi (h - dh)) w dh
      SideDecoration L -> Rectangle x y dw h
    | otherwise = Nothing
    • 1

相关问题