From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Fri, 1 Oct 2004 03:25:09 +0000 (+0000)
Subject: r10069: fix keyword name
X-Git-Tag: v1.96~52
X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=commitdiff_plain;h=5470e786c59285e2f09497598505654672be847d

r10069: fix keyword name
---

diff --git a/impl.lisp b/impl.lisp
index a814cc4..48c740e 100644
--- a/impl.lisp
+++ b/impl.lisp
@@ -37,7 +37,7 @@
 	  path))))
   
 
-(defun probe-directory (filename &key (error-if-not-exists nil))
+(defun probe-directory (filename &key (error-if-does-not-exists nil))
   (let* ((path (canonicalize-directory-name filename))
 	 (probe
 	  #+allegro (excl:probe-directory path)