Revision: 75392
http://sourceforge.net/p/brlcad/code/75392
Author: starseeker
Date: 2020-04-14 14:50:27 +0000 (Tue, 14 Apr 2020)
Log Message:
-----------
Cherrypick r74991 - fix for initial dimensions of overlap checker window
Modified Paths:
--------------
brlcad/branches/RELEASE/NEWS
brlcad/branches/RELEASE/src/tclscripts/checker/menu.tcl
Property Changed:
----------------
brlcad/branches/RELEASE/
Index: brlcad/branches/RELEASE
===================================================================
--- brlcad/branches/RELEASE 2020-04-14 14:49:01 UTC (rev 75391)
+++ brlcad/branches/RELEASE 2020-04-14 14:50:27 UTC (rev 75392)
Property changes on: brlcad/branches/RELEASE
___________________________________________________________________
Modified: svn:mergeinfo
## -6,4 +6,4 ##
/brlcad/branches/opencl:65867-66137
/brlcad/branches/osg:62110-62113
/brlcad/branches/prep-cache:68236-68933
-/brlcad/trunk:36844-37285,37571-38764,38777-38845,41559-43155,43159-43908,44241-44324,44326-44385,44710-45373,45377,45379-47342,47370-68122,68125-74976,74981,75056,75325,75375,75377-75378,75387
\ No newline at end of property
+/brlcad/trunk:36844-37285,37571-38764,38777-38845,41559-43155,43159-43908,44241-44324,44326-44385,44710-45373,45377,45379-47342,47370-68122,68125-74976,74981,74991,75056,75325,75375,75377-75378,75387
\ No newline at end of property
Modified: brlcad/branches/RELEASE/NEWS
===================================================================
--- brlcad/branches/RELEASE/NEWS 2020-04-14 14:49:01 UTC (rev 75391)
+++ brlcad/branches/RELEASE/NEWS 2020-04-14 14:50:27 UTC (rev 75392)
@@ -13,6 +13,7 @@
--- 2020-04-14 Release 7.30.8 ---
----------------------------------------------------------------------
+* fixed startup dimensions of overlap checker window - Nick Reed
* fixed rtedge line drawing color when using -W flag - Cliff Yapp
* added -F option to lint cmd to test specifc solid types - Cliff Yapp
* added support to MGED for zooming with mouse wheel - Cliff Yapp
Modified: brlcad/branches/RELEASE/src/tclscripts/checker/menu.tcl
===================================================================
--- brlcad/branches/RELEASE/src/tclscripts/checker/menu.tcl 2020-04-14
14:49:01 UTC (rev 75391)
+++ brlcad/branches/RELEASE/src/tclscripts/checker/menu.tcl 2020-04-14
14:50:27 UTC (rev 75392)
@@ -158,6 +158,10 @@
wm title $checkerWindow "Geometry Checker"
pack $checker -expand true -fill both
+ # calculate default geometry
+ wm withdraw $checkerWindow
+ update
+
# ensure window isn't too narrow
set geom [split [wm geometry $checkerWindow] "=x+-"]
if {[lindex $geom 0] > [lindex $geom 1]} {
@@ -165,6 +169,9 @@
}
wm geometry $checkerWindow "=[::tcl::mathfunc::round [expr 1.62 * [lindex
$geom 1]]]x[lindex $geom 1]"
+ # raise to front
+ wm deiconify $checkerWindow
+
destroy $parent.overlapmenu
}
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
