--- rxvt-unicode/src/rxvt.C	2006/01/22 00:36:59	1.11
+++ rxvt-unicode/src/rxvt.C	2011/02/21 07:41:02	1.21
@@ -1,9 +1,9 @@
-/*--------------------------------*-C-*---------------------------------*
+/*----------------------------------------------------------------------*
  * File:	rxvt.C
  *----------------------------------------------------------------------*
  *
  * All portions of code are copyright by their respective author/s.
- * Copyright (c) 2003-2004 Marc Lehmann <pcg@goof.com>
+ * Copyright (c) 2003-2006 Marc Lehmann <schmorp@schmorp.de>
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -30,21 +30,29 @@
 main (int argc, const char *const *argv)
 try
   {
+    ptytty::init ();
     rxvt_init ();
 
+    rxvt_term *t = new rxvt_term;
+
+#if ENABLE_PERL
+    stringvec *args = new stringvec;
     stringvec *envv = new stringvec;
 
+    for (int i = 0; i < argc; i++)
+      args->push_back (strdup (argv [i]));
+
     for (char **var = environ; *var; var++)
       envv->push_back (strdup (*var));
 
     envv->push_back (0);
 
-    rxvt_term *t = new rxvt_term;
-
-    if (!t->init (argc, argv, envv))
-      return EXIT_FAILURE;
+    t->init (args, envv);
+#else
+    t->init (argc, argv, 0);
+#endif
 
-    io_manager::loop ();
+    ev_run ();
 
     return EXIT_SUCCESS;
   }