stumpwm: use long font name as alternative, change mode to common-lisp

This commit is contained in:
Łukasz Pankowski 2020-01-15 19:53:31 +01:00
parent 6303edb481
commit 843fa1f3a3

View File

@ -1,9 +1,10 @@
;; -*- lisp -*- ;; -*- common-lisp -*-
(in-package :stumpwm) (in-package :stumpwm)
(set-prefix-key (kbd "s-;")) (set-prefix-key (kbd "s-;"))
(set-font "terminus-32") (or (set-font "terminus-32")
(set-font "-xos4-terminus-medium-r-normal--32-320-72-72-c-160-iso10646-1"))
(set-focus-color "gray50") (set-focus-color "gray50")
(setf *screen-mode-line-format* "[^B%n^b] %W^>%d") (setf *screen-mode-line-format* "[^B%n^b] %W^>%d")
(setf *mode-line-timeout* 5) (setf *mode-line-timeout* 5)