From d1eb858c97c92f5c29fb0fc76af34e5bef39c5fc Mon Sep 17 00:00:00 2001
From: Ivica Ico Bukvic <ico@monsoon-hp.(none)>
Date: Thu, 23 Feb 2012 23:25:07 -0500
Subject: [PATCH] added automatic focus of the root window at start-up and
fixed copying text from the console window into the clipboard using ctrl+c
shortcut
---
src/pd.tk | 2 ++
1 file changed, 2 insertions(+)
diff --git a/src/pd.tk b/src/pd.tk
index fc467471c..847598a7f 100644
--- a/src/pd.tk
+++ b/src/pd.tk
@@ -743,6 +743,7 @@ bind . <$ctrl_key-Key-a> {.printout.frame.text tag add sel 1.0 end}
#bind . <$ctrl_key-Key-x> {tk_textCut .printout.frame.text; \
# .mbar.edit entryconfigure "Paste" -state normal}
bind . <$ctrl_key-Key-c> {tk_textCopy .printout.frame.text}
+bind .printout <$ctrl_key-Key-c> {tk_textCopy .printout.frame.text}
# .mbar.edit entryconfigure "Paste" -state normal}
#bind . <$ctrl_key-Key-v> {tk_textPaste .printout.frame.text}
bind . <$ctrl_key-Key-w> {menu_quit}
@@ -789,6 +790,7 @@ catch {
if { [info tclversion] >= 8.5 && $pd_nt == 0 } { wm resizable . 0 0 }
# Intercept closing the main pd window: MP 20060413:
wm protocol . WM_DELETE_WINDOW menu_quit
+focus .
############### set up global variables ################################
--
GitLab