[elpa] externals/posframe cdc3b86 3/6: Merge pull request #80 from akermu/minor_fixes

[Feng Shu]

branch: externals/posframe
commit cdc3b86f74360bf84c93f4e9034facfcbe20e6a4
Merge: 395aca9 adc5ba1
Author: tumashu <tumashu@163.com>
Commit: GitHub <noreply@github.com>

    Merge pull request #80 from akermu/minor_fixes
    
    Minor fixes
---
 posframe.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/posframe.el b/posframe.el
index fa859db..9165e93 100644
--- a/posframe.el
+++ b/posframe.el
@@ -217,7 +217,7 @@ frame.")
   (when (and
          (> emacs-major-version 26)
          (string-match-p "GTK3" system-configuration-features)
-         (let ((value (getenv "XDG_CURRENT_DESKTOP")))
+         (let ((value (or (getenv "XDG_CURRENT_DESKTOP") (getenv 
"DESKTOP_SESSION")))
            (and (stringp value)
                 ;; It can be "ubuntu:GNOME".
                 (string-match-p "GNOME" value))))
@@ -1085,7 +1085,8 @@ bottom center.  The structure of INFO can be found in 
docstring of
   (cons (/ (- (plist-get info :parent-frame-width)
               (plist-get info :posframe-width))
            2)
-        (- 0
+        (- (plist-get info :parent-frame-height)
+           (plist-get info :posframe-height)
            (plist-get info :mode-line-height)
            (plist-get info :minibuffer-height))))