(setq bdf-directory-list
'("c:/progs/emacs/site-lisp/cgreek-emacs20/bdf"))
(setq w32-bdf-filename-alist
(w32-find-bdf-fonts bdf-directory-list))
(setq w32-use-w32-font-dialog nil)
(add-to-list 'load-path "c:/progs/emacs/site-lisp/cgreek-emacs20")
(load-library "dotemacs")
Note: Make sure all the paths are complete
(e.g. "c:/progs/emacs/site-lisp...") and correct (i.e. match your
installation).
(setq load-path (cons "c:/progs/emacs/site-lisp/cgreek-emacs20" load-path))
(defvar cgreek-tlg-directory
(if (memq system-type' (ms-dos windows-nt)) "e:/" "/cdrom/")
(defvar cgreek-tlg2emacs-program
(expand-file-name
(if (featurep 'meadow)
"~/cgreek-meadow/tlg/tlg2emacs"
"c:/progs/emacs/site-lisp/cgreek-emacs20/tlg/tlg2emacs"))
"*Program name for invoking a TLG-to-CGreek converter.")
(defvar cgreek-tlg2citation-program
(expand-file-name
(if (featurep 'meadow)
"~/cgreek-meadow/tlg/tlg2cit"
"c:/progs/emacs/site-lisp/cgreek-emacs20/tlg/tlg2cit"))
"*Program name to extract citation information from tlg txt file.")
(setenv "GS_LIB" "c:/progs/gs/gs8.00/lib;c:/progs/gs/fonts/")
(setq ps-lpr-command "c:/progs/gs/gs8.00/bin/gswin32c")
(setq ps-lpr-switches '("-q" "-dNOPAUSE" "-dBATCH" "-sDEVICE=mswinpr2"))
(setq ps-printer-name t)
(global-set-key [f3] 'ps-print-buffer-with-faces)
(setq ps-print-color-p 'black-white)
(setq ps-use-face-background nil)
(setq ps-paper-type 'a4)
(setq ps-font-size 10)
(setq ps-print-control-characters nil)
(setq ps-multibyte-buffer nil)
These instructions have been put together for the benefit of any Windows user interested, but the author is neither an emacs expert nor a computer specialist, merely a classicist who has been helped in installing CGreek successfully on the Windows XP platform by the author of CGreek, TAKAHASHI Naoto, and Alexej Kryokov.