$mw->bind('<Up>',            sub { $Config{text_widget}->yviewScroll(-1, 'units') } );
    $mw->bind('<Down>',          sub { $Config{text_widget}->yviewScroll( 1, 'units') } );
    $mw->bind('<Alt-Up>',        sub { $Config{text_widget}->yviewScroll(-3, 'units') } );
    $mw->bind('<Alt-Down>',      sub { $Config{text_widget}->yviewScroll( 3, 'units') } );
    $mw->bind('<Control-Prior>', sub { $Config{text_widget}->yviewScroll(-1, 'pages') } );
    $mw->bind('<Control-Next>',  sub { $Config{text_widget}->yviewScroll( 1, 'pages') } );