From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Mon, 14 Nov 2005 10:45:25 +0000 (+0000)
Subject: Fix indentation of apidoc for sv_2pvutf8
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=035cbb0e21d9be3cc0345383c9ae0fe281e8befd;p=p5sagit%2Fp5-mst-13.2.git

Fix indentation of apidoc for sv_2pvutf8
(so perlapi.pod is correctly generated)

p4raw-id: //depot/perl@26124
---

diff --git a/pod/perlapi.pod b/pod/perlapi.pod
index 6a1bf2b..497ad9f 100644
--- a/pod/perlapi.pod
+++ b/pod/perlapi.pod
@@ -4613,6 +4613,19 @@ Usually accessed via the C<SvPVbyte> macro.
 =for hackers
 Found in file sv.c
 
+=item sv_2pvutf8
+X<sv_2pvutf8>
+
+Return a pointer to the UTF-8-encoded representation of the SV, and set *lp
+to its length.  May cause the SV to be upgraded to UTF-8 as a side-effect.
+
+Usually accessed via the C<SvPVutf8> macro.
+
+	char*	sv_2pvutf8(SV* sv, STRLEN* lp)
+
+=for hackers
+Found in file sv.c
+
 =item sv_2pv_flags
 X<sv_2pv_flags>
 
diff --git a/sv.c b/sv.c
index 04585ea..206b593 100644
--- a/sv.c
+++ b/sv.c
@@ -3315,21 +3315,21 @@ Perl_sv_2pvbyte(pTHX_ register SV *sv, STRLEN *lp)
 }
 
 /*
- * =for apidoc sv_2pvutf8
- *
- * Return a pointer to the UTF-8-encoded representation of the SV, and set *lp
- * to its length.  May cause the SV to be upgraded to UTF-8 as a side-effect.
- *
- * Usually accessed via the C<SvPVutf8> macro.
- *
- * =cut
- * */
+=for apidoc sv_2pvutf8
+
+Return a pointer to the UTF-8-encoded representation of the SV, and set *lp
+to its length.  May cause the SV to be upgraded to UTF-8 as a side-effect.
+
+Usually accessed via the C<SvPVutf8> macro.
+
+=cut
+*/
 
 char *
 Perl_sv_2pvutf8(pTHX_ register SV *sv, STRLEN *lp)
 {
-        sv_utf8_upgrade(sv);
-	    return lp ? SvPV(sv,*lp) : SvPV_nolen(sv);
+    sv_utf8_upgrade(sv);
+    return lp ? SvPV(sv,*lp) : SvPV_nolen(sv);
 }