… | |
… | |
367 | if (htype == HOOK_INIT) // first hook ever called |
367 | if (htype == HOOK_INIT) // first hook ever called |
368 | { |
368 | { |
369 | term->self = (void *)newSVptr ((void *)term, "urxvt::term"); |
369 | term->self = (void *)newSVptr ((void *)term, "urxvt::term"); |
370 | hv_store ((HV *)SvRV ((SV *)term->self), "_overlay", 8, newRV_noinc ((SV *)newHV ()), 0); |
370 | hv_store ((HV *)SvRV ((SV *)term->self), "_overlay", 8, newRV_noinc ((SV *)newHV ()), 0); |
371 | } |
371 | } |
|
|
372 | else if (!term->self) |
|
|
373 | return false; // perl not initialized for this instance |
372 | else if (htype == HOOK_DESTROY) |
374 | else if (htype == HOOK_DESTROY) |
373 | { |
375 | { |
374 | // handled later |
376 | // handled later |
375 | } |
377 | } |
376 | else if (htype == HOOK_REFRESH_BEGIN || htype == HOOK_REFRESH_END) |
378 | else if (htype == HOOK_REFRESH_BEGIN || htype == HOOK_REFRESH_END) |
… | |
… | |
842 | THIS->want_refresh = 1; |
844 | THIS->want_refresh = 1; |
843 | } |
845 | } |
844 | } |
846 | } |
845 | |
847 | |
846 | int |
848 | int |
847 | rxvt_term::selection_grab (int eventtime) |
849 | rxvt_term::selection_grab (int eventtime = CurrentTime) |
848 | |
850 | |
849 | void |
851 | void |
850 | rxvt_term::selection (SV *newtext = 0) |
852 | rxvt_term::selection (SV *newtext = 0) |
851 | PPCODE: |
853 | PPCODE: |
852 | { |
854 | { |