… | |
… | |
400 | |
400 | |
401 | ENTER; |
401 | ENTER; |
402 | SAVETMPS; |
402 | SAVETMPS; |
403 | |
403 | |
404 | dSP; |
404 | dSP; |
|
|
405 | PUSHMARK (SP); |
405 | EXTEND (SP, 2); |
406 | EXTEND (SP, 2); |
406 | PUSHs (sv_2mortal (newSVterm (term))); |
407 | PUSHs (sv_2mortal (newSVterm (term))); |
407 | PUSHs (sv_2mortal (newSViv (type))); |
408 | PUSHs (sv_2mortal (newSViv (type))); |
408 | PUTBACK; |
409 | PUTBACK; |
409 | call_pv ("urxvt::usage", G_VOID | G_DISCARD | G_EVAL); |
410 | call_pv ("urxvt::usage", G_VOID | G_DISCARD); |
410 | |
411 | |
411 | FREETMPS; |
412 | FREETMPS; |
412 | LEAVE; |
413 | LEAVE; |
413 | } |
414 | } |
414 | |
415 | |
415 | uint8_t |
416 | uint8_t |
416 | rxvt_perl_interp::resource (rxvt_term *term, const char *name, bool arg, bool longopt, bool flag, const char *value) |
417 | rxvt_perl_interp::parse_resource (rxvt_term *term, const char *name, bool arg, bool longopt, bool flag, const char *value) |
417 | { |
418 | { |
418 | localise_env set_environ (perl_environ); |
419 | localise_env set_environ (perl_environ); |
419 | |
420 | |
420 | ENTER; |
421 | ENTER; |
421 | SAVETMPS; |
422 | SAVETMPS; |
422 | |
423 | |
423 | dSP; |
424 | dSP; |
|
|
425 | PUSHMARK (SP); |
424 | EXTEND (SP, 6); |
426 | EXTEND (SP, 6); |
425 | PUSHs (sv_2mortal (newSVterm (term))); |
427 | PUSHs (sv_2mortal (newSVterm (term))); |
426 | PUSHs (sv_2mortal (newSVpv (name, 0))); |
428 | PUSHs (sv_2mortal (newSVpv (name, 0))); |
427 | PUSHs (arg ? &PL_sv_yes : &PL_sv_no); |
429 | PUSHs (arg ? &PL_sv_yes : &PL_sv_no); |
428 | PUSHs (longopt ? &PL_sv_yes : &PL_sv_no); |
430 | PUSHs (longopt ? &PL_sv_yes : &PL_sv_no); |
429 | PUSHs (flag ? &PL_sv_yes : &PL_sv_no); |
431 | PUSHs (flag ? &PL_sv_yes : &PL_sv_no); |
430 | PUSHs (value ? sv_2mortal (newSVpv (value, 0)) : &PL_sv_undef); |
432 | PUSHs (value ? sv_2mortal (newSVpv (value, 0)) : &PL_sv_undef); |
431 | PUTBACK; |
433 | PUTBACK; |
432 | call_pv ("urxvt::resource", G_SCALAR | G_EVAL); |
434 | call_pv ("urxvt::parse_resource", G_SCALAR); |
|
|
435 | SPAGAIN; |
433 | |
436 | |
434 | uint8_t ret = POPi; |
437 | uint8_t ret = POPi; |
435 | |
438 | |
436 | FREETMPS; |
439 | FREETMPS; |
437 | LEAVE; |
440 | LEAVE; |
… | |
… | |
1061 | if (count) |
1064 | if (count) |
1062 | THIS->get_window_origin (THIS->parent_x, THIS->parent_y); |
1065 | THIS->get_window_origin (THIS->parent_x, THIS->parent_y); |
1063 | } |
1066 | } |
1064 | } |
1067 | } |
1065 | |
1068 | |
|
|
1069 | void |
|
|
1070 | rxvt_term::put_option_db (octet_string specifier, octet_string value) |
|
|
1071 | CODE: |
|
|
1072 | XrmPutStringResource (&THIS->option_db, specifier, value); |
|
|
1073 | |
1066 | int |
1074 | int |
1067 | rxvt_term::grab_button (int button, U32 modifiers, Window window = THIS->vt) |
1075 | rxvt_term::grab_button (int button, U32 modifiers, Window window = THIS->vt) |
1068 | CODE: |
1076 | CODE: |
1069 | RETVAL = XGrabButton (THIS->dpy, button, modifiers, window, 1, |
1077 | RETVAL = XGrabButton (THIS->dpy, button, modifiers, window, 1, |
1070 | ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask, |
1078 | ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask, |