From 10959ae8c2c6839e1a2134c17f267429c938f44a Mon Sep 17 00:00:00 2001
From: "Kevin M. Rosenberg" <kevin@rosenberg.net>
Date: Fri, 1 Oct 2004 03:26:13 +0000
Subject: [PATCH] r10070: fix keyword name

---
 impl.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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