暮らしの業(2002-08-29)

2002-08-29 (Thu) [長年日記]

▲ Meadow2 メモ

Elpoint やる気の無い無理矢理設定。これで会社のプレゼンも Meadow でできるな。font くらいは後で適当なサイズを登録しよう。

;; elpoint
(defun x-display-pixel-width (&optional display) 1024)
(defun x-display-pixel-height (&optional display) 768)
 
(setq ept-use-kochi nil)
(setq ept-title-face-font "windows-16")
(setq ept-body-face-font "windows-16")
(setq ept-highlight-face-font "windows-16")
(setq ept-separator-face-font "windows-16")
(setq ept-item-face-font "windows-16")
(setq ept-item-point-face-font "windows-16")
(setq ept-basic-face-font "windows-16")
 
(dolist (spec
 '("-*-*-*-*-*-*-*-*-*-*-*-*-fontset-default"
;; add some fonts here.
  ))
  (create-fontset-from-fontset-spec spec nil t))
(require 'ept-setup)