Ignore:
Timestamp:
Apr 18, 2015, 1:58:03 AM (5 years ago)
Author:
ldelgass
Message:

more backporting in nanovis viewer

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/1.3/gui/scripts/nanovisviewer.tcl

    r5269 r5271  
    126126
    127127    private variable _arcball ""
    128 
    129128    private variable _dlist ""         ;# list of data objects
    130129    private variable _obj2ovride       ;# maps dataobj => style override
    131130    private variable _serverDatasets   ;# contains all the dataobj-component
    132131                                       ;# to volumes in the server
    133     private variable _serverTfs        ;# contains all the transfer functions
    134                                        ;# in the server.
    135132    private variable _recvdDatasets    ;# list of data objs to send to server
    136133    private variable _dataset2style    ;# maps dataobj-component to transfunc
     
    150147    private variable _first ""         ;# This is the topmost volume.
    151148
    152     common _downloadPopup              ;# download options from popup
     149    private common _downloadPopup      ;# download options from popup
    153150    private common _hardcopy
    154151    private variable _width 0
     
    738735    set lx 10
    739736    set ly [expr {$h - 1}]
    740     if {"" == [$c find withtag transfunc]} {
     737    if {"" == [$c find withtag colorbar]} {
    741738        $c create image 10 10 -anchor nw \
    742             -image $_image(legend) -tags transfunc
     739            -image $_image(legend) -tags colorbar
    743740        $c create text $lx $ly -anchor sw \
    744741            -fill $itk_option(-plotforeground) -tags "limits vmin"
    745742        $c create text [expr {$w-$lx}] $ly -anchor se \
    746743            -fill $itk_option(-plotforeground) -tags "limits vmax"
    747         $c lower transfunc
    748         $c bind transfunc <ButtonRelease-1> \
    749             [itcl::code $this AddIsoMarker %x %y]
     744        $c lower colorbar
     745        $c bind colorbar <ButtonRelease-1> [itcl::code $this AddIsoMarker %x %y]
    750746    }
    751747
    752748    # Display the markers used by the current transfer function.
    753749    array set limits [limits $tf]
    754     $c itemconfigure vmin -text [format %.2g $limits(min)]
     750    $c itemconfigure vmin -text [format %g $limits(min)]
    755751    $c coords vmin $lx $ly
    756752
    757     $c itemconfigure vmax -text [format %.2g $limits(max)]
     753    $c itemconfigure vmax -text [format %g $limits(max)]
    758754    $c coords vmax [expr {$w-$lx}] $ly
    759755
     
    791787#       representing the legend in the canvas.  In addition, the
    792788#       active transfer function is displayed.
    793 #
    794789#
    795790itcl::body Rappture::NanovisViewer::ReceiveLegend { tf vmin vmax size } {
Note: See TracChangeset for help on using the changeset viewer.