Rasmus <ras...@gmx.us> writes:

> Is is somehow possible to change the font family used in Calfw windows
> only?

Hardly perfect, the following let me change the font used in Calfw
sessions. It seems rather fragile, though as it only seems to work with
`:height 90'. Obviously there is a more fundamental problem that I ought
to address. 

#begin_src emacs-lisp
(add-hook 'cfw:calendar-mode-hook
          '(lambda ()
;;             (local-set-key (kbd "q") 'kill-this-buffer)
             (buffer-face-set '(:family "monofur" :height 90))
))

(setq cfw:fchar-junction ?╋
      cfw:fchar-vertical-line ?┃
      cfw:fchar-horizontal-line ?━
      cfw:fchar-left-junction ?┣
      cfw:fchar-right-junction ?┫
      cfw:fchar-top-junction ?┯
      cfw:fchar-top-left-corner ?┏
      cfw:fchar-top-right-corner ?┓)
#+end_src

–Rasmus

-- 
Sent from my Emacs


Reply via email to