Skip to content

Commit

Permalink
with-editor-emacsclient-program-suffixes: New variable
Browse files Browse the repository at this point in the history
Closes #132.
  • Loading branch information
tarsius committed Nov 23, 2024
1 parent df0b634 commit 07b6a1a
Showing 1 changed file with 5 additions and 1 deletion.
6 changes: 5 additions & 1 deletion lisp/with-editor.el
Original file line number Diff line number Diff line change
Expand Up @@ -111,6 +111,10 @@ Determining an Emacsclient executable suitable for the
current Emacs instance failed. For more information
please see https://github.com/magit/magit/wiki/Emacsclient."))))

(defvar with-editor-emacsclient-program-suffixes
(list "-snapshot" ".emacs-snapshot")
"Suffixes to append to append when looking for a Emacsclient executables.")

(defun with-editor-locate-emacsclient-1 (path depth)
(let* ((version-lst (cl-subseq (split-string emacs-version "\\.") 0 depth))
(version-reg (concat "^" (string-join version-lst "\\."))))
Expand All @@ -128,7 +132,7 @@ please see https://github.com/magit/magit/wiki/Emacsclient."))))
(setq v (string-join (reverse v) "."))
(list v (concat "-" v) (concat ".emacs" v)))
(reverse version-lst))
(list "" "-snapshot" ".emacs-snapshot")))
(cons "" with-editor-emacsclient-program-suffixes)))
(lambda (exec)
(ignore-errors
(string-match-p version-reg
Expand Down

0 comments on commit 07b6a1a

Please sign in to comment.