On Mon, Jul 02, 2012 at 03:14:25PM -0300, José Romildo Malaquias 
<[email protected]> wrote:
> sub new_window
> {

the error can be by adding this here:

   my ($self) = @_;

>    my $ccwd = readlink("/proc/".$self->{child_pid}."/cwd");
>    exec("urxvt", "-cd", "$ccwd");

exec would actually kill the current terminal, one could either use system
similar to:

   system "urxvt -cd \Q$ccwd\E &";

or one could try to replace exec by something along the lines of:

   new urxvt::term $self->env, $urxvt::RXVTNAME, -cd => $ccwd;

(some experimenting might be required).

this will open a second window from within the same process (so killing it
will close both windows).

-- 
                The choice of a       Deliantra, the free code+content MORPG
      -----==-     _GNU_              http://www.deliantra.net
      ----==-- _       generation
      ---==---(_)__  __ ____  __      Marc Lehmann
      --==---/ / _ \/ // /\ \/ /      [email protected]
      -=====/_/_//_/\_,_/ /_/\_\

_______________________________________________
rxvt-unicode mailing list
[email protected]
http://lists.schmorp.de/cgi-bin/mailman/listinfo/rxvt-unicode

Reply via email to