在 Linux 上使用 Haskell 获取前台窗口标题

【问题标题】：Get foreground window title using Haskell on Linux在 Linux 上使用 Haskell 获取前台窗口标题
【发布时间】：2018-09-26 21:31:36
【问题描述】：

在Windows下，可以使用getForegroundWindow获取前台窗口标题

在 Linux 上使用 Haskell 获取前台窗口标题是否有等效的方法？（最好不使用 FFI）

【问题讨论】：

【解决方案1】：

使用X11 库：

import Graphics.X11
import Graphics.X11.Xlib.Extras

main = do
  d <- openDisplay ""
  (w, _) <- getInputFocus d
  s <- fetchName d w
  print s

【讨论】：