From: Jarkko Hietaniemi Date: Sun, 7 Aug 2005 13:28:19 +0000 (+0300) Subject: undup X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cf525c36fb4613d400e7bd3733f96430dee2d396;p=p5sagit%2Fp5-mst-13.2.git undup Message-ID: <42F5E243.80500@gmail.com> p4raw-id: //depot/perl@25274 --- diff --git a/ext/Encode/lib/Encode/Supported.pod b/ext/Encode/lib/Encode/Supported.pod index fab86e9..651f7e6 100644 --- a/ext/Encode/lib/Encode/Supported.pod +++ b/ext/Encode/lib/Encode/Supported.pod @@ -834,7 +834,7 @@ The glossary of this document is based upon this site. L -Contains a a lot of useful information, especially gory details of ISO +Contains a lot of useful information, especially gory details of ISO vs. vendor mappings. =item CJK.inf diff --git a/lib/Test/Harness/TAP.pod b/lib/Test/Harness/TAP.pod index bfecee5..fa80478 100644 --- a/lib/Test/Harness/TAP.pod +++ b/lib/Test/Harness/TAP.pod @@ -148,7 +148,7 @@ these two keywords are not case-sensitive. =head2 TODO tests If the directive starts with C<# TODO>, the test is counted as a -todo test, and the text after C is the the explanation. +todo test, and the text after C is the explanation. not ok 13 # TODO bend space and time diff --git a/pad.c b/pad.c index fc66b30..c0e7a5b 100644 --- a/pad.c +++ b/pad.c @@ -386,7 +386,7 @@ Perl_pad_add_name(pTHX_ const char *name, HV* typestash, HV* ourstash, bool fake Allocate a new my or tmp pad entry. For a my, simply push a null SV onto the end of PL_comppad, but for a tmp, scan the pad from PL_padix upwards -for a slot which has no name and and no active value. +for a slot which has no name and no active value. =cut */ diff --git a/pod/perl573delta.pod b/pod/perl573delta.pod index ea49678..42ed261 100644 --- a/pod/perl573delta.pod +++ b/pod/perl573delta.pod @@ -149,7 +149,7 @@ unpack("Z*Z*", pack("Z*Z*", ..)) was broken =item 12243 -Devel::Peek: display UTF-8 SVs also also as \x{...} +Devel::Peek: display UTF-8 SVs also as \x{...} =item 12288 diff --git a/pod/perl58delta.pod b/pod/perl58delta.pod index 295724f..04a0374 100644 --- a/pod/perl58delta.pod +++ b/pod/perl58delta.pod @@ -416,7 +416,7 @@ for more information about UTF-8. =item * If your environment variables (LC_ALL, LC_CTYPE, LANG) look like you -want to use UTF-8 (any of the the variables match C), your +want to use UTF-8 (any of the variables match C), your STDIN, STDOUT, STDERR handles and the default open layer (see L) are marked as UTF-8. (This feature, like other new features that combine Unicode and I/O, work only if you are using PerlIO, but that's @@ -3362,7 +3362,7 @@ use the bundled C compiler.) Perl 5.8.0 doesn't build in AmigaOS. It broke at some point during the ithreads work and we could not find Amiga experts to unbreak the -problems. Perl 5.6.1 still works for AmigaOS (as does the the 5.7.2 +problems. Perl 5.6.1 still works for AmigaOS (as does the 5.7.2 development release). =head2 BeOS @@ -3701,7 +3701,7 @@ from the CPAN. Perl 5.8 unfortunately does not build anymore on AmigaOS; this broke accidentally at some point. Since there are not that many Amiga developers available, we could not get this fixed and tested in time -for 5.8.0. Perl 5.6.1 still works for AmigaOS (as does the the 5.7.2 +for 5.8.0. Perl 5.6.1 still works for AmigaOS (as does the 5.7.2 development release). The C and C (capitalised) were renamed as diff --git a/pod/perlfaq7.pod b/pod/perlfaq7.pod index 644b065..b765d75 100644 --- a/pod/perlfaq7.pod +++ b/pod/perlfaq7.pod @@ -179,7 +179,7 @@ If you're looking for something a bit more rigorous, try L. (contributed by brian d foy) L, L, L explain modules -in all the gory details. L gives a a brief +in all the gory details. L gives a brief overview of the process along with a couple of suggestions about style. diff --git a/pod/perlglossary.pod b/pod/perlglossary.pod index 31a20de..24679c9 100644 --- a/pod/perlglossary.pod +++ b/pod/perlglossary.pod @@ -184,7 +184,7 @@ regular operators. See L. =item autoincrement -To add one to something automatically, hence the name of the the C<++> +To add one to something automatically, hence the name of the C<++> operator. To instead subtract one from something automatically is known as an "autodecrement". diff --git a/pod/perlvar.pod b/pod/perlvar.pod index 5589ce2..a820be1 100644 --- a/pod/perlvar.pod +++ b/pod/perlvar.pod @@ -854,7 +854,7 @@ changes. Modifying the $0 is more useful as a way of indicating the current program state than it is for hiding the program you're running. (Mnemonic: same as B and B.) -Note that there are platform specific limitations on the the maximum +Note that there are platform specific limitations on the maximum length of C<$0>. In the most extreme case it may be limited to the space occupied by the original C<$0>. @@ -872,7 +872,7 @@ and version). This is an operating system feature, Perl cannot help it. In multithreaded scripts Perl coordinates the threads so that any thread may modify its copy of the C<$0> and the change becomes visible -to ps(1) (assuming the operating system plays along). Note that the +to ps(1) (assuming the operating system plays along). Note that the view of C<$0> the other threads have will not change since they have their own copies of it. diff --git a/pp_ctl.c b/pp_ctl.c index 01a90d5..983a760 100644 --- a/pp_ctl.c +++ b/pp_ctl.c @@ -2862,7 +2862,7 @@ Locate the CV corresponding to the currently executing sub or eval. If db_seqp is non_null, skip CVs that are in the DB package and populate *db_seqp with the cop sequence number at the point that the DB:: code was entered. (allows debuggers to eval in the scope of the breakpoint rather -than in in the scope of the debugger itself). +than in the scope of the debugger itself). =cut */