From Andrushock, s/sucess/success/g

7 files changed, 18 insertions, 15 deletions

diff --git a/gnu/usr.bin/perl/Changes b/gnu/usr.bin/perl/Changes
index 01b6eb77d2f..9eff108da00 100644
--- a/gnu/usr.bin/perl/Changes
+++ b/gnu/usr.bin/perl/Changes
@@ -4761,7 +4761,7 @@ ____________________________________________________________________________
 	   ! lib/Test/Harness/t/test-harness.t
 ____________________________________________________________________________
 [ 16953] By: ams                                   on 2002/06/01  03:20:52
-        Log: Remove $Id$ lines.
+        Log: Remove $Id: Changes,v 1.6 2002/10/27 22:25:13 millert Exp $ lines.
      Branch: perl
 	   ! ext/Storable/Makefile.PL ext/Storable/Storable.pm
 	   ! ext/Storable/Storable.xs ext/Storable/t/blessed.t
@@ -17956,7 +17956,7 @@ ____________________________________________________________________________
              Mark JP.t's data files as binary
              
              [ 15011]
-             Avoid $Id$ cleverness and just have a $VERSION.
+             Avoid $Id: Changes,v 1.6 2002/10/27 22:25:13 millert Exp $ cleverness and just have a $VERSION.
      Branch: perl
 	  !> ext/Encode/t/table.euc ext/Encode/t/table.ref
 ____________________________________________________________________________
@@ -19721,7 +19721,7 @@ ____________________________________________________________________________
 	  !> ext/Encode/compile
 ____________________________________________________________________________
 [ 15011] By: nick                                  on 2002/03/04  17:29:54
-        Log: Avoid $Id$ cleverness and just have a $VERSION.
+        Log: Avoid $Id: Changes,v 1.6 2002/10/27 22:25:13 millert Exp $ cleverness and just have a $VERSION.
      Branch: perlio
 	   ! ext/Encode/compile
 ____________________________________________________________________________
@@ -29693,7 +29693,7 @@ ____________________________________________________________________________
 	   ! MANIFEST pod/perlmodlib.pod pod/perltoc.pod
 ____________________________________________________________________________
 [ 13675] By: jhi                                   on 2001/12/13  16:16:12
-        Log: Subject: [PATCH ExtUtils::Install] Old RCS $Date$ tag
+        Log: Subject: [PATCH ExtUtils::Install] Old RCS $Date: 2002/10/27 22:25:13 $ tag
              From: Michael G Schwern <schwern@pobox.com>
              Date: Tue, 11 Dec 2001 23:17:32 -0500
              Message-ID: <20011212041732.GS17250@blackrider>
@@ -66521,7 +66521,7 @@ ____________________________________________________________________________
 	   ! op.c t/op/attrs.t toke.c xsutils.c
 ____________________________________________________________________________
 [  8765] By: alanbur                               on 2001/02/10  23:11:19
-        Log: Resync with parent (hopefully sucessfully this time)
+        Log: Resync with parent (hopefully successfully this time)
      Branch: maint-5.6/pureperl
 	  !> MANIFEST README.bs2000 README.hpux README.vmesa installhtml
 	  !> lib/Math/Complex.pm lib/Pod/Find.pm pod/buildtoc.PL
diff --git a/gnu/usr.bin/perl/ext/IO/lib/IO/Socket.pm b/gnu/usr.bin/perl/ext/IO/lib/IO/Socket.pm
index 8d36e8ee34f..f047eb152a4 100644
--- a/gnu/usr.bin/perl/ext/IO/lib/IO/Socket.pm
+++ b/gnu/usr.bin/perl/ext/IO/lib/IO/Socket.pm
@@ -219,7 +219,7 @@ sub send {
 	? send($sock, $_[1], $flags)
 	: send($sock, $_[1], $flags, $peer);
 
-    # remember who we send to, if it was sucessful
+    # remember who we send to, if it was successful
     ${*$sock}{'io_socket_peername'} = $peer
 	if(@_ == 4 && defined $r);
 
diff --git a/gnu/usr.bin/perl/ext/PerlIO/via/via.pm b/gnu/usr.bin/perl/ext/PerlIO/via/via.pm
index 39a5fab8607..8cf854b9af9 100644
--- a/gnu/usr.bin/perl/ext/PerlIO/via/via.pm
+++ b/gnu/usr.bin/perl/ext/PerlIO/via/via.pm
@@ -115,7 +115,7 @@ equal to $len).  Optional.  Default is to use FILL instead.
 
 =item $obj->WRITE($buffer,$fh)
 
-Returns the number of octets from buffer that have been sucessfully written.
+Returns the number of octets from buffer that have been successfully written.
 
 =item $obj->FILL($fh)
 
@@ -141,7 +141,7 @@ Optional.  Default to be determined.
 
 =item $obj->UNREAD($buffer,$fh)
 
-Returns the number of octets from buffer that have been sucessfully
+Returns the number of octets from buffer that have been successfully
 saved to be returned on future FILL/READ calls.  Optional.  Default is
 to push data into a temporary layer above this one.
 
diff --git a/gnu/usr.bin/perl/lib/Net/FTP.pm b/gnu/usr.bin/perl/lib/Net/FTP.pm
index 999889772dc..af27dc52b7d 100644
--- a/gnu/usr.bin/perl/lib/Net/FTP.pm
+++ b/gnu/usr.bin/perl/lib/Net/FTP.pm
@@ -625,7 +625,7 @@ sub mkdir
      $path = $ftp->_extract_path($path);
     }
 
-   # If the creation of the last element was not sucessful, see if we
+   # If the creation of the last element was not successful, see if we
    # can cd to it, if so then return path
 
    unless($ftp->ok)
diff --git a/gnu/usr.bin/perl/lib/Net/NNTP.pm b/gnu/usr.bin/perl/lib/Net/NNTP.pm
index 521ccf1e16f..0076405c269 100644
--- a/gnu/usr.bin/perl/lib/Net/NNTP.pm
+++ b/gnu/usr.bin/perl/lib/Net/NNTP.pm
@@ -748,8 +748,8 @@ Retrieve the header, a blank line, then the body (text) of the
 specified article. 
 
 If C<FH> is specified then it is expected to be a valid filehandle
-and the result will be printed to it, on sucess a true value will be
-returned. If C<FH> is not specified then the return value, on sucess,
+and the result will be printed to it, on success a true value will be
+returned. If C<FH> is not specified then the return value, on success,
 will be a reference to an array containg the article requested, each
 entry in the array will contain one line of the article.
 
diff --git a/gnu/usr.bin/perl/lib/ftp.pl b/gnu/usr.bin/perl/lib/ftp.pl
index 342871392a2..910dad49dd3 100644
--- a/gnu/usr.bin/perl/lib/ftp.pl
+++ b/gnu/usr.bin/perl/lib/ftp.pl
@@ -14,8 +14,11 @@
 # based on original version by Alan R. Martello <al@ee.pitt.edu>
 # And by A.Macpherson@bnr.co.uk for multi-homed hosts
 #
-# $Header: /cvs/OpenBSD/src/gnu/usr.bin/perl/lib/Attic/ftp.pl,v 1.6 2002/10/27 22:25:26 millert Exp $
+# $Header: /cvs/OpenBSD/src/gnu/usr.bin/perl/lib/Attic/ftp.pl,v 1.7 2002/12/09 00:45:36 millert Exp $
 # $Log: ftp.pl,v $
+# Revision 1.7  2002/12/09 00:45:36  millert
+# From Andrushock, s/sucess/success/g
+#
 # Revision 1.6  2002/10/27 22:25:26  millert
 # Resolve conflicts, remove old files, merge local changes
 #
@@ -331,10 +334,10 @@ sub ftp'cwd
 
 # Get a full directory listing:
 # &ftp'dir( remote LIST options )
-# Start a list goin with the given options.
+# Start a list going with the given options.
 # Presuming that the remote deamon uses the ls command to generate the
 # data to send back then you can send it some extra options (eg: -lRa)
-# return 1 if sucessful and 0 on a failure
+# return 1 if successful and 0 on a failure
 sub ftp'dir_open
 {
 	local( $options ) = @_;
diff --git a/gnu/usr.bin/perl/lib/utf8.t b/gnu/usr.bin/perl/lib/utf8.t
index 8fc44816f4e..fd01970802a 100644
--- a/gnu/usr.bin/perl/lib/utf8.t
+++ b/gnu/usr.bin/perl/lib/utf8.t
@@ -189,7 +189,7 @@ BANG
     print
         "# Again! Again! [but this time as eval, and not the explosive one]\n";
     # and now we've safely done them all as separate files, check that the
-    # evals do the same thing. Hopefully doing it later sucessfully decouples
+    # evals do the same thing. Hopefully doing it later successfully decouples
     # the previous tests from anything messy that may go wrong with the evals.
     foreach (@tests) {
         my ($why, $prog, $expect) = @$_;