about summary refs log tree commit
diff options
context:
space:
mode:
authorGraham Barr <gbarr@pobox.com>2003-05-20 12:01:50 +0000
committerGraham Barr <gbarr@pobox.com>2003-05-20 12:01:50 +0000
commitd23c2e4ca98e7d03a0e6227d441a73c9df958a00 (patch)
tree616e9e08e9963a174f90ece1932c08f9d6267c34
parent9f4a0543868553fd45429d1c8a464426d7524bf1 (diff)
downloadperl-libnet-d23c2e4ca98e7d03a0e6227d441a73c9df958a00.tar.gz
Net::FTP, Net::NNTP
- doc updates from Jarkko

-rw-r--r--Net/FTP.pm6
-rw-r--r--Net/NNTP.pm8
2 files changed, 7 insertions, 7 deletions
diff --git a/Net/FTP.pm b/Net/FTP.pm
index 07e1a6f..b7f4caa 100644
--- a/Net/FTP.pm
+++ b/Net/FTP.pm
@@ -22,7 +22,7 @@ use Net::Config;
 use Fcntl qw(O_WRONLY O_RDONLY O_APPEND O_CREAT O_TRUNC);
 # use AutoLoader qw(AUTOLOAD);
 
-$VERSION = "2.68"; # $Id: //depot/libnet/Net/FTP.pm#72 $
+$VERSION = "2.68"; # $Id: //depot/libnet/Net/FTP.pm#73 $
 @ISA     = qw(Exporter Net::Cmd IO::Socket::INET);
 
 # Someday I will "use constant", when I am not bothered to much about
@@ -629,7 +629,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)
@@ -1729,6 +1729,6 @@ under the same terms as Perl itself.
 
 =for html <hr>
 
-I<$Id: //depot/libnet/Net/FTP.pm#72 $>
+I<$Id: //depot/libnet/Net/FTP.pm#73 $>
 
 =cut
diff --git a/Net/NNTP.pm b/Net/NNTP.pm
index 1c3ff5e..79261f8 100644
--- a/Net/NNTP.pm
+++ b/Net/NNTP.pm
@@ -14,7 +14,7 @@ use Carp;
 use Time::Local;
 use Net::Config;
 
-$VERSION = "2.22"; # $Id: //depot/libnet/Net/NNTP.pm#17 $
+$VERSION = "2.22"; # $Id: //depot/libnet/Net/NNTP.pm#18 $
 @ISA     = qw(Net::Cmd IO::Socket::INET);
 
 sub new
@@ -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.
 
@@ -1117,6 +1117,6 @@ it under the same terms as Perl itself.
 
 =for html <hr>
 
-I<$Id: //depot/libnet/Net/NNTP.pm#17 $>
+I<$Id: //depot/libnet/Net/NNTP.pm#18 $>
 
 =cut