~ 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