From 39b3195794bd3fc30f40390a0b8bcd1c709077e8 Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Thu, 20 Jul 2023 09:24:55 +0200
Subject: [PATCH] proc tk_textPaste: add author info

---
 src/xschem.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/xschem.tcl b/src/xschem.tcl
index 8c1aa23d..7e14aecd 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -6515,7 +6515,7 @@ print_help_and_exit
 
 set_ne text_replace_selection 1
 if {$text_replace_selection && $OS != "Windows"} {
-  # deletes selected text when pasting in text widgets
+  # deletes selected text when pasting in text widgets, courtesy Wolf-Dieter Busch
   proc tk_textPaste w {
     global tcl_platform
     if {![catch {::tk::GetSelection $w CLIPBOARD} sel]} then {