db/pgbackrest
1
0
Fork 0
mirror of https://github.com/pgbackrest/pgbackrest.git synced 2025-03-17 20:58:34 +02:00
Code Issues Releases Activity

Removed extraneous use lib directives from Perl modules.

Browse Source 
Suggested by Devrim Gündüz.
This commit is contained in:
David Steele 2016-11-04 13:56:26 +02:00
parent 171c5835bb
commit f43e5bc52d
36 changed files with 26 additions and 41 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
bin/pgbackrest
View File

@ -17,6 +17,7 @@ $SIG{__DIE__} = sub { Carp::confess @_ };
use File::Basename qw(dirname);
use lib dirname($0) . '/../lib';
use pgBackRest::Archive;
use pgBackRest::Common::Exception;
use pgBackRest::Common::Exit;

4
doc/doc.pl
View File

@ -20,6 +20,9 @@ use Pod::Usage qw(pod2usage);
use Storable;
use lib dirname($0) . '/lib';
use lib dirname($0) . '/../lib';
use lib dirname($0) . '/../test/lib';
use BackRestDoc::Common::Doc;
use BackRestDoc::Common::DocConfig;
use BackRestDoc::Common::DocManifest;
@ -28,7 +31,6 @@ use BackRestDoc::Html::DocHtmlSite;
use BackRestDoc::Latex::DocLatex;
use BackRestDoc::Markdown::DocMarkdown;
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;

1
doc/lib/BackRestDoc/Common/Doc.pm
View File

@ -12,7 +12,6 @@ use File::Basename qw(dirname);
use Scalar::Util qw(blessed);
use XML::Checker::Parser;
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Log;
use pgBackRest::Common::String;
use pgBackRest::FileCommon;

2
doc/lib/BackRestDoc/Html/DocHtmlSite.pm
View File

@ -16,14 +16,12 @@ use File::Copy;
use POSIX qw(strftime);
use Storable qw(dclone);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;
use pgBackRest::FileCommon;
use pgBackRest::Version;
use lib dirname($0) . '/../test/lib';
use pgBackRestTest::Common::ExecuteTest;
use BackRestDoc::Common::DocConfig;

2
doc/lib/BackRestDoc/Latex/DocLatex.pm
View File

@ -16,14 +16,12 @@ use File::Copy;
use POSIX qw(strftime);
use Storable qw(dclone);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;
use pgBackRest::FileCommon;
use pgBackRest::Version;
use lib dirname($0) . '/../test/lib';
use pgBackRestTest::Common::ExecuteTest;
use BackRestDoc::Common::DocConfig;

2
doc/lib/BackRestDoc/Markdown/DocMarkdown.pm
View File

@ -15,13 +15,11 @@ use File::Copy;
use POSIX qw(strftime);
use Storable qw(dclone);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Log;
use pgBackRest::Common::String;
use pgBackRest::FileCommon;
use pgBackRest::Version;
use lib dirname($0) . '/../test/lib';
use pgBackRestTest::Common::ExecuteTest;
use BackRestDoc::Common::DocConfig;

1
doc/lib/BackRestDoc/Markdown/DocMarkdownRender.pm
View File

@ -15,7 +15,6 @@ use File::Basename qw(dirname);
use File::Copy;
use Storable qw(dclone);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Log;
use pgBackRest::Common::String;
use pgBackRest::Config::ConfigHelp;

5
doc/release.pl
View File

@ -20,6 +20,9 @@ use Pod::Usage qw(pod2usage);
use Storable;
use lib dirname($0) . '/lib';
use lib dirname($0) . '/../lib';
use lib dirname($0) . '/../test/lib';
use BackRestDoc::Common::Doc;
use BackRestDoc::Common::DocConfig;
use BackRestDoc::Common::DocManifest;
@ -28,7 +31,6 @@ use BackRestDoc::Html::DocHtmlSite;
use BackRestDoc::Latex::DocLatex;
use BackRestDoc::Markdown::DocMarkdown;
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;
@ -36,7 +38,6 @@ use pgBackRest::Config::Config;
use pgBackRest::FileCommon;
use pgBackRest::Version;
use lib dirname($0) . '/../test/lib';
use pgBackRestTest::Common::ExecuteTest;
####################################################################################################################################

17
doc/xml/release.xml
View File

@ -57,6 +57,11 @@
<contributor-id type="github">sfrost</contributor-id>
</contributor>
<contributor id="gunduz.devrim">
<contributor-name-display>Devrim G&amp;uuml;nd&amp;uuml;z</contributor-name-display>
<contributor-id type="github">devrimgunduz</contributor-id>
</contributor>
<contributor id="harvey.john">
<contributor-name-display>John Harvey</contributor-name-display>
<contributor-id type="github">crunchyjohn</contributor-id>
@ -125,7 +130,7 @@
<release-list>
<release date="XXXX-XX-XX" version="1.10dev" title="UNDER DEVELOPMENT">
<release-core-list>
<release-refactor-list>
<release-feature-list>
<release-item>
<release-item-contributor-list>
<release-item-contributor id="shang.cynthia"/>
@ -133,6 +138,16 @@
<p>Added the <cmd>stanza-create</cmd> command to formalize creation of stanzas in the repository.</p>
</release-item>
</release-feature-list>
<release-refactor-list>
<release-item>
<release-item-contributor-list>
<release-item-ideator id="gunduz.devrim"/>
</release-item-contributor-list>
<p>Removed extraneous <code>use lib</code> directives from Perl modules.</p>
</release-item>
</release-refactor-list>
</release-core-list>
</release>

1
lib/pgBackRest/Archive.pm
View File

@ -14,7 +14,6 @@ use Fcntl qw(SEEK_CUR O_RDONLY O_WRONLY O_CREAT);
use File::Basename qw(dirname basename);
use Scalar::Util qw(blessed);
use lib dirname($0);
use pgBackRest::Common::Exception;
use pgBackRest::Common::Lock;
use pgBackRest::Common::Log;

1
lib/pgBackRest/ArchiveInfo.pm
View File

@ -16,7 +16,6 @@ use Exporter qw(import);
use File::Basename qw(dirname basename);
use File::stat;
use lib dirname($0);
use pgBackRest::Common::Exception;
use pgBackRest::Common::Ini;
use pgBackRest::Common::Log;

1
lib/pgBackRest/Backup.pm
View File

@ -13,7 +13,6 @@ use Fcntl 'SEEK_CUR';
use File::Basename;
use File::Path qw(remove_tree);
use lib dirname($0);
use pgBackRest::Common::Exception;
use pgBackRest::Common::Exit;
use pgBackRest::Common::Ini;

1
lib/pgBackRest/BackupCommon.pm
View File

@ -11,7 +11,6 @@ use Exporter qw(import);
our @EXPORT = qw();
use File::Basename;
use lib dirname($0);
use pgBackRest::Common::Log;
use pgBackRest::Common::String;
use pgBackRest::Config::Config;

1
lib/pgBackRest/BackupFile.pm
View File

@ -11,7 +11,6 @@ use Exporter qw(import);
our @EXPORT = qw();
use File::Basename qw(dirname);
use lib dirname($0);
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;

1
lib/pgBackRest/BackupInfo.pm
View File

@ -13,7 +13,6 @@ use Exporter qw(import);
use File::Basename qw(dirname basename);
use File::stat;
use lib dirname($0);
use pgBackRest::BackupCommon;
use pgBackRest::Common::Exception;
use pgBackRest::Common::Ini;

1
lib/pgBackRest/Common/Exit.pm
View File

@ -12,7 +12,6 @@ use Exporter qw(import);
our @EXPORT = qw();
use File::Basename qw(dirname);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Lock;
use pgBackRest::Common::Log;

1
lib/pgBackRest/Common/Ini.pm
View File

@ -15,7 +15,6 @@ use IO::Handle;
use JSON::PP;
use Storable qw(dclone);
use lib dirname($0);
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;

1
lib/pgBackRest/Common/Lock.pm
View File

@ -12,7 +12,6 @@ use Exporter qw(import);
use Fcntl qw(:DEFAULT :flock);
use File::Basename qw(dirname);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;

1
lib/pgBackRest/Common/Log.pm
View File

@ -14,7 +14,6 @@ use File::Basename qw(dirname);
use Scalar::Util qw(blessed reftype);
use Time::HiRes qw(gettimeofday usleep);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::String;

1
lib/pgBackRest/Common/Wait.pm
View File

@ -13,7 +13,6 @@ use File::Basename qw(dirname);
use POSIX qw(ceil);
use Time::HiRes qw(gettimeofday usleep);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Log;
####################################################################################################################################

1
lib/pgBackRest/Config/Config.pm
View File

@ -14,7 +14,6 @@ use File::Basename qw(dirname basename);
use Getopt::Long qw(GetOptions);
use Storable qw(dclone);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Ini;
use pgBackRest::Common::Log;

1
lib/pgBackRest/Config/ConfigHelp.pm
View File

@ -11,7 +11,6 @@ use Exporter qw(import);
our @EXPORT = qw();
use File::Basename qw(dirname);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Ini;
use pgBackRest::Common::Log;

1
lib/pgBackRest/Db.pm
View File

@ -14,7 +14,6 @@ use Exporter qw(import);
use Fcntl qw(O_RDONLY);
use File::Basename qw(dirname);
use lib dirname($0);
use pgBackRest::DbVersion;
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;

1
lib/pgBackRest/Expire.pm
View File

@ -12,7 +12,6 @@ use File::Basename qw(dirname);
use File::Path qw(remove_tree);
use Scalar::Util qw(looks_like_number);
use lib dirname($0);
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::BackupCommon;

1
lib/pgBackRest/File.pm
View File

@ -17,7 +17,6 @@ use File::Path qw(make_path remove_tree);
use File::stat;
use IO::Handle;
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;

1
lib/pgBackRest/FileCommon.pm
View File

@ -16,7 +16,6 @@ use File::Path qw(make_path);
use File::stat;
use IO::Handle;
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;

1
lib/pgBackRest/Info.pm
View File

@ -11,7 +11,6 @@ use Exporter qw(import);
our @EXPORT = qw();
use File::Basename qw(dirname);
use lib dirname($0);
use pgBackRest::Common::Log;
use pgBackRest::Common::Ini;
use pgBackRest::Common::String;

1
lib/pgBackRest/Manifest.pm
View File

@ -14,7 +14,6 @@ use File::Basename qw(dirname basename);
use Digest::SHA;
use Time::Local qw(timelocal);
use lib dirname($0);
use pgBackRest::DbVersion;
use pgBackRest::Common::Exception;
use pgBackRest::Common::Ini;

1
lib/pgBackRest/Protocol/Common.pm
View File

@ -12,7 +12,6 @@ use Exporter qw(import);
use Compress::Raw::Zlib qw(WANT_GZIP Z_OK Z_BUF_ERROR Z_STREAM_END);
use File::Basename qw(dirname);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Ini;
use pgBackRest::Common::Log;

1
lib/pgBackRest/Protocol/CommonMaster.pm
View File

@ -12,7 +12,6 @@ use English '-no_match_vars';
use File::Basename qw(dirname);
use Time::HiRes qw(gettimeofday);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Ini;
use pgBackRest::Common::Log;

1
lib/pgBackRest/Protocol/IO.pm
View File

@ -17,7 +17,6 @@ use POSIX qw(:sys_wait_h);
use Symbol 'gensym';
use Time::HiRes qw(gettimeofday);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;

1
lib/pgBackRest/Protocol/RemoteMaster.pm
View File

@ -10,7 +10,6 @@ use Carp qw(confess);
use File::Basename qw(dirname);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Log;
use pgBackRest::Config::Config;
use pgBackRest::Protocol::CommonMaster;

1
lib/pgBackRest/Protocol/RemoteMinion.pm
View File

@ -10,7 +10,6 @@ use Carp qw(confess);
use File::Basename qw(dirname);
use lib dirname($0) . '/../lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Archive;

1
lib/pgBackRest/Restore.pm
View File

@ -11,7 +11,6 @@ use Cwd qw(abs_path);
use File::Basename qw(basename dirname);
use File::stat qw(lstat);
use lib dirname($0);
use pgBackRest::BackupInfo;
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;

1
lib/pgBackRest/RestoreFile.pm
View File

@ -13,7 +13,6 @@ use Fcntl qw(O_WRONLY O_CREAT O_TRUNC);
use File::Basename qw(dirname);
use File::stat qw(lstat);
use lib dirname($0);
use pgBackRest::Common::Exception;
use pgBackRest::Common::Log;
use pgBackRest::Common::String;

6
test/test.pl
View File

@ -21,7 +21,10 @@ use Pod::Usage qw(pod2usage);
use POSIX qw(ceil);
use Time::HiRes qw(gettimeofday);
use lib dirname($0) . '/lib';
use lib dirname($0) . '/../lib';
use lib dirname($0) . '/../doc/lib';
use pgBackRest::Common::Exception;
use pgBackRest::Common::Ini;
use pgBackRest::Common::Log;
@ -32,10 +35,8 @@ use pgBackRest::DbVersion;
use pgBackRest::FileCommon;
use pgBackRest::Version;
use lib dirname($0) . '/../doc/lib';
use BackRestDoc::Custom::DocCustomRelease;
use lib dirname($0) . '/lib';
use pgBackRestTest::Backup::BackupTest;
use pgBackRestTest::Backup::Common::HostBackupTest;
use pgBackRestTest::Backup::Common::HostBaseTest;
@ -219,7 +220,6 @@ eval
if (!defined($iVmId))
{
# Load the doc module dynamically since it is not supported on all systems
use lib dirname(abs_path($0)) . '/../doc/lib';
require BackRestDoc::Common::Doc;
BackRestDoc::Common::Doc->import();