TABLE OF CONTENTS


::pwtk::input::cardFlags

SYNOPSIS

proc ::pwtk::input::cardFlags {name flags} {

PURPOSE

Set the card's flags if and only if card exists.

ARGUMENTS

SOURCE

    global ::pwtk::input::card ::pwtk::input::card_flags ::pwtk::input::card_content

    if { [info exists ::pwtk::input::card($name)] } {
        set ::pwtk::input::card_flags($name) [string trim $flags]
    }
}