doc string file descriptor exhaustion fix
* src/doc.c (get_doc_string): Move newly-added check to a better location (Bug#22814).
This commit is contained in:
parent
265141b332
commit
c45a1ca3c4
1 changed files with 3 additions and 3 deletions
|
@ -126,9 +126,6 @@ get_doc_string (Lisp_Object filepos, bool unibyte, bool definition)
|
||||||
fd = emacs_open (name, O_RDONLY, 0);
|
fd = emacs_open (name, O_RDONLY, 0);
|
||||||
if (fd < 0)
|
if (fd < 0)
|
||||||
{
|
{
|
||||||
if ((errno == EMFILE) || (errno == ENFILE))
|
|
||||||
report_file_error ("Read error on documentation file", file);
|
|
||||||
|
|
||||||
#ifndef CANNOT_DUMP
|
#ifndef CANNOT_DUMP
|
||||||
if (!NILP (Vpurify_flag))
|
if (!NILP (Vpurify_flag))
|
||||||
{
|
{
|
||||||
|
@ -141,6 +138,9 @@ get_doc_string (Lisp_Object filepos, bool unibyte, bool definition)
|
||||||
#endif
|
#endif
|
||||||
if (fd < 0)
|
if (fd < 0)
|
||||||
{
|
{
|
||||||
|
if (errno == EMFILE || errno == ENFILE)
|
||||||
|
report_file_error ("Read error on documentation file", file);
|
||||||
|
|
||||||
SAFE_FREE ();
|
SAFE_FREE ();
|
||||||
AUTO_STRING (cannot_open, "Cannot open doc string file \"");
|
AUTO_STRING (cannot_open, "Cannot open doc string file \"");
|
||||||
AUTO_STRING (quote_nl, "\"\n");
|
AUTO_STRING (quote_nl, "\"\n");
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue