From 1017610aa70508afa1fe9f41dd0987522652f135 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sun, 19 Sep 1999 16:45:52 +0000 Subject: no_comment --- perl-install/mouse.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/mouse.pm') diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index 3386654db..1292b592b 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -68,6 +68,7 @@ sub read($) { getVarsFromSh $_[0]; } sub write($;$) { my ($mouse, $prefix) = @_; + local $mouse->{FULLNAME} = qq("$mouse->{FULLNAME}"); setVarsInSh("$prefix/etc/sysconfig/mouse", $mouse, qw(MOUSETYPE XMOUSETYPE FULLNAME XEMU3)); symlink $mouse->{device}, "$prefix/dev/mouse" or log::l("creating $prefix/dev/mouse symlink failed"); } -- cgit v1.2.1