On Wed 14 Apr 2010 23:47 -0400, Rob Shinn wrote:
> I needed a .mgedrc option to turn on and off the status bar because I
> prefer the faceplate (F7) to the status bar at the bottom since it
> provides quick vertex coordinates for the currently-selected object
> (primitive or region/combination) and the status bar doesn't.
>
> So I added one. Attached are the diffs for openw.tcl and mgedrc.tcl.
>
> I hope these are what you need, they are unified diffs (diff -u). If
> you need me to do these differently, let me know.
Nice. I formed them into an all-in-one patch that should apply nicely to
svn. One of your diffs was reversed too by the way.
From: Rob Shinn <[email protected]>
Date: Wed, 14 Apr 2010 23:47:41 -0400
Subject: [brlcad-devel] mged_default(status_bar)
I needed a .mgedrc option to turn on and off the status bar because I
prefer the faceplate (F7) to the status bar at the bottom since it
provides quick vertex coordinates for the currently-selected object
(primitive or region/combination) and the status bar doesn't.
Index: src/tclscripts/mged/openw.tcl
===================================================================
--- brlcad/src/tclscripts/mged/openw.tcl (revision 38580)
+++ brlcad/src/tclscripts/mged/openw.tcl (working copy)
@@ -156,6 +156,10 @@
font_init
}
+if {![info exists mged_default(status_bar)]} {
+ set mged_default(status_bar) 1
+}
+
if {![info exists mged_default(faceplate)]} {
set mged_default(faceplate) 0
}
@@ -428,7 +432,7 @@
set mged_gui($id,comb) $comb
set mged_gui($id,show_cmd) $scw
set mged_gui($id,show_dm) $sgw
- set mged_gui($id,show_status) 1
+ set mged_gui($id,show_status) $mged_default(status_bar)
set mged_gui($id,apply_to) 0
set mged_gui($id,edit_info_pos) "+0+0"
set mged_gui($id,num_lines) $mged_default(num_lines)
Index: src/tclscripts/mged/mgedrc.tcl
===================================================================
--- brlcad/src/tclscripts/mged/mgedrc.tcl (revision 38580)
+++ brlcad/src/tclscripts/mged/mgedrc.tcl (working copy)
@@ -231,6 +231,9 @@
puts $fd "# Activate/deactivate perspective mode, F3"
puts $fd "set mged_default(perspective_mode)
$mged_gui($id,perspective_mode)"
puts $fd ""
+ puts $fd "# Activate/Deactivate status bar"
+ puts $fd "set mged_default(status_bar) $mged_gui($id,status_bar)"
+ puts $fd ""
puts $fd "# Activate/deactivate old mged faceplate, F7"
puts $fd "set mged_default(faceplate) $mged_gui($id,faceplate)"
puts $fd ""
------------------------------------------------------------------------------
Download Intel® Parallel Studio Eval
Try the new software tools for yourself. Speed compiling, find bugs
proactively, and fine-tune applications for parallel performance.
See why Intel Parallel Studio got high marks during beta.
http://p.sf.net/sfu/intel-sw-dev
_______________________________________________
BRL-CAD Developer mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-devel
