… | |
… | |
2032 | ############################################################################# |
2032 | ############################################################################# |
2033 | # fancy bg bloatstuff (TODO: should be moved up somewhere) |
2033 | # fancy bg bloatstuff (TODO: should be moved up somewhere) |
2034 | |
2034 | |
2035 | # TODO: ugly |
2035 | # TODO: ugly |
2036 | void |
2036 | void |
2037 | rxvt_term::get_geometry () |
2037 | rxvt_term::background_geometry (bool border = false) |
2038 | PPCODE: |
2038 | PPCODE: |
2039 | EXTEND (SP, 4); |
2039 | EXTEND (SP, 4); |
2040 | PUSHs (sv_2mortal (newSViv (THIS->parent_x))); |
2040 | PUSHs (sv_2mortal (newSViv (THIS->parent_x + (border ? THIS->window_vt_x : 0)))); |
2041 | PUSHs (sv_2mortal (newSViv (THIS->parent_y))); |
2041 | PUSHs (sv_2mortal (newSViv (THIS->parent_y + (border ? THIS->window_vt_y : 0)))); |
2042 | PUSHs (sv_2mortal (newSViv (THIS->szHint.width))); |
2042 | PUSHs (sv_2mortal (newSViv (border ? THIS->vt_width : THIS->szHint.width ))); |
2043 | PUSHs (sv_2mortal (newSViv (THIS->szHint.height))); |
2043 | PUSHs (sv_2mortal (newSViv (border ? THIS->vt_height : THIS->szHint.height))); |
2044 | |
2044 | |
2045 | #if HAVE_IMG |
2045 | #if HAVE_IMG |
2046 | |
2046 | |
2047 | #if 0 |
2047 | #if 0 |
2048 | |
2048 | |