~ chicken-core (chicken-5) 09cd5d1eb16e31db7b270b31f29a5c53f6b66906


commit 09cd5d1eb16e31db7b270b31f29a5c53f6b66906
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Sep 1 08:48:26 2011 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Sep 1 08:48:26 2011 +0200

    typo in posixunix.scm (reported by ckeen, found by alan post)

diff --git a/posixunix.scm b/posixunix.scm
index e76122c9..3d1e0da6 100644
--- a/posixunix.scm
+++ b/posixunix.scm
@@ -772,8 +772,8 @@ EOF
 (define (change-directory* fd)
   (##sys#check-exact fd 'change-directory*) 
   (unless (fx= 0 (##core#inline "C_fchdir" fd)) 
-    (posix-error #:file-error 'change-directory* "cannot change current directory" fd) ) 
-  fd)) 
+    (posix-error #:file-error 'change-directory* "cannot change current directory" fd) )
+  fd)
 
 
 ;;; Pipes:
Trap