projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2402d92
)
pv_uni_display () omitted backslash in output string
author
H.Merijn Brand
<h.m.brand@xs4all.nl>
Thu, 25 Sep 2008 11:55:49 +0000
(11:55 +0000)
committer
H.Merijn Brand
<h.m.brand@xs4all.nl>
Thu, 25 Sep 2008 11:55:49 +0000
(11:55 +0000)
p4raw-id: //depot/perl@34416
utf8.c
patch
|
blob
|
history
diff --git
a/utf8.c
b/utf8.c
index
3b5d5d4
..
6939a4d
100644
(file)
--- a/
utf8.c
+++ b/
utf8.c
@@
-2288,6
+2288,7
@@
Perl_pv_uni_display(pTHX_ SV *dsv, const U8 *spv, STRLEN len, STRLEN pvlim, UV f
}
if (ok) {
const char string = ok;
+ sv_catpvn(dsv, "\\", 1);
sv_catpvn(dsv, &string, 1);
}
}