Как проверить, работает ли Xorg в emacs lisp? - PullRequest
Новая
       24

Как проверить, работает ли Xorg в emacs lisp?

3 голосов
/ 27 декабря 2011

В моей конфигурации есть некоторые вещи, которые работают только в 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

спасибо

Ответы [ 2 ]

7 голосов
/ 27 декабря 2011 
(case window-system
  (x '"X11 running")
  (otherwise "No X11"))
4 голосов
/ 27 декабря 2011

Хотя Юрген и прав, вы, вероятно, хотите проверить значение window-system, обратите внимание, что из-за механизма клиент / сервер один экземпляр Emacs может иметь несколько кадров, некоторые из которых находятся на графических терминалах (например, XOrg) и некоторые из них находятся в текстовых терминалах.

В результате вы должны подумать о том, где и когда проверять window-system. См. этот ответ на аналогичный вопрос , чтобы узнать, как с этим справиться.

...