… | |
… | |
50 | #include "rxvtperl.h" |
50 | #include "rxvtperl.h" |
51 | #include "version.h" |
51 | #include "version.h" |
52 | #include "command.h" |
52 | #include "command.h" |
53 | |
53 | |
54 | #if HAVE_SCHED_YIELD |
54 | #if HAVE_SCHED_YIELD |
|
|
55 | #undef HAVE_SCHED_YIELD // disabled for the time being |
55 | # include <sched.h> |
56 | //# include <sched.h> |
56 | #endif |
57 | #endif |
57 | |
58 | |
58 | #ifdef KEYSYM_RESOURCE |
59 | #ifdef KEYSYM_RESOURCE |
59 | # include "keyboard.h" |
60 | # include "keyboard.h" |
60 | #endif |
61 | #endif |
… | |
… | |
3961 | } |
3962 | } |
3962 | break; |
3963 | break; |
3963 | |
3964 | |
3964 | case URxvt_view_up: |
3965 | case URxvt_view_up: |
3965 | case URxvt_view_down: |
3966 | case URxvt_view_down: |
|
|
3967 | { |
3966 | int lines = atoi (str); |
3968 | int lines = atoi (str); |
3967 | |
3969 | |
3968 | if (lines) |
3970 | if (lines) |
3969 | scr_page (op == URxvt_view_up ? UP : DN, lines); |
3971 | scr_page (op == URxvt_view_up ? UP : DN, lines); |
3970 | else |
3972 | else |
3971 | scr_erase_savelines (); |
3973 | scr_erase_savelines (); |
|
|
3974 | } |
3972 | |
3975 | |
3973 | break; |
3976 | break; |
3974 | #endif |
3977 | #endif |
3975 | |
3978 | |
3976 | #if ENABLE_PERL |
3979 | #if ENABLE_PERL |
3977 | case URxvt_perl: |
3980 | case URxvt_perl: |
3978 | if (PERL_INVOKE ((this, HOOK_OSC_SEQ, DT_STRING, str, DT_END))) |
3981 | if (PERL_INVOKE ((this, HOOK_OSC_SEQ, DT_STRING, str, DT_END))) |
3979 | ; // no responses yet |
3982 | ; // no responses yet |
3980 | break; |
3983 | break; |
3981 | |
|
|
3982 | #endif |
3984 | #endif |
3983 | |
|
|
3984 | } |
3985 | } |
3985 | } |
3986 | } |
3986 | /*----------------------------------------------------------------------*/ |
3987 | /*----------------------------------------------------------------------*/ |
3987 | |
3988 | |
3988 | /*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */ |
3989 | /*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */ |