diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/lread.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lread.c b/src/lread.c index d2b6a84304d..babeaa28682 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* Lisp parsing and input streams. | 1 | /* Lisp parsing and input streams. |
| 2 | Copyright (C) 1985, 1986, 1987, 1988, 1989, | 2 | Copyright (C) 1985, 1986, 1987, 1988, 1989, |
| 3 | 1993, 1994 Free Software Foundation, Inc. | 3 | 1993, 1994 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | This file is part of GNU Emacs. | 5 | This file is part of GNU Emacs. |
| @@ -562,7 +562,7 @@ openp (path, str, suffix, storeptr, exec_only) | |||
| 562 | if (exec_only) | 562 | if (exec_only) |
| 563 | fd = (access (fn, X_OK) == 0) ? 1 : -1; | 563 | fd = (access (fn, X_OK) == 0) ? 1 : -1; |
| 564 | else | 564 | else |
| 565 | fd = open (fn, 0, 0); | 565 | fd = open (fn, O_RDONLY, 0); |
| 566 | 566 | ||
| 567 | if (fd >= 0) | 567 | if (fd >= 0) |
| 568 | { | 568 | { |