Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Fix unit and sigspace warnings #158

Merged
merged 3 commits into from May 18, 2015
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Jump to
Jump to file
Failed to load files.
Diff view
Diff view
4 changes: 3 additions & 1 deletion lib/Panda/App.pm
@@ -1,4 +1,4 @@
module Panda::App;
module Panda::App {
use Shell::Command;
use Panda::Ecosystem;
use Panda::Project;
Expand Down Expand Up @@ -139,4 +139,6 @@ sub revdep($panda, $name, :$installed) is export {
say $panda.ecosystem.revdeps($name, :$installed).join("\n");
}

}

# vim: ft=perl6
4 changes: 3 additions & 1 deletion lib/Panda/Builder.pm
@@ -1,4 +1,4 @@
class Panda::Builder;
class Panda::Builder {
use Panda::Common;
use File::Find;
use Shell::Command;
Expand Down Expand Up @@ -127,4 +127,6 @@ method build($where, :$bone) {
return True;
}

}

# vim: ft=perl6
8 changes: 5 additions & 3 deletions lib/Panda/Bundler.pm
@@ -1,4 +1,4 @@
class Panda::Bundler;
class Panda::Bundler {
use Panda::Common;
use Panda::Project;
use File::Find;
Expand Down Expand Up @@ -54,7 +54,7 @@ method bundle($panda, :$notests, Str :$name, Str :$auth, Str :$ver, Str :$desc)

if "$dir/blib/lib".IO ~~ :d {
find(dir => "$dir/blib/lib", type => 'file').list.grep( -> $lib is copy {
next unless $lib.basename ~~ / \.pm 6? $/;
next unless $lib.basename ~~ / \.pm6? $/;
$lib = file_to_symbol($lib);
try shell "$*EXECUTABLE -Iblib/lib -M$lib -e1 " ~ ($*DISTRO.is-win ?? ' >NIL 2>&1' !! ' >/dev/null 2>&1');
} )
Expand Down Expand Up @@ -144,10 +144,12 @@ method bundle($panda, :$notests, Str :$name, Str :$auth, Str :$ver, Str :$desc)
}

sub file_to_symbol($file) {
my @names = $file.IO.relative.subst(/ \.pm 6? $/, '').split(/<[\\\/]>/);
my @names = $file.IO.relative.subst(/ \.pm6? $/, '').split(/<[\\\/]>/);
shift @names if @names && @names[0] eq 'blib';
shift @names if @names && @names[0] eq 'lib';
@names.join('::');
}

}

# vim: ft=perl6
4 changes: 3 additions & 1 deletion lib/Panda/Common.pm
@@ -1,4 +1,4 @@
module Panda::Common;
module Panda::Common {
use Shell::Command;

sub dirname ($mod as Str) is export {
Expand Down Expand Up @@ -73,4 +73,6 @@ class X::Panda is Exception {
}
}

}

# vim: ft=perl6
4 changes: 3 additions & 1 deletion lib/Panda/Fetcher.pm
@@ -1,4 +1,4 @@
class Panda::Fetcher;
class Panda::Fetcher {
use File::Find;
use Shell::Command;

Expand Down Expand Up @@ -67,4 +67,6 @@ sub local-fetch($from, $to) {
return True;
}

}

# vim: ft=perl6
4 changes: 3 additions & 1 deletion lib/Panda/Installer.pm
@@ -1,4 +1,4 @@
class Panda::Installer;
class Panda::Installer {
use Panda::Common;
use Panda::Project;
use File::Find;
Expand Down Expand Up @@ -78,4 +78,6 @@ method install($from, $to? is copy, Panda::Project :$bone) {
}
}

}

# vim: ft=perl6
6 changes: 5 additions & 1 deletion lib/Panda/Reporter.pm
@@ -1,4 +1,4 @@
class Panda::Reporter;
class Panda::Reporter {

has $.bone is rw;
has $.reports-file is rw;
Expand Down Expand Up @@ -98,3 +98,7 @@ method to-json {
}),
}
}

}

# vim: ft=perl6
4 changes: 3 additions & 1 deletion lib/Panda/Tester.pm
@@ -1,4 +1,4 @@
class Panda::Tester;
class Panda::Tester {
use Panda::Common;

method test($where, :$bone, :$prove-command = 'prove') {
Expand Down Expand Up @@ -39,4 +39,6 @@ method test($where, :$bone, :$prove-command = 'prove') {
return True;
}

}

# vim: ft=perl6