From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 26 Dec 1995 00:20:53 +0000 (+0000)
Subject: (Ffile_attributes) [MSDOS]: Remove special detection of
X-Git-Tag: emacs-19.34~2001
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fc82937b49d945064f7f8d1b2bf0c16ee1f67437;p=emacs.git

(Ffile_attributes) [MSDOS]: Remove special detection of
MS-DOS executable files by filename extension (library `stat' does
this itself now).
---

diff --git a/src/dired.c b/src/dired.c
index de93a67adc4..8e6add1f6e8 100644
--- a/src/dired.c
+++ b/src/dired.c
@@ -621,22 +621,6 @@ If file does not exist, returns nil.")
   if (lstat (XSTRING (filename)->data, &s) < 0)
     return Qnil;
 
-#ifdef MSDOS
-  {
-    char *tmpnam = XSTRING (Ffile_name_nondirectory (filename))->data;
-    int l = strlen (tmpnam);
-
-    if (l >= 5 
-	&& S_ISREG (s.st_mode)
-	&& (stricmp (&tmpnam[l - 4], ".com") == 0
-	    || stricmp (&tmpnam[l - 4], ".exe") == 0
-	    || stricmp (&tmpnam[l - 4], ".bat") == 0))
-      {
-	s.st_mode |= S_IEXEC;
-      }
-  }
-#endif /* MSDOS */
-
   switch (s.st_mode & S_IFMT)
     {
     default: