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



(fs:set-logical-pathname-host "Theo"
  :physical-host "KSL-EXP-35"
  :translations '(("Theo" "Rice.Theo;"))
)