summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-10-09 13:57:35 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-10-09 13:57:35 +0000
commit144664cc0ee14672957bcc16d0780e76d5a4ecf6 (patch)
treeae9215ffe41619702001d5c561d3f43c52282b41 /perl-install
parent741ef0405d4b1a177908fb62c9c2ff7c28e77502 (diff)
downloaddrakx-144664cc0ee14672957bcc16d0780e76d5a4ecf6.tar
drakx-144664cc0ee14672957bcc16d0780e76d5a4ecf6.tar.gz
drakx-144664cc0ee14672957bcc16d0780e76d5a4ecf6.tar.bz2
drakx-144664cc0ee14672957bcc16d0780e76d5a4ecf6.tar.xz
drakx-144664cc0ee14672957bcc16d0780e76d5a4ecf6.zip
report error why /dev/tty2 is not available for opening a shell
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 1d5d87d27..dc2122c08 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -208,7 +208,7 @@ sub spawnShell() {
$ENV{DISPLAY} ||= ":0"; #- why not :pp
local *F;
- sysopen F, "/dev/tty2", 2 or die "cannot open /dev/tty2 -- no shell will be provided";
+ sysopen F, "/dev/tty2", 2 or die "cannot open /dev/tty2 -- no shell will be provided: $!";
open STDIN, "<&F" or die '';
open STDOUT, ">&F" or die '';