From 0fd663e25ddc2f802ee887011813ba6af6e8fa47 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Wed, 3 May 2017 18:14:28 -0700
Subject: [PATCH] editors.emacs: add an emacsclient-args on request.

---
 basis/editors/emacs/emacs.factor | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/basis/editors/emacs/emacs.factor b/basis/editors/emacs/emacs.factor
index f2d2240cf7..a8e6d23ecf 100644
--- a/basis/editors/emacs/emacs.factor
+++ b/basis/editors/emacs/emacs.factor
@@ -6,6 +6,7 @@ SINGLETON: emacsclient
 emacsclient editor-class set-global
 
 SYMBOL: emacsclient-path
+SYMBOL: emacsclient-args
 
 HOOK: find-emacsclient os ( -- path )
 
@@ -22,6 +23,7 @@ M: windows find-emacsclient
 M: emacsclient editor-command ( file line -- command )
     [
         emacsclient-path get [ find-emacsclient ] unless* ,
+        emacsclient-args get %
         "-a=emacs" ,
         "--no-wait" ,
         number>string "+" prepend ,