From ae95a95a9c144a8ceefb9b2c9c09497705209ab1 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 14 Oct 2001 20:08:21 +0000 Subject: [PATCH] (exec-suffixes): Initialize to a system-dependent value. --- lisp/bindings.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/lisp/bindings.el b/lisp/bindings.el index bb4610fa762..c4327ed6168 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -450,6 +450,14 @@ is okay. See `mode-line-format'.") ".cp" ".fn" ".ky" ".pg" ".tp" ".vr" ".cps" ".fns" ".kys" ".pgs" ".tps" ".vrs"))) +;; Suffixes used for executables. +(setq exec-suffixes + (cond + ((memq system-type '(ms-dos windows-nt)) + '(".exe" ".com" ".bat" ".cmd" ".btm" "")) + (t + '("")))) + ;; Packages should add to this list appropriately when they are ;; loaded, rather than listing everything here. (setq debug-ignored-errors