--- rxvt-unicode/doc/rxvt.1.html 2005/02/17 15:07:48 1.17 +++ rxvt-unicode/doc/rxvt.1.html 2005/02/19 01:08:26 1.19 @@ -547,14 +547,11 @@
-   my $rxvt = new Gtk2::DrawingArea;
-   $...->add ($rxvt); # important to add it somewhere first
-   $rxvt->realize; # now it can be realized
-   my $xid = $rxvt->window->get_xid;
-
-
-
-   system "rxvt -embed $xid &";
+ my $rxvt = new Gtk2::Socket; + $rxvt->signal_connect_after (realize => sub { + my $xid = $_[0]->window->get_xid; + system "rxvt -embed $xid &"; + });

-pty-fd fileno
@@ -582,11 +579,9 @@
    my $pty = new IO::Pty;
-   fcntl $pty, F_SETFD, 0; # clear close-on-exec
-
-
-
-   system "rxvt -pty-fd " . (fileno $pty) . "&";
+ fcntl $pty, F_SETFD, 0; # clear close-on-exec + system "rxvt -pty-fd " . (fileno $pty) . "&"; + close $pty;