File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -6,7 +6,7 @@ use parent qw(Module::Build);
66
77sub new {
88 my ($class , %args ) = @_ ;
9- die " OS Unsupported: " . $^O if ($^O !~ m # (?i)(Linux|darwin)# );
9+ die " OS Unsupported: " . $^O if ($^O !~ m # (?i)(Linux|darwin)# );
1010 print $^O;
1111 return $class -> SUPER::new(%args );
1212}
Original file line number Diff line number Diff line change @@ -14,13 +14,15 @@ use Mojo::IOLoop::ReadWriteProcess::CGroup qw(cgroupv2 cgroupv1);
1414use Mojo::IOLoop::ReadWriteProcess::Container qw( container) ;
1515
1616eval {
17- die " OS Unsupported: " . $^O if ($^O !~ m # (?i)(Linux)# );
17+ die " OS Unsupported: " . $^O if ($^O !~ m # (?i)(Linux)# );
1818 my $try_cgroup
1919 = cgroupv1(controller => ' pids' , name => ' group' )-> child(' test' )-> create;
2020 die unless $try_cgroup -> exists ();
2121};
2222
23- plan skip_all => " This test works only if you have cgroups permissions or a supported OS" if $@ ;
23+ plan skip_all =>
24+ " This test works only if you have cgroups permissions or a supported OS"
25+ if $@ ;
2426
2527subtest belongs => sub {
2628 cgroupv1(controller => ' pids' , name => ' group' )-> create;
Original file line number Diff line number Diff line change @@ -18,13 +18,15 @@ use Mojo::Util 'monkey_patch';
1818use Mojo::IOLoop::ReadWriteProcess::Namespace;
1919
2020eval {
21- die " OS Unsupported: " . $^O if ($^O !~ m # (?i)(Linux)# );
21+ die " OS Unsupported: " . $^O if ($^O !~ m # (?i)(Linux)# );
2222 my $try_cgroup
2323 = cgroupv1(controller => ' pids' , name => ' group' )-> child(' test' )-> create;
2424 die unless $try_cgroup -> exists ();
2525};
2626
27- plan skip_all => " This test works only if you have cgroups permissions or a supported OS" if $@ ;
27+ plan skip_all =>
28+ " This test works only if you have cgroups permissions or a supported OS"
29+ if $@ ;
2830
2931sub mock_test {
3032 my $c = shift ;
Original file line number Diff line number Diff line change 44use Mojo::IOLoop::ReadWriteProcess ' process' ;
55
66# Not all systems have /bin/true, this is /usr/bin/true on osx for instance
7- my $p = process(execute => ' command -v true' )-> start()-> wait_stop-> read_all_stdout;
7+ my $p
8+ = process(execute => ' command -v true' )-> start()-> wait_stop-> read_all_stdout;
89exit process(execute => $p )-> start()-> wait_stop()-> exit_status();
Original file line number Diff line number Diff line change @@ -20,7 +20,7 @@ cd "${0%/*}/.."
2020# just to make sure we are at the right location
2121test -e tools/tidy || exit 1
2222
23- find -name ' *.tdy' -delete
23+ find . -name ' *.tdy' -delete
2424
2525find . \( -name ' *.p[lm]' -o -name ' *.t' \) -print0 | xargs -0 perltidy --pro=.../.perltidyrc
2626
You can’t perform that action at this time.
0 commit comments