[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/xclip 8b25fbb708 1/2: (xclip--hidden-frame): Survive th
From: |
Stefan Monnier |
Subject: |
[elpa] externals/xclip 8b25fbb708 1/2: (xclip--hidden-frame): Survive the death of the hidden frame |
Date: |
Thu, 12 Sep 2024 09:28:57 -0400 (EDT) |
branch: externals/xclip
commit 8b25fbb70815e7e6dbc7f664048e681474b6d531
Author: brett.kerwin <brett.kerwin@mamber.net>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
(xclip--hidden-frame): Survive the death of the hidden frame
Copyright-paperwork-exempt: yes
---
xclip.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/xclip.el b/xclip.el
index ed38add19d..0390994ae1 100644
--- a/xclip.el
+++ b/xclip.el
@@ -1,6 +1,6 @@
;;; xclip.el --- Copy&paste GUI clipboard from text terminal -*-
lexical-binding:t -*-
-;; Copyright (C) 2007-2022 Free Software Foundation, Inc.
+;; Copyright (C) 2007-2024 Free Software Foundation, Inc.
;; Author: Leo Liu <sdl.web@gmail.com>
;; Keywords: convenience, tools
@@ -228,7 +228,7 @@ TYPE and DATA are the same as for `gui-set-selection'."
(defvar xclip--hidden-frame nil)
(defun xclip--hidden-frame ()
- (or xclip--hidden-frame
+ (or (and (frame-live-p xclip--hidden-frame) xclip--hidden-frame)
(setq xclip--hidden-frame
(make-frame-on-display (getenv "DISPLAY")
'((visibility . nil)