From ebe7fee5231ff7ec4db3c18705395c635c83459b Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Thu, 25 May 2006 16:48:02 +0000
Subject: [PATCH] Phew!

svn: r3060

original commit: ebd2227be50dbe291189c0cfa9b46f4b67d36c20
---
 collects/mzlib/file.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mzlib/file.ss b/collects/mzlib/file.ss
index 9959102..cfeb025 100644
--- a/collects/mzlib/file.ss
+++ b/collects/mzlib/file.ss
@@ -178,7 +178,7 @@
       (and (not dir?) (path? file) file)))
 
   (define (file-name-from-path name)
-    (file-name 'file-name-from-path nam))
+    (file-name 'file-name-from-path name))
 
   (define (path-only name)
     (unless (path-string? name)