~ chicken-core (chicken-5) d91c1be3b7a27f2eb6a0af4deb5cd2842322fa83


commit d91c1be3b7a27f2eb6a0af4deb5cd2842322fa83
Author:     felix <felix@frohike.homeunix.org>
AuthorDate: Mon Feb 15 12:39:03 2010 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Mon Feb 15 12:44:00 2010 +0100

    was still not right

diff --git a/chicken.h b/chicken.h
index 1da8b5cb..919d17f1 100644
--- a/chicken.h
+++ b/chicken.h
@@ -2233,7 +2233,7 @@ C_path_to_executable(C_char *fname)
 	C_strcat(buffer, "/");
 	C_strcat(buffer, fname);
 
-	if(C_access(buffer, F_OK)) {
+	if(C_access(buffer, F_OK) == 0) {
 	  dname = C_strdup(buffer);
 	  l = C_readlink(dname, buffer, C_MAX_PATH - 1);
 
Trap