Re: [PATCH 1/1] Teach for-each-ref about a little language called Tcl.

> Then I'd commit after applying this on top of Shawn's.  Ok?
> 
> diff --git a/quote.c b/quote.c
> index 01db5e2..fb9e4ca 100644
> --- a/quote.c
> +++ b/quote.c
> @@ -395,11 +395,9 @@ void tcl_quote_print(FILE *stream, const char *src)
>  	fputc('"', stream);
>  	while ((c = *src++)) {
>  		switch (c) {
> -		case '[':
> -		case ']':
> -		case '$':
> -		case '\\':
> -		case '"':
> +		case '[': case ']':
> +		case '{': case '}':
> +		case '$': case '\\': case '"':
>  			fputc('\\', stream);
>  		default:
>  			fputc(c, stream);