… | |
… | |
355 | |
355 | |
356 | int i; |
356 | int i; |
357 | |
357 | |
358 | for (i = AvFILL (overlay_av); i >= 0; i--) |
358 | for (i = AvFILL (overlay_av); i >= 0; i--) |
359 | if (SvIV (*av_fetch (overlay_av, i, 1)) == (long)this) |
359 | if (SvIV (*av_fetch (overlay_av, i, 1)) == (long)this) |
360 | { |
|
|
361 | av_delete (overlay_av, i, G_DISCARD); |
|
|
362 | break; |
360 | break; |
363 | } |
|
|
364 | |
361 | |
365 | for (; i < AvFILL (overlay_av); i++) |
362 | for (; i < AvFILL (overlay_av); i++) |
366 | av_store (overlay_av, i, SvREFCNT_inc (*av_fetch (overlay_av, i + 1, 0))); |
363 | av_store (overlay_av, i, SvREFCNT_inc (*av_fetch (overlay_av, i + 1, 0))); |
367 | |
364 | |
368 | av_pop (overlay_av); |
365 | av_pop (overlay_av); |
… | |
… | |
1209 | } |
1206 | } |
1210 | OUTPUT: |
1207 | OUTPUT: |
1211 | RETVAL |
1208 | RETVAL |
1212 | |
1209 | |
1213 | SV * |
1210 | SV * |
1214 | rxvt_term::_env () |
1211 | rxvt_term::envv () |
|
|
1212 | ALIAS: |
|
|
1213 | argv = 1 |
1215 | CODE: |
1214 | PPCODE: |
1216 | { |
1215 | { |
1217 | if (THIS->envv) |
1216 | stringvec *vec = ix ? THIS->argv : THIS->envv; |
1218 | { |
|
|
1219 | AV *av = newAV (); |
|
|
1220 | |
1217 | |
|
|
1218 | EXTEND (SP, vec->size ()); |
|
|
1219 | |
1221 | for (char **i = THIS->envv->begin (); i != THIS->envv->end (); ++i) |
1220 | for (char **i = vec->begin (); i != vec->end (); ++i) |
1222 | if (*i) |
1221 | if (*i) |
1223 | av_push (av, newSVpv (*i, 0)); |
1222 | PUSHs (sv_2mortal (newSVpv (*i, 0))); |
1224 | |
|
|
1225 | RETVAL = newRV_noinc ((SV *)av); |
|
|
1226 | } |
|
|
1227 | else |
|
|
1228 | RETVAL = &PL_sv_undef; |
|
|
1229 | } |
1223 | } |
1230 | OUTPUT: |
|
|
1231 | RETVAL |
|
|
1232 | |
1224 | |
1233 | int |
1225 | int |
1234 | rxvt_term::pty_ev_events (int events = EVENT_UNDEF) |
1226 | rxvt_term::pty_ev_events (int events = EVENT_UNDEF) |
1235 | CODE: |
1227 | CODE: |
1236 | RETVAL = THIS->pty_ev.events; |
1228 | RETVAL = THIS->pty_ev.events; |
… | |
… | |
1812 | : 1; |
1804 | : 1; |
1813 | |
1805 | |
1814 | XChangeProperty (THIS->dpy, window, property, |
1806 | XChangeProperty (THIS->dpy, window, property, |
1815 | type, format, PropModeReplace, |
1807 | type, format, PropModeReplace, |
1816 | (unsigned char *)data_, len / elemsize); |
1808 | (unsigned char *)data_, len / elemsize); |
1817 | XSync (THIS->dpy, 0); |
|
|
1818 | } |
1809 | } |
1819 | |
1810 | |
1820 | Atom |
1811 | Atom |
1821 | XInternAtom (rxvt_term *term, char *atom_name, int only_if_exists = FALSE) |
1812 | XInternAtom (rxvt_term *term, char *atom_name, int only_if_exists = FALSE) |
1822 | C_ARGS: term->dpy, atom_name, only_if_exists |
1813 | C_ARGS: term->dpy, atom_name, only_if_exists |