From 79ccea0c478780d1d8dc4889f57525b2540f4402 Mon Sep 17 00:00:00 2001
From: Ivica Ico Bukvic <ico@vt.edu>
Date: Sat, 4 Aug 2012 10:02:48 -0400
Subject: [PATCH] made save dialog open on top of the relevant patch
---
src/pd.tk | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/src/pd.tk b/src/pd.tk
index 8a72ab5f9..283d6eaa6 100644
--- a/src/pd.tk
+++ b/src/pd.tk
@@ -3840,7 +3840,8 @@ proc pdtk_canvas_saveas {name initfile initdir} {
global pd_nt filetypes untitled_directory
if { ! [file isdirectory $initdir]} {set initdir $::env(HOME)}
set filename [tk_getSaveFile -initialfile $initfile -initialdir $initdir \
- -defaultextension .pd -filetypes $filetypes]
+ -defaultextension .pd -filetypes $filetypes \
+ -parent $name]
if {$filename eq ""} return; # they clicked cancel
--
GitLab