[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Suggestions for corrections to executable.el - use of PATHEXT
From: |
Davis Herring |
Subject: |
Re: Suggestions for corrections to executable.el - use of PATHEXT |
Date: |
Fri, 10 Sep 2004 19:07:30 -0600 (MDT) |
Tiny augmentation:
(defvar executable-binary-suffixes
(if (memq system-type '(ms-dos windows-nt))
(let ((pathext (getenv-internal "PATHEXT")))
(if pathext
(nconc (split-string pathext ";") '(""))
'(".com" ".exe" ".bat" ".cmd" ".pif" "")))
'("")))
(Indentation made into spaces; don't compare to nil with `eq'; add ".pif"
and "". I add back "" because with Cygwin, you have commands with no
extension; if my assumption is wrong and `system-type' isn't set
Windowsishly then, drop that entry.)
Davis Herring
--
This product is sold by volume, not by mass. If it seems too dense or too
sparse, it means mass-energy conversion has occurred during shipping.