[libfile-save-home-perl] 03/04: remove two patches released upstream

Damyan Ivanov dmn at moszumanska.debian.org
Sat Nov 11 16:52:48 UTC 2017


This is an automated email from the git hooks/post-receive script.

dmn pushed a commit to branch master
in repository libfile-save-home-perl.

commit c17576aed56e403db556447051c378d2f553c820
Author: Damyan Ivanov <dmn at debian.org>
Date:   Sat Nov 11 16:51:02 2017 +0000

    remove two patches released upstream
---
 debian/patches/pod-spelling.patch                  | 17 ----
 .../replace-perlidentifier-by-string-random.patch  | 95 ----------------------
 debian/patches/series                              |  2 -
 3 files changed, 114 deletions(-)

diff --git a/debian/patches/pod-spelling.patch b/debian/patches/pod-spelling.patch
deleted file mode 100644
index ad8dabe..0000000
--- a/debian/patches/pod-spelling.patch
+++ /dev/null
@@ -1,17 +0,0 @@
-Description: small typo in POD
- verion → version
-Author: Damyan Ivanov <dmn at debian.org>
-Forwarded: https://rt.cpan.org/Ticket/Display.html?id=123378
-Bug: https://rt.cpan.org/Ticket/Display.html?id=123378
-
---- a/lib/File/Save/Home.pm
-+++ b/lib/File/Save/Home.pm
-@@ -293,7 +293,7 @@ home-equivalent directory returned by C<
- =head3 Optional argument version
- 
- Creates a randomly named temporary directory underneath the directory supplied
--as the single argument.  This version is analogous to the two-argument verion
-+as the single argument.  This version is analogous to the two-argument version
- of L</"get_subhome_directory_status()"> above.  You could use it if, for
- example, you wanted to use C<File::HomeDir->my_home()> to supply a value for
- the user's home directory instead of our C<get_home_directory()>.
diff --git a/debian/patches/replace-perlidentifier-by-string-random.patch b/debian/patches/replace-perlidentifier-by-string-random.patch
deleted file mode 100644
index a0690ac..0000000
--- a/debian/patches/replace-perlidentifier-by-string-random.patch
+++ /dev/null
@@ -1,95 +0,0 @@
-Description: Replace String::PerlIdentifier by String::Random
- Use String::Random in tests instead of building a whole package
- (See #695559)
- Taken from upstream commit b339966dc9f1da6a34a1664e47e7d83f98d7c47b
-Bug-Debian: https://bugs.debian.org/695559
-Author: Xavier Guimard <x.guimard at free.fr>
-Author: James E Keenan
-Reviewed-by: gregor herrmann <gregoa at debian.org>
-Reviewed-by: Damyan Ivanov <dmn at debian.org>
-Last-Update: 2017-10-26
-Forwarded: https://rt.cpan.org/Ticket/Display.html?id=123377
-Bug: https://rt.cpan.org/Ticket/Display.html?id=123377
-
---- a/META.yml
-+++ b/META.yml
-@@ -22,7 +22,7 @@ requires:
-   File::Path: '0'
-   File::Spec: '0'
-   File::Temp: '0'
--  String::PerlIdentifier: '0'
-+  String::Random: '0'
-   Test::Simple: '0.44'
- version: '0.10'
- x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
---- a/Makefile.PL
-+++ b/Makefile.PL
-@@ -14,6 +14,6 @@ WriteMakefile(
-                      'File::Path'   => 0,
-                      'Carp'         => 0,
-                      'File::Temp'   => 0,
--                     'String::PerlIdentifier' => 0,
-+                     'String::Random' => 0,
-                     },
- );
---- a/t/05_pseudohome.t
-+++ b/t/05_pseudohome.t
-@@ -12,8 +12,8 @@ use_ok('File::Save::Home', qw|
- | );
- use_ok('File::Temp', qw| tempdir |);
- use_ok('Cwd');
--use_ok('String::PerlIdentifier');
--
-+use_ok ( 'String::Random', qw(random_regex) );
-+*make_varname = sub { return random_regex(q([_A-Za-z][_A-Za-z0-9]{9})) };
- my ($cwd, $pseudohome, $desired_dir_ref );
- $cwd = cwd();
- 
---- a/t/06_Win32.t
-+++ b/t/06_Win32.t
-@@ -20,7 +20,8 @@ SKIP: {
-     | );
-     use_ok('File::Temp', qw| tempdir |);
-     use_ok('Cwd');
--    use_ok('String::PerlIdentifier');
-+    use_ok ( 'String::Random', qw(random_regex) );
-+    *make_varname = sub { return random_regex(q([_A-Za-z][_A-Za-z0-9]{9})) };
-     
-     my ($cwd, $pseudohome, $desired_dir_ref );
-     $cwd = cwd();
---- a/t/03_placefile.t
-+++ b/t/03_placefile.t
-@@ -15,7 +15,8 @@ use_ok('File::Save::Home', qw|
-     conceal_target_file
-     reveal_target_file
- | );
--use_ok('String::PerlIdentifier');
-+use_ok ( 'String::Random', qw(random_regex) );
-+*make_varname = sub { return random_regex(q([_A-Za-z][_A-Za-z0-9]{9})) };
- 
- my ($homedir, @subdirs, $desired_dir_ref, $desired_dir, $target_ref, $target );
- ok($homedir = get_home_directory(), 'home directory is defined');
---- a/t/02_multilevel.t
-+++ b/t/02_multilevel.t
-@@ -12,7 +12,8 @@ use_ok('File::Save::Home', qw|
-     conceal_target_file 
-     reveal_target_file 
- | );
--use_ok('String::PerlIdentifier');
-+use_ok ( 'String::Random', qw(random_regex) );
-+*make_varname = sub { return random_regex(q([_A-Za-z][_A-Za-z0-9]{9})) };
- 
- my ($homedir, @subdirs, $desired_dir_ref, $desired_dir, $target_ref );
- ok($homedir = get_home_directory(), 'home directory is defined');
---- a/t/01_test.t
-+++ b/t/01_test.t
-@@ -10,7 +10,8 @@ use_ok('File::Save::Home', qw|
-     make_subhome_directory
-     restore_subhome_directory_status 
- | );
--use_ok('String::PerlIdentifier');
-+use_ok ( 'String::Random', qw(random_regex) );
-+*make_varname = sub { return random_regex(q([_A-Za-z][_A-Za-z0-9]{9})) };
- use_ok('Cwd');
- 
- my ($cwd, $homedir, @subdirs, $desired_dir_ref, $desired_dir );
diff --git a/debian/patches/series b/debian/patches/series
deleted file mode 100644
index b48bcb5..0000000
--- a/debian/patches/series
+++ /dev/null
@@ -1,2 +0,0 @@
-replace-perlidentifier-by-string-random.patch
-pod-spelling.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libfile-save-home-perl.git



More information about the Pkg-perl-cvs-commits mailing list