From d5f0a2cd63b01ee1993d97e20076f2493d6a6a68 Mon Sep 17 00:00:00 2001
From: Stefan Siegel <siegel@linux-mandrake.com>
Date: Sun, 1 Oct 2000 22:25:52 +0000
Subject: i18n fixes

---
 perl-install/mouse.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

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

diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index d942c54c2..c3d4e9c2a 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -20,7 +20,7 @@ my @mouses_fields = qw(nbuttons MOUSETYPE XMOUSETYPE name);
 my %mice = 
  arch() =~ /^sparc/ ? 
 (
- 'sunmouse' =>
+ __('SunMouse') =>
  [ [ 'sunmouse' ],
    [ [ 3, 'sun', 'sun', __("Sun - Mouse") ]
    ]]
@@ -44,7 +44,7 @@ my %mice =
      [ 5, 'ps/2', 'IMPS/2', __("Wheel") ],
    ]],
 
- __("serial") =>
+ __("Serial") =>
  [ [ map { "ttyS$_" } 0..3 ],
    [ [ 2, 'Microsoft', 'Microsoft', __("Generic 2 Button Mouse") ],
      [ 3, 'Microsoft', 'Microsoft', __("Generic 3 Button Mouse") ],
@@ -61,13 +61,13 @@ my %mice =
      [ 3, 'Microsoft', 'ThinkingMouse', __("Kensington Thinking Mouse") ],
    ]],
 
- 'busmouse' =>
+ __('BusMouse') =>
  [ [ arch() eq 'ppc' ? 'adbmouse' : ('atibm', 'inportbm', 'logibm') ],
    [ [ 2, 'Busmouse', 'BusMouse', __("2 buttons") ],
      [ 3, 'Busmouse', 'BusMouse', __("3 buttons") ],
    ]],
 
- 'none' =>
+ '[' . _('No bus') . ']' =>
  [ [ 'none' ],
    [ [ 0, 'none', 'Microsoft', __("No mouse") ],
    ]],
@@ -122,7 +122,7 @@ sub fullnames {
 		my $l = raw2mouse($type, $_);
 		"$type|$l->{name}";
 	    } else { 
-		$type .= "|[" . _("Other");
+		$type .= "|[" . _("Other") . "]";
 		'';
 	    }
 	} @{$::b->[1]}
-- 
cgit v1.2.1