mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-01 18:00:40 -08:00
Code Issues Projects Releases Wiki Activity

Only lusers assume that O_RDONLY == 0.

Browse source
This commit is contained in:
Michael I. Bushnell 1994-05-20 16:17:20 +00:00
parent 3b0aebe95a
commit 73aa97044a
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/lread.c
View file

@ -1,5 +1,5 @@
/* Lisp parsing and input streams.
Copyright (C) 1985, 1986, 1987, 1988, 1989,
Copyright (C) 1985, 1986, 1987, 1988, 1989,
1993, 1994 Free Software Foundation, Inc.
This file is part of GNU Emacs.
@ -562,7 +562,7 @@ openp (path, str, suffix, storeptr, exec_only)
if (exec_only)
fd = (access (fn, X_OK) == 0) ? 1 : -1;
else
fd = open (fn, 0, 0);
fd = open (fn, O_RDONLY, 0);
if (fd >= 0)
{