diff options
author | Joe Mistachkin <joe@mistachkin.com> | 2008-10-06 18:42:11 (GMT) |
---|---|---|
committer | Joe Mistachkin <joe@mistachkin.com> | 2008-10-06 18:42:11 (GMT) |
commit | f5a928abe6ab869b1c7c485eee052b125453cee0 (patch) | |
tree | 2b8c2bfae55acddb3e29e34b44317fcde079bc45 /tools | |
parent | 4a4cd9c8499783062fbbec4e36f9fa2d913fbd5b (diff) | |
download | tcl-f5a928abe6ab869b1c7c485eee052b125453cee0.zip tcl-f5a928abe6ab869b1c7c485eee052b125453cee0.tar.gz tcl-f5a928abe6ab869b1c7c485eee052b125453cee0.tar.bz2 |
Fix for [Bug 1934200]
Diffstat (limited to 'tools')
-rw-r--r-- | tools/man2tcl.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tools/man2tcl.c b/tools/man2tcl.c index efcbe2b..64ec466 100644 --- a/tools/man2tcl.c +++ b/tools/man2tcl.c @@ -15,7 +15,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: man2tcl.c,v 1.13.2.1 2008/10/02 18:56:30 mistachkin Exp $ + * RCS: @(#) $Id: man2tcl.c,v 1.13.2.2 2008/10/06 18:42:11 mistachkin Exp $ */ static char sccsid[] = "@(#) man2tcl.c 1.3 95/08/12 17:34:08"; @@ -352,6 +352,7 @@ DoText( sscanf(p,"%d",&ch); PRINT(("text \\u%04x\n", ch)); while(*p&&*p!='\'') p++; + p++;
} else if (*p != 0) { PRINT(("char {\\%c}\n", *p)); p++; |