emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/posframe 588642d 1/2: * posframe.el (posframe--create-p


From: ELPA Syncer
Subject: [elpa] externals/posframe 588642d 1/2: * posframe.el (posframe--create-posframe): ignore set-face-background error.
Date: Tue, 2 Mar 2021 04:57:10 -0500 (EST)

branch: externals/posframe
commit 588642d599631afe342fb1dbc813be08abb2cb84
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    * posframe.el (posframe--create-posframe): ignore set-face-background error.
---
 posframe.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/posframe.el b/posframe.el
index 17904f0..7dab1cf 100644
--- a/posframe.el
+++ b/posframe.el
@@ -356,7 +356,11 @@ This posframe's buffer is BUFFER-OR-NAME."
                        (desktop-dont-save . t))))
         (when border-color
           (set-face-background 'internal-border border-color posframe--frame)
-          (set-face-background 'child-frame-border border-color 
posframe--frame))
+          ;; FIXME: ignore errors on emacs version which
+          ;; have no child-frame-border face.
+          ;; maybe have other better way to do this job.
+          (ignore-errors
+            (set-face-background 'child-frame-border border-color 
posframe--frame)))
         (let ((posframe-window (frame-root-window posframe--frame)))
           ;; This method is more stable than 'setq mode/header-line-format nil'
           (unless respect-mode-line



reply via email to

[Prev in Thread] Current Thread [Next in Thread]