svn: r3060

original commit: ebd2227be50dbe291189c0cfa9b46f4b67d36c20
This commit is contained in:
Eli Barzilay 2006-05-25 16:48:02 +00:00
parent 75fe3f657a
commit ebe7fee523

View File

@ -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)