blob: 83bd0065107e74ebb1ef15399e2704cb966bc408 (
plain)
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
#!/usr/bin/perl
use strict;
use warnings;
use Test::More;
use File::Basename qw(dirname);
use lib dirname(dirname(__FILE__));
use Test::DH;
use File::Path qw(remove_tree make_path);
use Debian::Debhelper::Dh_Lib qw(!dirname);
plan(tests => 3);
each_compat_subtest {
my ($compat) = @_;
# redundant --sourcedir=debian/tmp in v7+
make_path('debian/tmp/usr/bin');
create_empty_file('debian/tmp/usr/bin/foo');
create_empty_file('debian/tmp/usr/bin/bar');
ok(run_dh_tool('dh_install', '--sourcedir=debian/tmp', 'usr/bin/foo'));
ok(-e "debian/debhelper/usr/bin/foo");
ok(! -e "debian/debhelper/usr/bin/bar");
remove_tree('debian/debhelper', 'debian/tmp');
};
each_compat_subtest {
my ($compat) = @_;
# #534565: fallback use of debian/tmp in v7+
make_path('debian/tmp/usr/bin');
create_empty_file('debian/tmp/usr/bin/foo');
create_empty_file('debian/tmp/usr/bin/bar');
ok(run_dh_tool('dh_install', 'usr'));
ok(-e "debian/debhelper/usr/bin/foo", "#534565 [${compat}]");
ok(-e "debian/debhelper/usr/bin/bar", "#534565 [${compat}]");
remove_tree('debian/debhelper', 'debian/tmp');
};
each_compat_subtest {
my ($compat) = @_;
# specification of file in source directory not in debian/tmp
make_path('bar/usr/bin');
create_empty_file('bar/usr/bin/foo');
ok(run_dh_tool('dh_install', '--sourcedir=bar', 'usr/bin/foo'));
ok(-e "debian/debhelper/usr/bin/foo");
remove_tree('debian/debhelper', 'debian/tmp');
};
|
