[elpa] externals/detached 3c7ac1730f 34/38: Add session environment property getter

[ELPA Syncer]

branch: externals/detached
commit 3c7ac1730ff866f1a81a652f36d9b0307910a501
Author: Niklas Eklund <niklas.eklund@posteo.net>
Commit: Niklas Eklund <niklas.eklund@posteo.net>

    Add session environment property getter
---
 detached-compile.el | 2 +-
 detached.el         | 4 ++++
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/detached-compile.el b/detached-compile.el
index 26b3926c18..d2507487a4 100644
--- a/detached-compile.el
+++ b/detached-compile.el
@@ -133,7 +133,7 @@ Optionally EDIT-COMMAND."
                                                                            
:type 'string)
                                         (detached-session-start-command 
detached-current-session
                                                                         :type 
'string))
-                                     ,@(plist-get (detached--session-env 
detached-current-session) :compilation-args)))))
+                                     ,@(detached-session-environment-property 
detached-current-session :compilation-args)))))
        (apply compilation-start args)))
 
 (defun detached-compile--replace-modesetter ()
diff --git a/detached.el b/detached.el
index 21864b7f4b..84a3e0d3c8 100644
--- a/detached.el
+++ b/detached.el
@@ -1123,6 +1123,10 @@ This function uses the `notifications' library."
    (plist-get (detached--session-action session) :callback)
    #'ignore))
 
+(defun detached-session-environment-property (session property)
+  "Return PROPERTY from SESSION environment."
+  (plist-get (detached--session-env session) property))
+
 (defun detached-session-status-function (session)
   "Return SESSION's status function."
   (or