diff options
author | Jesse Vincent <jesse@bestpractical.com> | 2009-10-05 23:42:38 -0400 |
---|---|---|
committer | Jesse Vincent <jesse@bestpractical.com> | 2009-10-05 23:57:58 -0400 |
commit | 345e23944176348809d2be92e05ba6856a5c0ebc (patch) | |
tree | 6c18f1f5b63994d65f86ab00bc8f7ced256432c4 /dist/ExtUtils-Install | |
parent | 69f6a9a1e215d426b05a8e22b39666a532bfffc3 (diff) | |
download | perl-345e23944176348809d2be92e05ba6856a5c0ebc.tar.gz |
A number of pod fixes found by podcheck.t
Diffstat (limited to 'dist/ExtUtils-Install')
-rw-r--r-- | dist/ExtUtils-Install/lib/ExtUtils/Install.pm | 13 | ||||
-rw-r--r-- | dist/ExtUtils-Install/lib/ExtUtils/Packlist.pm | 4 |
2 files changed, 15 insertions, 2 deletions
diff --git a/dist/ExtUtils-Install/lib/ExtUtils/Install.pm b/dist/ExtUtils-Install/lib/ExtUtils/Install.pm index c886c69bf2..0928228daf 100644 --- a/dist/ExtUtils-Install/lib/ExtUtils/Install.pm +++ b/dist/ExtUtils-Install/lib/ExtUtils/Install.pm @@ -75,6 +75,8 @@ ocurred, but should not impact later operations. =begin _private +=over + =item _chmod($$;$) Wrapper to chmod() for debugging and error trapping. @@ -87,6 +89,8 @@ Warns about something only once. Dies with a special message. +=back + =end _private =cut @@ -169,6 +173,8 @@ sub _chmod($$;$) { =begin _private +=over + =item _move_file_at_boot( $file, $target, $moan ) OS-Specific, Win32/Cygwin @@ -235,6 +241,7 @@ sub _move_file_at_boot { #XXX OS-SPECIFIC =begin _private + =item _unlink_or_rename( $file, $tryhard, $installing ) OS-Specific, Win32/Cygwin @@ -262,6 +269,8 @@ a derivative of the original in the same directory) so that the caller can use it to install under. In all other cases of success returns $file. On failure throws a fatal error. +=back + =end _private =cut @@ -313,6 +322,8 @@ sub _unlink_or_rename { #XXX OS-SPECIFIC =begin _private +=over + =item _get_install_skip Handles loading the INSTALL.SKIP file. Returns an array of patterns to use. @@ -556,8 +567,6 @@ sub _chdir { =end _private -=over 4 - =item B<install> # deprecated forms diff --git a/dist/ExtUtils-Install/lib/ExtUtils/Packlist.pm b/dist/ExtUtils-Install/lib/ExtUtils/Packlist.pm index 04f267a0a3..9ff67f4913 100644 --- a/dist/ExtUtils-Install/lib/ExtUtils/Packlist.pm +++ b/dist/ExtUtils-Install/lib/ExtUtils/Packlist.pm @@ -13,6 +13,8 @@ my $fhname = "FH1"; =begin _undocumented +=over + =item mkfh() Make a filehandle. Same kind of idea as Symbol::gensym(). @@ -34,6 +36,8 @@ time relative to $^X, and generates a regexp that matches them =end _undocumented +=back + =cut sub __find_relocations |