Skip to content

Commit

Permalink
[App::Pls] be stricter about nonexistent projects
Browse files Browse the repository at this point in the history
No need to be DWIMmy and treat project names with no entry as extant.
  • Loading branch information
Carl Masak committed Jun 13, 2010
1 parent b9d3e4e commit d7e48ad
Showing 1 changed file with 10 additions and 7 deletions.
17 changes: 10 additions & 7 deletions lib/App/Pls.pm
Original file line number Diff line number Diff line change
Expand Up @@ -20,21 +20,24 @@ class App::Pls::ProjectsState::Hash does App::Pls::ProjectsState {
}

method state-of($project --> State) {
(%!projects{$project} // { :state<absent> })<state> // 'absent';
die "No such project: $project"
unless %!projects.exists($project);
return %!projects{$project}<state> //= 'absent';
}

method set-state-of($project, State $state) {
die "No such project: $project"
unless %!projects.exists($project);
%!projects{$project}<state> = $state;
}

method deps-of($project) {
if %!projects.exists($project) {
if %!projects{$project}.exists('deps') {
return %!projects{$project}<deps>.list;
}
return ();
die "No such project: $project"
unless %!projects.exists($project);
if %!projects{$project}.exists('deps') {
return %!projects{$project}<deps>.list;
}
die "No such project: $project";
return ();
}

method reached-state($project, $goal-state --> Bool) {
Expand Down

0 comments on commit d7e48ad

Please sign in to comment.