ÿØÿàJFIFÿþ ÿÛC       ÿÛC ÿÀÿÄÿÄ"#QrÿÄÿÄ&1!A"2qQaáÿÚ ?Øy,æ/3JæݹÈ߲؋5êXw²±ÉyˆR”¾I0ó2—PI¾IÌÚiMö¯–þrìN&"KgX:Šíµ•nTJnLK„…@!‰-ý ùúmë;ºgµŒ&ó±hw’¯Õ@”Ü— 9ñ-ë.²1<yà‚¹ïQÐU„ہ?.’¦èûbß±©Ö«Âw*VŒ) `$‰bØԟ’ëXÖ-ËTÜíGÚ3ð«g Ÿ§¯—Jx„–’U/ÂÅv_s(Hÿ@TñJÑãõçn­‚!ÈgfbÓc­:él[ðQe 9ÀPLbÃãCµm[5¿ç'ªjglå‡Ûí_§Úõl-;"PkÞÞÁQâ¼_Ñ^¢SŸx?"¸¦ùY騐ÒOÈ q’`~~ÚtËU¹CڒêV  I1Áß_ÿÙ#%Module1.0##################################################################### ## ## module-info modulefile ## proc ModulesHelp { } { puts stderr "\tThis module returns all the various module-info values" puts stderr "\tin whatever mode you use (except in `whatis' mode)" InfoOut } module-whatis "returns all various module-info values" proc InfoOut { } { global ModulesCurrentModulefile puts stderr "+++ global vars +++++++++++++++++++++++++++++++" puts stderr "ModulesCurrentModulefile = $ModulesCurrentModulefile" puts stderr "+++ module-info +++++++++++++++++++++++++++++++" puts stderr [ concat "flags = " [module-info flags]] puts stderr [ concat "mode = " [module-info mode]] puts stderr [ concat "name = " [module-info name]] puts stderr [ concat "specified = " [module-info specified]] puts stderr [ concat "shell = " [module-info shell]] puts stderr [ concat "shelltype = " [module-info shelltype]] #puts stderr [ concat "alias = " [module-info alias]] puts stderr [ concat "version = " [module-info version [module-info name]]] puts stderr [ concat "user = " [module-info user]] puts stderr [ concat "symbols = " [module-info symbols]] puts stderr "+++ info ++++++++++++++++++++++++++++++++++++++" puts stderr [ concat "hostname = " [info hostname ]] puts stderr [ concat "level = " [info level ]] puts stderr [ concat "loaded null = " [is-loaded null ]] puts stderr [ concat "library = " [info library ]] puts stderr [ concat "nameofexecutable = " [info nameofexecutable ]] puts stderr [ concat "sharedlibextension = " [info sharedlibextension ]] puts stderr [ concat "tclversion = " [info tclversion ]] puts stderr [ concat "patchlevel = " [info patchlevel ]] puts stderr "+++++++++++++++++++++++++++++++++++++++++++++++" } if {! [ module-info mode whatis ] } {InfoOut}