--- lib/A3C/Model/StrixSiteSelection.pm 2008/06/15 10:51:57 157 +++ lib/A3C/Model/StrixSiteSelection.pm 2008/06/15 11:03:50 158 @@ -39,10 +39,15 @@ sub current_user_can { my $self = shift; -# warn " current_user->id: ", $self->current_user->id, " == ", dump( $self->by_user->id ); - # FIXME just my sites - #return 1 if $self->by_user->id == $self->current_user->id; - return 1; + my $op = shift; + + if ( $op eq 'create' ) { + my %args = @_; + return 1 if $args{by_user} == $self->current_user->id; + } + + return 1 if $self->by_user->id == $self->current_user->id; + return 0; }