TABLE OF CONTENTS

::pwtk::varvalue

SYNOPSIS

proc ::pwtk::varvalue {varname} {

PURPOSE

Return the value of a variable or an empty string if the variable does not exist.

ARGUMENTS

SOURCE

    upvar $varname var

    if { [info exists var] } {
        return $var
    } else {
        return ""
    }
}