ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvtperl.xs
(Generate patch)

Comparing rxvt-unicode/src/rxvtperl.xs (file contents):
Revision 1.71 by root, Tue Jan 17 16:22:41 2006 UTC vs.
Revision 1.72 by root, Wed Jan 18 08:33:34 2006 UTC

402 perl_environ = rxvt_environ; 402 perl_environ = rxvt_environ;
403 swap (perl_environ, environ); 403 swap (perl_environ, environ);
404 404
405 char *argv[] = { 405 char *argv[] = {
406 "", 406 "",
407 "-edo '" LIBDIR "/urxvt.pm' or ($@ and die $@) or exit 1", 407 "-e"
408 "BEGIN {"
409 " urxvt->bootstrap;"
410 " unshift @INC, '" LIBDIR "';"
411 "}"
412 ""
413 "use urxvt;"
408 }; 414 };
409 415
410 perl = perl_alloc (); 416 perl = perl_alloc ();
411 perl_construct (perl); 417 perl_construct (perl);
412 418

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines