my $first_doc = &pce::document::save_positions;
    $answer = &sniff_selection(0, $sci_frame->GetTextLength);
    &pce::edit::__restore_positions;
}
until (&pce::document::select_next == $first_doc);