TABLE OF CONTENTS

::pwtk::wfcdir_prefix_append

SYNOPSIS

proc ::pwtk::wfcdir_prefix_append {dir} {

PURPOSE

Append the specified directory to wfcdir_prefix. For the explanation of wfcdir_prefix, see ::pwtk::wfcdir_prefix

IMPORTANT

To make ::pwtk::wfcdir_prefix_append effective, ::pwtk::wfcdir_postfix must be called in set mode after ::pwtk::wfcdir_prefix_append

RETURN VALUE

The value of the wfcdir_prefix.

SOURCE

    variable QEdir

    if { [varvalue QEdir(wfcdirPrefix)] == {} } {
        set QEdir(wfcdirPrefix) $dir
    } else {
        set QEdir(wfcdirPrefix) [file join $QEdir(wfcdirPrefix) $dir]
    }
    return $QEdir(wfcdirPrefix)
}