Bug#1108618: magic: Prospective upgrade of blt to 3.0 affects magic

[Sergei Golovan]

Package: magic
Version: 8.3.105+ds.1-1.1
Severity: normal
Tags: patch

Dear Maintainer,

I'm planning to upgrade blt to 3.0 shortly after the release of trixie,
and this upgrade will affect the magic package. There is the
techbuilder.tcl script that uses blt to display its user interface
via the blt::tabset widget. The widget's behavior changes a bit in blt
3.0, so some modifications are required to adapt to the changes. The
attached patch does that. Note that the modifications do not lose
compatibility with blt 2, so they can be applied any moment.

Cheers!
-- 
Sergei Golovan
-------------- next part --------------
--- a/tcltk/techbuilder.tcl
+++ b/tcltk/techbuilder.tcl
@@ -6,7 +6,7 @@
 package require BLT
 
 toplevel .techwizard
-blt::tabset .techwizard.parts -relief sunken -borderwidth 2
+blt::tabset .techwizard.parts -borderwidth 2
 
 magic::windowcaption off
 magic::windowscrollbars off
@@ -79,14 +79,16 @@
 ::unset j
 
 .techwizard.parts configure -tiers 2
-.techwizard.parts insert end "tech" "planes" "layers" "connect" "compose" \
-	"cifinput" "cifoutput" "extract" "drc" \
-	"wiring" "router" "plowing" "plot"
+foreach label {"tech" "planes" "layers" "connect" "compose"
+	       "cifinput" "cifoutput" "extract" "drc"
+	       "wiring" "router" "plowing" "plot"} {
+	.techwizard.parts insert end $label
+}
 
 .techwizard.parts tab configure "layers" -window .techwizard.parts.layers -fill both
 .techwizard.parts tab configure "drc" -window .techwizard.parts.drc -fill both
-.techwizard.parts tab configure "tech" -window .techwizard.parts.tech
-.techwizard.parts tab configure "planes" -window .techwizard.parts.planes
+.techwizard.parts tab configure "tech" -window .techwizard.parts.tech -fill none
+.techwizard.parts tab configure "planes" -window .techwizard.parts.planes -fill none
 
 # Add styles to layout for selection