如何检查Xorg是否在emacs lisp中运行？

Question

我的配置中有一些东西只适用于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

谢谢

Answer 1

(case window-system
  (x '"X11 running")
  (otherwise "No X11"))