--- rxvt-unicode/src/rxvt.C	2006/01/22 11:57:06	1.12
+++ rxvt-unicode/src/rxvt.C	2007/11/11 04:08:00	1.16
@@ -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 <pcg@goof.com>
  *
  * 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
@@ -32,23 +32,27 @@
   {
     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);
+
+    if (!t->init (args, envv))
 #else
-    stringvec *envv = 0;
+    if (!t->init (argc, argv, 0))
 #endif
-
-    rxvt_term *t = new rxvt_term;
-
-    if (!t->init (argc, argv, envv))
       return EXIT_FAILURE;
 
-    io_manager::loop ();
+    ev::ev_loop (0);
 
     return EXIT_SUCCESS;
   }