ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvtperl.xs
(Generate patch)

Comparing rxvt-unicode/src/rxvtperl.xs (file contents):
Revision 1.171 by root, Tue Jun 5 22:23:07 2012 UTC vs.
Revision 1.173 by root, Wed Jun 6 11:46:11 2012 UTC

… …
404 dSP; 404 dSP;
405 EXTEND (SP, 2); 405 EXTEND (SP, 2);
406 PUSHs (sv_2mortal (newSVterm (term))); 406 PUSHs (sv_2mortal (newSVterm (term)));
407 PUSHs (sv_2mortal (newSViv (type))); 407 PUSHs (sv_2mortal (newSViv (type)));
408 PUTBACK; 408 PUTBACK;
409 call_pv ("urxvt::usage", G_VOID | G_DISCARD | G_EVAL); 409 call_pv ("urxvt::usage", G_VOID | G_DISCARD);
410 410
411 FREETMPS; 411 FREETMPS;
412 LEAVE; 412 LEAVE;
413} 413}
414 414
415uint8_t 415uint8_t
416rxvt_perl_interp::resource (rxvt_term *term, const char *name, bool arg, bool longopt, bool flag, const char *value) 416rxvt_perl_interp::parse_resource (rxvt_term *term, const char *name, bool arg, bool longopt, bool flag, const char *value)
417{ 417{
418 localise_env set_environ (perl_environ); 418 localise_env set_environ (perl_environ);
419 419
420 ENTER; 420 ENTER;
421 SAVETMPS; 421 SAVETMPS;
… …
427 PUSHs (arg ? &PL_sv_yes : &PL_sv_no); 427 PUSHs (arg ? &PL_sv_yes : &PL_sv_no);
428 PUSHs (longopt ? &PL_sv_yes : &PL_sv_no); 428 PUSHs (longopt ? &PL_sv_yes : &PL_sv_no);
429 PUSHs (flag ? &PL_sv_yes : &PL_sv_no); 429 PUSHs (flag ? &PL_sv_yes : &PL_sv_no);
430 PUSHs (value ? sv_2mortal (newSVpv (value, 0)) : &PL_sv_undef); 430 PUSHs (value ? sv_2mortal (newSVpv (value, 0)) : &PL_sv_undef);
431 PUTBACK; 431 PUTBACK;
432 call_pv ("urxvt::resource", G_SCALAR | G_EVAL); 432 call_pv ("urxvt::parse_resource", G_SCALAR);
433 SPAGAIN;
433 434
434 uint8_t ret = POPi; 435 uint8_t ret = POPi;
435 436
436 FREETMPS; 437 FREETMPS;
437 LEAVE; 438 LEAVE;
… …
1061 if (count) 1062 if (count)
1062 THIS->get_window_origin (THIS->parent_x, THIS->parent_y); 1063 THIS->get_window_origin (THIS->parent_x, THIS->parent_y);
1063 } 1064 }
1064 } 1065 }
1065 1066
1067void
1068rxvt_term::put_option_db (octet_string specifier, octet_string value)
1069 CODE:
1070 XrmPutStringResource (&THIS->option_db, specifier, value);
1071
1066int 1072int
1067rxvt_term::grab_button (int button, U32 modifiers, Window window = THIS->vt) 1073rxvt_term::grab_button (int button, U32 modifiers, Window window = THIS->vt)
1068 CODE: 1074 CODE:
1069 RETVAL = XGrabButton (THIS->dpy, button, modifiers, window, 1, 1075 RETVAL = XGrabButton (THIS->dpy, button, modifiers, window, 1,
1070 ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask, 1076 ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask,
… …
2046 OUTPUT: 2052 OUTPUT:
2047 RETVAL 2053 RETVAL
2048 2054
2049#if ENABLE_TRANSPARENCY 2055#if ENABLE_TRANSPARENCY
2050 2056
2051#if 0
2052
2053rxvt_img * 2057rxvt_img *
2054rxvt_term::new_img_from_root () 2058rxvt_term::new_img_from_root ()
2055 CODE: 2059 CODE:
2056 RETVAL = rxvt_img::new_from_root (THIS); 2060 RETVAL = rxvt_img::new_from_root (THIS);
2057 OUTPUT: 2061 OUTPUT:
2058 RETVAL 2062 RETVAL
2059
2060#endif
2061 2063
2062#endif 2064#endif
2063 2065
2064#if HAVE_PIXBUF 2066#if HAVE_PIXBUF
2065 2067
… …
2089 THIS->bg_flags &= ~rxvt_term::BG_NEEDS_REFRESH; 2091 THIS->bg_flags &= ~rxvt_term::BG_NEEDS_REFRESH;
2090 2092
2091 if (img) // TODO: cannot be false 2093 if (img) // TODO: cannot be false
2092 { 2094 {
2093 img->unshare (); 2095 img->unshare ();
2096 //TODO: convetr to visual, possibly precompose with colour
2094 THIS->bg_pixmap = img->steal (); 2097 THIS->bg_pixmap = img->steal ();
2095 THIS->bg_flags |= rxvt_term::BG_NEEDS_REFRESH; 2098 THIS->bg_flags |= rxvt_term::BG_NEEDS_REFRESH;
2096 THIS->bg_valid_since = ev::now (); // TODO: extra bloat 2099 THIS->bg_valid_since = ev::now (); // TODO: extra bloat
2097 } 2100 }
2098 2101

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines