| … | |
… | |
| 30 | main (int argc, const char *const *argv) |
30 | main (int argc, const char *const *argv) |
| 31 | try |
31 | try |
| 32 | { |
32 | { |
| 33 | rxvt_init (); |
33 | rxvt_init (); |
| 34 | |
34 | |
|
|
35 | rxvt_term *t = new rxvt_term; |
|
|
36 | |
| 35 | #if ENABLE_PERL |
37 | #if ENABLE_PERL |
|
|
38 | stringvec *args = new stringvec; |
| 36 | stringvec *envv = new stringvec; |
39 | stringvec *envv = new stringvec; |
|
|
40 | |
|
|
41 | for (int i = 0; i < argc; i++) |
|
|
42 | args->push_back (strdup (argv [i])); |
| 37 | |
43 | |
| 38 | for (char **var = environ; *var; var++) |
44 | for (char **var = environ; *var; var++) |
| 39 | envv->push_back (strdup (*var)); |
45 | envv->push_back (strdup (*var)); |
| 40 | |
46 | |
| 41 | envv->push_back (0); |
47 | envv->push_back (0); |
|
|
48 | |
|
|
49 | if (!t->init (args, envv)) |
| 42 | #else |
50 | #else |
| 43 | stringvec *envv = 0; |
51 | if (!t->init (argc, argv, 0)) |
| 44 | #endif |
52 | #endif |
| 45 | |
|
|
| 46 | rxvt_term *t = new rxvt_term; |
|
|
| 47 | |
|
|
| 48 | if (!t->init (argc, argv, envv)) |
|
|
| 49 | return EXIT_FAILURE; |
53 | return EXIT_FAILURE; |
| 50 | |
54 | |
| 51 | io_manager::loop (); |
55 | io_manager::loop (); |
| 52 | |
56 | |
| 53 | return EXIT_SUCCESS; |
57 | return EXIT_SUCCESS; |
