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 | cdb3076a4c8510e94caadbdf9440a95fe580421b (patch) | |
| tree | 2b8c2bfae55acddb3e29e34b44317fcde079bc45 /tools/man2tcl.c | |
| parent | 7a8890b848e2ed877f22708fa8aeebf5c22b129a (diff) | |
| download | tcl-cdb3076a4c8510e94caadbdf9440a95fe580421b.zip tcl-cdb3076a4c8510e94caadbdf9440a95fe580421b.tar.gz tcl-cdb3076a4c8510e94caadbdf9440a95fe580421b.tar.bz2 | |
Fix for [Bug 1934200]
Diffstat (limited to 'tools/man2tcl.c')
| -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++; |