Description:        Testuite modulefile #   Command: # #    Invo-
cation:   #     Result:     %R{   #               }R%   #    Com-
ment:    %C{ #                       tests whether the versioning
stack  is  working.  #               }C% #
##############################################################################

if [ expr [ module-info mode load ] || [ module-info mode display
] ] {         setenv          MODULE_VERSION          1.1 }

prepend-path    MODULE_VERSION_STACK    1.1

if [ module-info mode remove ] {         unsetenv  MODULE_VERSION
[lindex [split $env(MODULE_VERSION_STACK) : ] 0 ] }