sub add {
   # blah
   unless (exists $self->{'.queue'}->{$priority}) {
       $self->{'.queue'}->{$priority} = ();
       $self->_sort_priorities;
   }