3

我的配置中有一些东西只能在 Xorg 中使用，否则会出现错误。

为了解决这个问题，我需要知道 Xorg 是否正在运行。我怎样才能检查它？

(defun nCdy-mode ()
    ;; TOOD: Add Xorg check
    ;(tool-bar-mode nil)
    (menu-bar-mode nil) ; TODO: Add hotkey
    ;(scroll-bar-mode nil)
    (setq inhibit-splash-screen t)

    (setq standard-indent 4)
    ;;(mouse-wheel-mode t)
    (setq backup-directory-alist (quote ((".*" . "~/.emacs_backups/"))))

    ;;TODO: Add Xorg check
    ;(require 'nyan-mode)
    ;(nyan-mode)
    ;(nyan-start-animation)
    ;;nyanyanyanyanyanyanyanyanyanyan

谢谢你

4

2 回答 2

7 
(case window-system
  (x '"X11 running")
  (otherwise "No X11"))
于 2011-12-27T10:28:25.527 回答
4

虽然 Jürgen 是正确的，您可能想要测试 的值window-system，但请注意，由于它的客户端/服务器机制，单个 Emacs 实例可以有多个帧，其中一些在图形终端（例如 XOrg）上，一些在文本终端。

因此，您应该考虑在何时何地测试window-system. 有关如何处理该问题的更多信息，请参阅类似问题的答案。

于 2011-12-27T10:36:49.747 回答