develooper Front page | perl.perl5.porters | Postings from January 2011

[perl #81874] [PATCH] Fix typos (spelling errors) in cpan/Time*.

From:
perlbug-followup
Date:
January 7, 2011 01:57
Subject:
[perl #81874] [PATCH] Fix typos (spelling errors) in cpan/Time*.
Message ID:
rt-3.6.HEAD-5425-1294384294-444.81874-75-0@perl.org
# New Ticket Created by  (Peter J. Acklam) 
# Please include the string:  [perl #81874]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=81874 >


---
 cpan/Time-HiRes/t/HiRes.t |    4 ++--
 cpan/Time-Local/t/Local.t |    2 +-
 cpan/Time-Piece/Piece.pm  |    2 +-
 cpan/Time-Piece/Piece.xs  |    2 +-
 cpan/Time-Piece/README    |    2 +-
 5 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/cpan/Time-HiRes/t/HiRes.t b/cpan/Time-HiRes/t/HiRes.t
index 0a38e78..1bb64b0 100644
--- a/cpan/Time-HiRes/t/HiRes.t
+++ b/cpan/Time-HiRes/t/HiRes.t
@@ -648,7 +648,7 @@ sub bellish {  # Cheap emulation of a bell curve.
 }
 
 if ($have_ualarm) {
-    # 1_100_000 sligthly over 1_000_000,
+    # 1_100_000 slightly over 1_000_000,
     # 2_200_000 slightly over 2**31/1000,
     # 4_300_000 slightly over 2**32/1000.
     for my $t ([34, 100_000],
@@ -729,7 +729,7 @@ if ($^O =~ /^(cygwin|MSWin)/) {
 	}
     }
     print "# ai = $ai, mi = $mi, ss = $ss\n";
-    # Need at least 75% of monotonical increase and
+    # Need at least 75% of monotonic increase and
     # 20% of subsecond results. Yes, this is guessing.
     if ($ss == 0) {
 	print "# No subsecond timestamps detected\n";
diff --git a/cpan/Time-Local/t/Local.t b/cpan/Time-Local/t/Local.t
index 521cac0..e846c5f 100644
--- a/cpan/Time-Local/t/Local.t
+++ b/cpan/Time-Local/t/Local.t
@@ -144,7 +144,7 @@ for (@bad_time) {
     is(timelocal(1,2,3,1,0,100) - timelocal(1,2,3,31,11,99), 24 * 3600,
        'one day difference between two calls to timelocal');
 
-    # Diff beween Jan 1, 1980 and Mar 1, 1980 = (31 + 29 = 60 days)
+    # Diff between Jan 1, 1980 and Mar 1, 1980 = (31 + 29 = 60 days)
     is(timegm(0,0,0, 1, 2, 80) - timegm(0,0,0, 1, 0, 80), 60 * 24 * 3600,
        '60 day difference between two calls to timegm');
 }
diff --git a/cpan/Time-Piece/Piece.pm b/cpan/Time-Piece/Piece.pm
index a3f7fb6..a719b71 100644
--- a/cpan/Time-Piece/Piece.pm
+++ b/cpan/Time-Piece/Piece.pm
@@ -728,7 +728,7 @@ using locales.
 
   my $french_day = localtime->day(@days);
 
-These settings can be overriden globally too:
+These settings can be overridden globally too:
 
   Time::Piece::day_list(@days);
 
diff --git a/cpan/Time-Piece/Piece.xs b/cpan/Time-Piece/Piece.xs
index 90efdd4..f76dc95 100644
--- a/cpan/Time-Piece/Piece.xs
+++ b/cpan/Time-Piece/Piece.xs
@@ -127,7 +127,7 @@ my_init_tm(struct tm *ptm)        /* see mktime, strftime and asctime    */
  *
  * Note that we don't free() the malloc()ed memory unless and until we call
  * malloc() again ourselves because the CRT putenv() function simply puts its
- * pointer argument into the environ[] arrary (it doesn't make a copy of it)
+ * pointer argument into the environ[] array (it doesn't make a copy of it)
  * so this memory must otherwise be leaked.
  */
 
diff --git a/cpan/Time-Piece/README b/cpan/Time-Piece/README
index b7713f9..26b648f 100644
--- a/cpan/Time-Piece/README
+++ b/cpan/Time-Piece/README
@@ -1,7 +1,7 @@
 Time::Piece
 ===========
 
-This module supercedes Time::Object (and has a better name).
+This module supersedes Time::Object (and has a better name).
 
 At this time the module is almost identical to Time::Object, with
 the exception of strptime support. People using Time::Object should
-- 
1.7.3.3




nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About