From: Glenn Morris <rgm@gnu.org>
Date: Wed, 18 Dec 2013 04:05:57 +0000 (-0800)
Subject: * src/lread.c (openp): Fix previous change (don't leak file descriptors)
X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~354
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=09af58633c2a83b61dee86bcf3794122b101671a;p=emacs.git

* src/lread.c (openp): Fix previous change (don't leak file descriptors)
---

diff --git a/src/lread.c b/src/lread.c
index c24af0cf9cd..b8b9189719b 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1634,6 +1634,7 @@ openp (Lisp_Object path, Lisp_Object str, Lisp_Object suffixes,
                           save_mtime = mtime;
                           save_string = string;
                         }
+                      else emacs_close (fd);
                     }
                   else
                     {