| … | |
… | |
| 39 | #include "rxvtutil.h" |
39 | #include "rxvtutil.h" |
| 40 | #include "rxvtperl.h" |
40 | #include "rxvtperl.h" |
| 41 | |
41 | |
| 42 | #include "perlxsi.c" |
42 | #include "perlxsi.c" |
| 43 | |
43 | |
| 44 | #ifdef HAVE_SCROLLBARS |
|
|
| 45 | # define GRAB_CURSOR THIS->scrollBar.leftptr_cursor |
44 | #define GRAB_CURSOR THIS->scrollBar.leftptr_cursor |
| 46 | #else |
|
|
| 47 | # define GRAB_CURSOR None |
|
|
| 48 | #endif |
|
|
| 49 | |
45 | |
| 50 | #undef LINENO |
46 | #undef LINENO |
| 51 | #define LINENO(n) MOD (THIS->term_start + int(n), THIS->total_rows) |
47 | #define LINENO(n) MOD (THIS->term_start + int(n), THIS->total_rows) |
| 52 | #undef ROW |
48 | #undef ROW |
| 53 | #define ROW(n) THIS->row_buf [LINENO (n)] |
49 | #define ROW(n) THIS->row_buf [LINENO (n)] |
| … | |
… | |
| 643 | static const struct { |
639 | static const struct { |
| 644 | const char *name; |
640 | const char *name; |
| 645 | IV iv; |
641 | IV iv; |
| 646 | } *civ, const_iv[] = { |
642 | } *civ, const_iv[] = { |
| 647 | # define const_iv(name) { # name, (IV)name } |
643 | # define const_iv(name) { # name, (IV)name } |
|
|
644 | const_iv (NUM_RESOURCES), |
| 648 | const_iv (DEFAULT_RSTYLE), |
645 | const_iv (DEFAULT_RSTYLE), |
| 649 | const_iv (OVERLAY_RSTYLE), |
646 | const_iv (OVERLAY_RSTYLE), |
| 650 | const_iv (RS_Bold), |
647 | const_iv (RS_Bold), |
| 651 | const_iv (RS_Italic), |
648 | const_iv (RS_Italic), |
| 652 | const_iv (RS_Blink), |
649 | const_iv (RS_Blink), |
| … | |
… | |
| 1434 | # undef reserve |
1431 | # undef reserve |
| 1435 | }; |
1432 | }; |
| 1436 | |
1433 | |
| 1437 | rs = rslist + sizeof (rslist) / sizeof (rslist [0]); |
1434 | rs = rslist + sizeof (rslist) / sizeof (rslist [0]); |
| 1438 | |
1435 | |
|
|
1436 | if (*name) |
| 1439 | do { |
1437 | { |
|
|
1438 | do { |
| 1440 | if (rs-- == rslist) |
1439 | if (rs-- == rslist) |
| 1441 | croak ("no such resource '%s', requested", name); |
1440 | croak ("no such resource '%s', requested", name); |
| 1442 | } while (strcmp (name, rs->name)); |
1441 | } while (strcmp (name, rs->name)); |
| 1443 | |
1442 | |
| 1444 | index += rs->value; |
1443 | index += rs->value; |
|
|
1444 | } |
|
|
1445 | else |
|
|
1446 | { |
|
|
1447 | --rs; |
|
|
1448 | name = ""; |
|
|
1449 | } |
| 1445 | |
1450 | |
| 1446 | if (!IN_RANGE_EXC (index, 0, NUM_RESOURCES)) |
1451 | if (!IN_RANGE_EXC (index, 0, NUM_RESOURCES)) |
| 1447 | croak ("requested out-of-bound resource %s+%d,", name, index - rs->value); |
1452 | croak ("requested out-of-bound resource %s+%d,", name, index - rs->value); |
| 1448 | |
1453 | |
| 1449 | if (GIMME_V != G_VOID) |
1454 | if (GIMME_V != G_VOID) |
| … | |
… | |
| 1707 | XFree (prop); |
1712 | XFree (prop); |
| 1708 | } |
1713 | } |
| 1709 | } |
1714 | } |
| 1710 | |
1715 | |
| 1711 | void |
1716 | void |
| 1712 | rxvt_term::XChangeWindowProperty (Window window, Atom property, Atom type, int format, SV *data) |
1717 | rxvt_term::XChangeProperty (Window window, Atom property, Atom type, int format, SV *data) |
| 1713 | CODE: |
1718 | CODE: |
| 1714 | { |
1719 | { |
| 1715 | STRLEN len; |
1720 | STRLEN len; |
| 1716 | char *data_ = SvPVbyte (data, len); |
1721 | char *data_ = SvPVbyte (data, len); |
| 1717 | |
1722 | |
