summaryrefslogtreecommitdiffstats
path: root/meta/recipes-devtools/perl/perl-5.20.0/debian/perl5db-x-terminal-emulator.patch
diff options
context:
space:
mode:
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.patch29
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 @@
1From dc495a233b95d7e3e6900845847035da8f01aa59 Mon Sep 17 00:00:00 2001
2From: Dominic Hargreaves <dom@earth.li>
3Date: Sat, 14 Apr 2012 11:34:05 +0100
4Subject: Invoke x-terminal-emulator rather than xterm in perl5db.pl
5
6In Debian systems, xterm might not exist or might not be the preferred
7terminal emulator. Use x-terminal-emulator instead
8
9Bug-Debian: http://bugs.debian.org/668490
10Forwarded: not-needed
11
12Patch-Name: debian/perl5db-x-terminal-emulator.patch
13---
14 lib/perl5db.pl | 2 +-
15 1 file changed, 1 insertion(+), 1 deletion(-)
16
17diff --git a/lib/perl5db.pl b/lib/perl5db.pl
18index 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.