[elpa] externals/posframe fb42be7 1/2: * posframe.el (posframe--create-posframe): Use facep to test child-frame-border.

[ELPA Syncer]

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

    * posframe.el (posframe--create-posframe): Use facep to test 
child-frame-border.
---
 posframe.el | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/posframe.el b/posframe.el
index 511cef1..4070292 100644
--- a/posframe.el
+++ b/posframe.el
@@ -356,10 +356,7 @@ This posframe's buffer is BUFFER-OR-NAME."
                        (desktop-dont-save . t))))
         (when border-color
           (set-face-background 'internal-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
+          (when (facep 'child-frame-border)
             (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'