;;; -*- Mode: Lisp; Readtable: CL; Base: 10; Package: User -*-

(si:set-system-source-file "DVI" "DJ:GJCX.DVI; SYSDEF")

(fs:set-logical-pathname-host "TEX"
			      :physical-host "angel"
			      :translations
			      '(("TeXfonts;" "/usr/lib/tex/fonts/")))