;;; -*- Mode:Common-Lisp; Package:USER; Base:10 -*-

(fs:set-logical-pathname-host "CYC-FRAME-EDITOR"
			      :Physical-Host "X34"
			      :Translations '(("CYC-FRAME-EDITOR" "CYC.FE;"))
)