Tiny fix

tclsh works a little differently from reg query; two backslashes, and can't abbreviate the roots. Would've needed some testing to reveal this.