File: uuid.t-require-Data%3A%3AUUID.patch

package info (click to toggle)
libobject-id-perl 0.1.2-2
  • links: PTS, VCS
  • area: main
  • in suites: buster, stretch
  • size: 192 kB
  • ctags: 9
  • sloc: perl: 289; makefile: 2
file content (27 lines) | stat: -rw-r--r-- 828 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Description: uuid.t: skip when Data::UUID is unavailable during testing
 Otherwise the tests require Module::Build's _build/ directory which breaks
 Debian continuous integration tests.
 .
 The new test uses the same logic that is used in Object::ID itself when
 creating the object_uuid method.
Author: Damyan Ivanov <dmn@debian.org>
Forwarded: https://rt.cpan.org/Ticket/Display.html?id=105123
Bug: https://rt.cpan.org/Ticket/Display.html?id=105123

--- a/t/uuid.t
+++ b/t/uuid.t
@@ -5,12 +5,10 @@
 use strict;
 use warnings;
 
-use Module::Build;
 use Test::More;
 
-plan skip_all => "Data::UUID not available for object_uuid" unless do {
-    my $build = Module::Build->resume;
-    $build->feature("object_uuid");
+plan skip_all => "Data::UUID not available for object_uuid" unless eval {
+    require Data::UUID;
 };
 
 {