[Dbix-class] problem with 'delete'

[Angel Kolev]

package AppModelDB::AppModel;
use base qw/DBIx::Class/; 
__PACKAGE__->belongs_to(archive => 'AppModelDB::Schedules', 'id',, 
{join_type => 'left'}); 
<snip>



package AppModelDB::Schedules;
use base qw/DBIx::Class/; 
__PACKAGE__->has_many(model => 'AppModelDB::AppModel', 'id');  
<snip>

In my script:
 $c->model('AppModelDB::Schedule')->find({id=>184})->delete;   

This delete id 184 in AppModelDB::AppModel table too. Why? I dont use 
delete_all.