File tree Expand file tree Collapse file tree 1 file changed +0
-36
lines changed
Expand file tree Collapse file tree 1 file changed +0
-36
lines changed Original file line number Diff line number Diff line change @@ -94,14 +94,6 @@ proc default_tclsh {} {
9494}
9595
9696
97- #
98- # modulecmd_exit -- cleanup
99- #
100-
101- proc modulecmd_exit {} {
102- #not applicable
103- }
104-
10597#
10698# modulecmd_start -- start modulecmd running
10799# Since modulecmd writes to both streams, stdout and stderr, a catcher
@@ -265,34 +257,6 @@ proc modulecmd_start {command {input noinput}} {
265257 unset no_verbose
266258}
267259
268- #
269- # modulecmd_version -- extract and print the version number of modulecmd
270- #
271-
272- proc modulecmd_version {} {
273- global MODULECMD
274- global shell
275- global comp_output
276- global comp_error
277-
278- set shell "sh"
279- default_modulecmd
280-
281- modulecmd_start help
282- regexp {Modules Release (Tcl [0-9a-zA-Z\.]+)(.*)} \
283- $comp_error version rest
284-
285- set comp_output "$version"
286- }
287-
288- #
289- # modulecmd_load -- loads the program
290- #
291-
292- proc modulecmd_load { arg } {
293- # not applicable
294- }
295-
296260
297261#
298262# Test procedure to check a module installation
You can’t perform that action at this time.
0 commit comments