$mw->optionAdd(q{*Entry*borderWidth}, 1, $priority);
    $mw->optionAdd(q{*Entry*insertBorderWidth}, 0, $priority);
    $mw->optionAdd(q{*Entry*selectBorderWidth}, 0, $priority);

    $mw->optionAdd(q{*NoteBook.borderWidth}, 1, $priority);
    $mw->optionAdd(q{*NoteBook.activeBorderWidth}, 1, $priority);

    $mw->optionAdd(q{*NoteBook.Frame.borderWidth}, 0, $priority);
    $mw->optionAdd(q{*NoteBook.Frame.activeBorderWidth}, 0, $priority);