From efe9c35eb84c036dc033744674c1bdc8d57657bc Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 20 Feb 2003 13:35:45 +0000
Subject: fix brltty support

---
 perl-install/install2.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 640568e33..39154c658 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -519,7 +519,7 @@ sub main {
 	    mkdir '/tmp/stage2/etc/brltty';
 	    mkdir '/lib/brltty';
 	    foreach ($o->{brltty}{table}, "brltty-$o->{brltty}{driver}.hlp") {
-		install_any::getAndSaveFile($_ , "/tmp/stage2/$_") if $_;
+		install_any::getAndSaveFile("/etc/brltty/$_", "/tmp/stage2/etc/brltty/$_") if $_;
 	    }
 	    install_any::getAndSaveFile("/lib/brltty/libbrlttyb$o->{brltty}{driver}.so") or do {
 		local $| = 1;
@@ -530,6 +530,8 @@ sub main {
 	    install_any::getAndSaveFile("/usr/bin/brltty");
 	    chmod 0755, "/usr/bin/brltty";
 	}
+	eval { modules::load("serial") };
+	devices::make($o->{brltty}{device});
 	devices::make("vcsa");
 	run_program::run("brltty");
     }
-- 
cgit v1.2.1