… | |
… | |
21 | *----------------------------------------------------------------------*/ |
21 | *----------------------------------------------------------------------*/ |
22 | |
22 | |
23 | #include "../config.h" |
23 | #include "../config.h" |
24 | #include "rxvt.h" |
24 | #include "rxvt.h" |
25 | |
25 | |
|
|
26 | #include <cstdlib> |
|
|
27 | #include <cstring> |
|
|
28 | |
26 | int |
29 | int |
27 | main (int argc, const char *const *argv) |
30 | main (int argc, const char *const *argv) |
28 | try |
31 | try |
29 | { |
32 | { |
30 | rxvt_init_signals (); |
33 | rxvt_init (); |
|
|
34 | |
|
|
35 | #if ENABLE_PERL |
|
|
36 | stringvec *envv = new stringvec; |
|
|
37 | |
|
|
38 | for (char **var = environ; *var; var++) |
|
|
39 | envv->push_back (strdup (*var)); |
|
|
40 | |
|
|
41 | envv->push_back (0); |
|
|
42 | #else |
|
|
43 | stringvec *envv = 0; |
|
|
44 | #endif |
31 | |
45 | |
32 | rxvt_term *t = new rxvt_term; |
46 | rxvt_term *t = new rxvt_term; |
33 | |
47 | |
34 | if (!t->init (argc, argv)) |
48 | if (!t->init (argc, argv, envv)) |
35 | return EXIT_FAILURE; |
49 | return EXIT_FAILURE; |
36 | |
50 | |
37 | iom.loop (); |
51 | io_manager::loop (); |
38 | |
52 | |
39 | return EXIT_SUCCESS; |
53 | return EXIT_SUCCESS; |
40 | } |
54 | } |
41 | catch (const class rxvt_failure_exception &e) |
55 | catch (const class rxvt_failure_exception &e) |
42 | { |
56 | { |