TABLE OF CONTENTS


::pwtk::input::cardAppend

SYNOPSIS

proc ::pwtk::input::cardAppend {name append_content} {

PURPOSE

Append new content to the end of the existing card content.

ARGUMENTS

RETURN VALUE

SOURCE

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

    if { ! [info exists ::pwtk::input::card($name)] } {
        set ::pwtk::input::card($name)         exists
        set ::pwtk::input::card_flags($name)   ""
    }

    append ::pwtk::input::card_content($name) "\n[string trim $append_content]"
}