From 55b5efcbf54d1cdb089895638b77cf98d5b9c548 Mon Sep 17 00:00:00 2001
From: Miller Puckette <msp@ucsd.edu>
Date: Thu, 29 Jan 2009 15:18:21 -0800
Subject: [PATCH] u_main.tk niceties
---
src/u_main.tk | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/src/u_main.tk b/src/u_main.tk
index 4a49d4604..8834d232c 100644
--- a/src/u_main.tk
+++ b/src/u_main.tk
@@ -126,10 +126,9 @@ bind Text <Control-s> {}
# the menus are instantiated here for the main window
# for the patch windows, they are created by pdtk_canvas_new
menu .mbar
-canvas .dummy -height 2p -width 6c
frame .controls
-pack .controls .dummy -side top -fill x
+pack .controls -side top -fill x
menu .mbar.file -tearoff $pd_tearoff
.mbar add cascade -label "File" -menu .mbar.file
menu .mbar.find -tearoff $pd_tearoff
@@ -194,7 +193,7 @@ pack .controls.inout.out.label .controls.inout.out.level \
button .controls.dio -text "DIO\nerrors" \
-command {pd [concat pd audiostatus \;]}
-button .controls.clear -text "clear\nprinout" \
+button .controls.clear -text "clear\nprintout" \
-command {.printout.text delete 0.0 end}
pack .controls.inout.in .controls.inout.out -side left -padx 6
--
GitLab