Changeset 5257 for branches/1.3
- Timestamp:
- Apr 17, 2015 8:01:57 PM (9 years ago)
- Location:
- branches/1.3
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.3
-
branches/1.3/gui/scripts/flowvisviewer.tcl
r5256 r5257 1849 1849 set _settings($tag-opacity) $style(-opacity) 1850 1850 } 1851 set max 1.0 ;#$_settings($tag-opacity) 1851 1852 # Transfer function should be normalized with [0,1] range 1853 # The volume shading opacity setting is used to scale opacity 1854 # in the volume shader. 1855 set max 1.0 1852 1856 1853 1857 set isovalues {} … … 2004 2008 2005 2009 # ---------------------------------------------------------------------- 2006 # USAGE: U ndateTransferFuncs2010 # USAGE: UpdateTransferFuncs 2007 2011 # ---------------------------------------------------------------------- 2008 2012 itcl::body Rappture::FlowvisViewer::updateTransferFunctions {} { … … 2603 2607 "set" { 2604 2608 set what [lindex $args 0] 2605 set x $_settings($ this-$what)2609 set x $_settings(${this}${what}) 2606 2610 set code [catch { string is double $x } result] 2607 2611 if { $code != 0 || !$result } { 2608 set _settings($ this-$what) $_view($what)2612 set _settings(${this}${what}) $_view($what) 2609 2613 return 2610 2614 } -
branches/1.3/gui/scripts/nanovisviewer.tcl
r5254 r5257 1546 1546 1547 1547 # ---------------------------------------------------------------------- 1548 # USAGE: U ndateTransferFuncs1548 # USAGE: UpdateTransferFuncs 1549 1549 # ---------------------------------------------------------------------- 1550 1550 itcl::body Rappture::NanovisViewer::updateTransferFunctions {} {
Note: See TracChangeset
for help on using the changeset viewer.