From 51039844febe1dc7c3f7ac5b3409f00e1679ab76 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 31 Jul 2002 15:18:09 +0000
Subject: replace "$foo" with $foo

---
 perl-install/install_gtk.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'perl-install/install_gtk.pm')

diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index 712fbbcda..3ffb7991e 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -224,7 +224,7 @@ if (arch() =~ /^ia64/) {
      require Xconfig::card;
      my ($card) = Xconfig::card::probe();
      Xconfig::card::add_to_card__using_Cards($card, $card->{type}) if $card && $card->{type};
-     output($file, <<END);
+     output($file, sprintf(<<'END', $mouse_type, $card->{driver}));
 
 Section "Files"
    FontPath   "/usr/X11R6/lib/X11/fonts:unscaled"
@@ -241,7 +241,7 @@ EndSection
 Section "InputDevice"
     Identifier "Mouse"
     Driver "mouse"
-    Option "Protocol" "$mouse_type"
+    Option "Protocol" "%s"
     Option "Device" "/dev/mouse"
 EndSection
 
@@ -253,7 +253,7 @@ EndSection
 
 Section "Device"
     Identifier  "device"
-    Driver      "$card->{driver}"
+    Driver      "%s"
 EndSection
 
 Section "Screen"
-- 
cgit v1.2.1