Make it work under SSH

This commit is contained in:
John Doty 2014-03-24 06:35:34 -07:00
parent edeca0b25f
commit 444e503cad

View file

@ -201,7 +201,7 @@
;;
(require 'cl)
(defun font-existsp (font)
(if (null (x-list-fonts font))
(if (and (fboundp 'x-list-fonts) (null (x-list-fonts font)))
nil t))
(setq my-font-choice