| … | |
… | |
| 478 | /*----------------------------------------------------------------------*/ |
478 | /*----------------------------------------------------------------------*/ |
| 479 | bool |
479 | bool |
| 480 | rxvt_term::init (int argc, const char *const *argv) |
480 | rxvt_term::init (int argc, const char *const *argv) |
| 481 | { |
481 | { |
| 482 | SET_R (this); |
482 | SET_R (this); |
| 483 | TEMP_ENV; // few things in X do not call setlocale :( |
483 | set_environ (envv); // few things in X do not call setlocale :( |
| 484 | |
484 | |
| 485 | set_locale (""); |
485 | set_locale (""); |
| 486 | |
486 | |
| 487 | if (!init_vars ()) |
487 | if (!init_vars ()) |
| 488 | return false; |
488 | return false; |
| … | |
… | |
| 523 | rs[Rs_perl_eval] = 0; |
523 | rs[Rs_perl_eval] = 0; |
| 524 | } |
524 | } |
| 525 | } |
525 | } |
| 526 | #endif |
526 | #endif |
| 527 | rxvt_perl.init (); |
527 | rxvt_perl.init (); |
| 528 | setlocale (LC_CTYPE, curlocale); // perl init destroys this info |
528 | setlocale (LC_CTYPE, curlocale); // perl init destroys current locale |
| 529 | HOOK_INVOKE ((this, HOOK_INIT, DT_END)); |
529 | HOOK_INVOKE ((this, HOOK_INIT, DT_END)); |
| 530 | } |
530 | } |
| 531 | #endif |
531 | #endif |
| 532 | |
532 | |
| 533 | create_windows (argc, argv); |
533 | create_windows (argc, argv); |
| … | |
… | |
| 1451 | unsigned long fg, bg; |
1451 | unsigned long fg, bg; |
| 1452 | const char *p; |
1452 | const char *p; |
| 1453 | char **s; |
1453 | char **s; |
| 1454 | XIMStyles *xim_styles; |
1454 | XIMStyles *xim_styles; |
| 1455 | |
1455 | |
| 1456 | TEMP_ENV; |
1456 | set_environ (envv); |
| 1457 | |
1457 | |
| 1458 | if (! ((p = XSetLocaleModifiers (modifiers)) && *p)) |
1458 | if (! ((p = XSetLocaleModifiers (modifiers)) && *p)) |
| 1459 | return false; |
1459 | return false; |
| 1460 | |
1460 | |
| 1461 | D_MAIN ((stderr, "rxvt_IM_get_IC ()")); |
1461 | D_MAIN ((stderr, "rxvt_IM_get_IC ()")); |
