[Bps-public-commit] r10012 - bpsbuilder/BPB/lib

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Wed Dec 19 11:31:58 2007
New Revision: 10012

Modified:
   bpsbuilder/BPB/lib/BPB.pm

Log:
we'd better check the project name

Modified: bpsbuilder/BPB/lib/BPB.pm
==============================================================================
--- bpsbuilder/BPB/lib/BPB.pm	(original)
+++ bpsbuilder/BPB/lib/BPB.pm	Wed Dec 19 11:31:58 2007
@@ -38,6 +38,9 @@
     $self->config(
         BPB::Config->new( config => delete $args{config}, name => $args{name} )
     );
+
+    die "invalid project name $args{name}"
+      unless ref $self->config->name eq 'HASH';
     $self->backend(
         BPB::Backend->new(
             %{ $self->config->name->{backend} },