diff options
Diffstat (limited to 'meta/recipes-devtools/perl/perl-5.20.0/debian/perl5db-x-terminal-emulator.patch')
-rw-r--r-- | meta/recipes-devtools/perl/perl-5.20.0/debian/perl5db-x-terminal-emulator.patch | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/meta/recipes-devtools/perl/perl-5.20.0/debian/perl5db-x-terminal-emulator.patch b/meta/recipes-devtools/perl/perl-5.20.0/debian/perl5db-x-terminal-emulator.patch new file mode 100644 index 0000000000..82a9f1a400 --- /dev/null +++ b/meta/recipes-devtools/perl/perl-5.20.0/debian/perl5db-x-terminal-emulator.patch | |||
@@ -0,0 +1,29 @@ | |||
1 | From dc495a233b95d7e3e6900845847035da8f01aa59 Mon Sep 17 00:00:00 2001 | ||
2 | From: Dominic Hargreaves <dom@earth.li> | ||
3 | Date: Sat, 14 Apr 2012 11:34:05 +0100 | ||
4 | Subject: Invoke x-terminal-emulator rather than xterm in perl5db.pl | ||
5 | |||
6 | In Debian systems, xterm might not exist or might not be the preferred | ||
7 | terminal emulator. Use x-terminal-emulator instead | ||
8 | |||
9 | Bug-Debian: http://bugs.debian.org/668490 | ||
10 | Forwarded: not-needed | ||
11 | |||
12 | Patch-Name: debian/perl5db-x-terminal-emulator.patch | ||
13 | --- | ||
14 | lib/perl5db.pl | 2 +- | ||
15 | 1 file changed, 1 insertion(+), 1 deletion(-) | ||
16 | |||
17 | diff --git a/lib/perl5db.pl b/lib/perl5db.pl | ||
18 | index 707d04d..6ac4d36 100644 | ||
19 | --- a/lib/perl5db.pl | ||
20 | +++ b/lib/perl5db.pl | ||
21 | @@ -6945,7 +6945,7 @@ properly set up. | ||
22 | sub xterm_get_fork_TTY { | ||
23 | ( my $name = $0 ) =~ s,^.*[/\\],,s; | ||
24 | open XT, | ||
25 | -qq[3>&1 xterm -title "Daughter Perl debugger $pids $name" -e sh -c 'tty 1>&3;\ | ||
26 | +qq[3>&1 x-terminal-emulator -T "Daughter Perl debugger $pids $name" -e sh -c 'tty 1>&3;\ | ||
27 | sleep 10000000' |]; | ||
28 | |||
29 | # Get the output from 'tty' and clean it up a little. | ||