r10069: fix keyword name
authorKevin M. Rosenberg <kevin@rosenberg.net>
Fri, 1 Oct 2004 03:25:09 +0000 (03:25 +0000)
committerKevin M. Rosenberg <kevin@rosenberg.net>
Fri, 1 Oct 2004 03:25:09 +0000 (03:25 +0000)
impl.lisp

index a814cc4..48c740e 100644 (file)
--- 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)