cmdr
Check-in [9159f68bc3]
Not logged in
Bounty program for improvements to Tcl and certain Tcl packages.

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix handling of *all*. Ignoring a missing definition is ok. Ignoring all other specification errors it may generate is not.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 9159f68bc35d9747c721f7c095520b2d58b05352
User & Date: andreask 2014-08-21 01:49:27
Context
2014-08-26
19:45
Make handling of shared options official. check-in: fc97d9c23b user: andreask tags: trunk
2014-08-25
23:08
Merge fixes from trunk. check-in: 7d15626394 user: andreask tags: global-options
2014-08-21
01:49
Fix handling of *all*. Ignoring a missing definition is ok. Ignoring all other specification errors it may generate is not. check-in: 9159f68bc3 user: andreask tags: trunk
2014-08-15
23:58
Fixed varname typo in the error handling for escape code definitions. Plus extension of the general colorization command to allow use without a text. This simply returns the control characters. check-in: 509f2d765f user: andreask tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to config.tcl.

125
126
127
128
129
130
131
132

133



134
135
136
137
138
139
140
	    {state        State} \
	    {section      Section}

	# Updated in my DefineParameter, called from the $spec
	set splat no

	# Auto inherit common options, state, arguments.
	# May not be defined.

	catch { use *all* }



	eval $spec

	# Postprocessing

	my SetThresholds
	my UniquePrefixes
	my CompletionGraph







|
>
|
>
>
>







125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
	    {state        State} \
	    {section      Section}

	# Updated in my DefineParameter, called from the $spec
	set splat no

	# Auto inherit common options, state, arguments.
	# May not be defined. Pass any other issues.
	try {
	    use *all*
	} trap {CMDR STORE UNKNOWN} {e o} {
	    # Swallow possibility of a missing *all*.
	}
	eval $spec

	# Postprocessing

	my SetThresholds
	my UniquePrefixes
	my CompletionGraph