| … | |
… | |
| 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) |
