… | |
… | |
1934 | } |
1934 | } |
1935 | |
1935 | |
1936 | ############################################################################# |
1936 | ############################################################################# |
1937 | # fancy bg bloatstuff (TODO: should be moved up somewhere) |
1937 | # fancy bg bloatstuff (TODO: should be moved up somewhere) |
1938 | |
1938 | |
|
|
1939 | # TODO: ugly |
|
|
1940 | void |
|
|
1941 | rxvt_term::get_geometry () |
|
|
1942 | PPCODE: |
|
|
1943 | Window wdummy; |
|
|
1944 | int x, y; |
|
|
1945 | XWindowAttributes wattr; |
|
|
1946 | XGetWindowAttributes (THIS->dpy, THIS->parent, &wattr); |
|
|
1947 | XTranslateCoordinates (THIS->dpy, THIS->parent, wattr.root, |
|
|
1948 | -wattr.border_width, -wattr.border_width, |
|
|
1949 | &x, &y, &wdummy); |
|
|
1950 | EXTEND (SP, 4); |
|
|
1951 | PUSHs (sv_2mortal (newSViv (x))); |
|
|
1952 | PUSHs (sv_2mortal (newSViv (y))); |
|
|
1953 | PUSHs (sv_2mortal (newSViv (wattr.width))); |
|
|
1954 | PUSHs (sv_2mortal (newSViv (wattr.height))); |
|
|
1955 | |
1939 | #if HAVE_IMG |
1956 | #if HAVE_IMG |
1940 | |
1957 | |
1941 | rxvt_img * |
1958 | rxvt_img * |
1942 | rxvt_term::new_img (SV *format, int width, int height) |
1959 | rxvt_term::new_img (SV *format, int width, int height) |
1943 | CODE: |
1960 | CODE: |