[nongnu] elpa/with-editor 07b6a1adff 1/2: with-editor-emacsclient-program-suffixes: New variable

[ELPA Syncer]

branch: elpa/with-editor
commit 07b6a1adffacf002e28029fbf84498fa3405d0ed
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    with-editor-emacsclient-program-suffixes: New variable
    
    Closes #132.
---
 lisp/with-editor.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/with-editor.el b/lisp/with-editor.el
index a43e48a18e..8d19ba7880 100644
--- a/lisp/with-editor.el
+++ b/lisp/with-editor.el
@@ -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 "\\."))))
@@ -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