Changeset 4533 for branches/1.3


Ignore:
Timestamp:
Jul 17, 2014, 2:48:21 PM (5 years ago)
Author:
gah
Message:

update regression tester

Location:
branches/1.3
Files:
1 added
4 edited

Legend:

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

    r4449 r4533  
    14211421            set bool $_settings($what)
    14221422            set numColors [expr $_settings(-numisolines) + 1]
    1423             # FIXME: don't use StartBufferingCommands
    14241423            StartBufferingCommands
    14251424            if {$bool} {
     
    19201919        Rappture::Combobox $inner.colormap -width 10 -editable no
    19211920    }
    1922 
    19231921    $inner.colormap choices insert end [GetColormapList -includeNone]
    19241922    $itk_component(colormap) value $_settings(-colormap)
     
    22942292        AdjustSetting -stretchtofit
    22952293    }
    2296 
    22972294    if { $_currentNumIsolines != $style(-levels) } {
    22982295        set _currentNumIsolines $style(-levels)
  • branches/1.3/gui/scripts/vtkisosurfaceviewer.tcl

    r4512 r4533  
    13591359            SendCmd "axis labels all $bool"
    13601360        }
    1361         "-xgrid" - "-ygrid" - "-zgrid" {
    1362             set axis [string tolower [string range $what 1 1]]
    1363             set bool $_settings($what)
    1364             SendCmd "axis grid $axis $bool"
    1365         }
    13661361        "-axismode" {
    13671362            set mode [$itk_component(axisMode) value]
     
    15521547            SendCmd "cutplane slice ${axis} ${pos}"
    15531548            set _cutplanePending 0
     1549        }
     1550        "-xgrid" - "-ygrid" - "-zgrid" {
     1551            set axis [string tolower [string range $what 1 1]]
     1552            set bool $_settings($what)
     1553            SendCmd "axis grid $axis $bool"
    15541554        }
    15551555        default {
  • branches/1.3/tester/scripts/Makefile.in

    r3471 r4533  
    1818
    1919FILES           = \
     20                $(srcdir)/auto.tcl \
    2021                $(srcdir)/main.tcl \
    2122                $(srcdir)/legend.tcl \
  • branches/1.3/tester/scripts/main.tcl

    r3177 r4533  
    1717#  USAGE: tester.tcl ?-tool tool.xml? ?-testdir tests?
    1818# ======================================================================
    19 #  AUTHOR: Ben Rafferty, Purdue University
     19#  AUTHORS:  Michael McLennan, Ben Rafferty, Purdue University
    2020#  Copyright (c) 2004-2012  HUBzero Foundation, LLC
    2121#
     
    136136set installdir [file dirname [file normalize $params(-tool)]]
    137137set xmlobj [Rappture::library $params(-tool)]
    138 set ToolObj [Rappture::Tool ::#auto $xmlobj $installdir]
     138set TaskObj [Rappture::Task ::#auto $xmlobj $installdir]
     139
     140# tasks in the tester run quietly and discard results
     141$TaskObj configure -jobstats "" -resultdir ""
     142
    139143set DiffShow ""  ;# used to track which diff objects are being displayed
    140144
     
    296300set testtree [.pw pane 0].tree
    297301foreach file [glob -nocomplain -directory $params(-testdir) *.xml] {
    298     set testobj [Rappture::Tester::Test ::#auto $ToolObj $file]
     302    set testobj [Rappture::Tester::Test ::#auto $TaskObj $file]
    299303    if {[$testobj getTestInfo test.label] eq ""} {
    300304        puts stderr "ERROR:  Missing test label in $file"
Note: See TracChangeset for help on using the changeset viewer.