From 57aa7654bf368fcf958642c27ef4bb077997698a Mon Sep 17 00:00:00 2001 From: pw <pw> Date: Fri, 18 May 2001 13:50:04 +0000 Subject: [PATCH] Previous revision had missing space resulting in bogus symbol name. --- code/pathname.lisp | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/code/pathname.lisp b/code/pathname.lisp index 971f86d7f..bd5b6de1a 100644 --- a/code/pathname.lisp +++ b/code/pathname.lisp @@ -4,7 +4,7 @@ ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pathname.lisp,v 1.50 2001/05/14 13:13:39 pw Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pathname.lisp,v 1.51 2001/05/18 13:50:04 pw Exp $") ;;; ;;; ********************************************************************** ;;; @@ -1526,7 +1526,8 @@ a host-structure or string." (or (gethash valid-hostname *logical-hosts*) (and *autoload-translations* (ignore-errors - (load-logical-pathname-translationsvalid-hostname)) + (load-logical-pathname-translations + valid-hostname)) (gethash valid-hostname *logical-hosts*)))))) (if (or found (not errorp)) found -- GitLab