… | |
… | |
23 | #define line_t perl_line_t |
23 | #define line_t perl_line_t |
24 | #include <EXTERN.h> |
24 | #include <EXTERN.h> |
25 | #include <perl.h> |
25 | #include <perl.h> |
26 | #include <XSUB.h> |
26 | #include <XSUB.h> |
27 | #undef line_t |
27 | #undef line_t |
|
|
28 | #undef bool // perl defines it's own bool type, except with g++... what a trap |
28 | |
29 | |
29 | #include "../config.h" |
30 | #include "../config.h" |
30 | |
31 | |
31 | #include <cstddef> |
32 | #include <stddef.h> |
32 | #include <cstdarg> |
33 | #include <stdarg.h> |
33 | |
34 | |
34 | #include "unistd.h" |
35 | #include "unistd.h" |
35 | |
36 | |
36 | #include "ev_cpp.h" |
37 | #include "ev_cpp.h" |
37 | #include "rxvt.h" |
38 | #include "rxvt.h" |
… | |
… | |
1543 | |
1544 | |
1544 | if (set >= 0) |
1545 | if (set >= 0) |
1545 | { |
1546 | { |
1546 | THIS->set_option (optval, set); |
1547 | THIS->set_option (optval, set); |
1547 | |
1548 | |
1548 | if (THIS->env_colorfgbg [0]) // avoid doing this before START |
1549 | if (THIS->init_done) // avoid doing this before START |
1549 | switch (optval) |
1550 | switch (optval) |
1550 | { |
1551 | { |
1551 | case Opt_skipBuiltinGlyphs: |
1552 | case Opt_skipBuiltinGlyphs: |
1552 | THIS->set_fonts (); |
1553 | THIS->set_fonts (); |
1553 | THIS->scr_remap_chars (); |
1554 | THIS->scr_remap_chars (); |
1554 | THIS->scr_touch (true); |
1555 | THIS->scr_touch (true); |
1555 | THIS->want_refresh = 1; |
1556 | THIS->want_refresh = 1; |
1556 | THIS->refresh_check (); |
1557 | THIS->refresh_check (); |
1557 | break; |
1558 | break; |
|
|
1559 | #ifdef CURSOR_BLINK |
|
|
1560 | case Opt_cursorBlink: |
|
|
1561 | THIS->cursor_blink_reset (); |
|
|
1562 | break; |
|
|
1563 | #endif |
1558 | |
1564 | |
1559 | case Opt_cursorUnderline: |
1565 | case Opt_cursorUnderline: |
1560 | THIS->want_refresh = 1; |
1566 | THIS->want_refresh = 1; |
1561 | THIS->refresh_check (); |
1567 | THIS->refresh_check (); |
1562 | break; |
1568 | break; |