;;; -*- Mode: LISP; Base:10; Package: USER -*-

;******************************************************************************
; Copyright (c) 1984, 1985 by Lisp Machine Inc.
; Symbolics-specific portions Copyright (c) 1985 by Honeywell, Inc.
; Permission to copy all or part of this material is granted, provided
; that the copies are not made or distributed for resale, and the 
; copyright notices and reference to the source file and the software
; distribution version appear, and that notice is given that copying is
; by permission of Lisp Machine Inc.  LMI reserves for itself the 
; sole commercial right to use any part of this KERMIT/H19-Emulator
; not covered by any Columbia University copyright.  Inquiries concerning
; copyright should be directed to Mr. Damon Lawrence at (213) 642-1116.
;
; Version Information:
;      LMKERMIT 1.0     --      Original LMI code, plus edit ;1; for 3600 port
;
; Authorship Information:
;      Mark David (LMI)           Original version, using KERMIT.C as a guide
;      George Carrette (LMI)      Various enhancements
;      Mark Ahlstrom (Honeywell)  Port to 3600 (edits marked with ";1;" comments)
;
; Author Addresses:
;      George Carrette     ARPANET: GJC at MIT-MC
;
;      Mark Ahlstrom       ARPANET: Ahlstrom at HI-Multics
;                          PHONE:   (612) 887-4006
;                          USMAIL:  Honeywell MN09-1400
;                                   Computer Sciences Center
;                                   10701 Lyndale Avenue South
;                                   Bloomington, MN  55420
;******************************************************************************


;;; kermit.translations -- for 3600 only!
;;; Mark Ahlstrom 3/28/85

;;; After editing file to show your host and directory,
;;; this file should be renamed and move to become
;;; the file sys:site;kermit.translations

;;; This will allow make-system to find it properly, so
;;; (make-system 'kermit :compile) should build the system.

(fs:set-logical-pathname-host
  "kermit"
  :physical-host "BALDER"			;change BALDER to your host name.
  :translations '(("kermit;" ">mark>kermit>")))	;change the pathname to your kermit
						;source directory.

#||

(fs:set-logical-pathname-host
  "kermit"
  :physical-host "MIT-MC"
  :translations '(("kermit;" "gjc;")))

||#