summaryrefslogtreecommitdiffstats
path: root/perl-install/share
diff options
context:
space:
mode:
authorJani Välimaa <wally@mandriva.org>2009-04-24 10:36:46 +0000
committerJani Välimaa <wally@mandriva.org>2009-04-24 10:36:46 +0000
commitbc09a72e9aa40984fb99d6ddd67dd0859d461889 (patch)
treeb735b5b2827ea04d946f6f478f63233577396ed5 /perl-install/share
parentc5a8f1bd6b311f4508f9bc8a9d79631d47e9cc8d (diff)
downloaddrakx-bc09a72e9aa40984fb99d6ddd67dd0859d461889.tar
drakx-bc09a72e9aa40984fb99d6ddd67dd0859d461889.tar.gz
drakx-bc09a72e9aa40984fb99d6ddd67dd0859d461889.tar.bz2
drakx-bc09a72e9aa40984fb99d6ddd67dd0859d461889.tar.xz
drakx-bc09a72e9aa40984fb99d6ddd67dd0859d461889.zip
updated finnish translation
Diffstat (limited to 'perl-install/share')
-rw-r--r--perl-install/share/po/fi.po18
1 files changed, 9 insertions, 9 deletions
diff --git a/perl-install/share/po/fi.po b/perl-install/share/po/fi.po
index 023e1edad..5204ae81d 100644
--- a/perl-install/share/po/fi.po
+++ b/perl-install/share/po/fi.po
@@ -14,7 +14,7 @@ msgid ""
msgstr ""
"Project-Id-Version: libDrakX-fi\n"
"POT-Creation-Date: 2009-04-14 17:26+0200\n"
-"PO-Revision-Date: 2009-04-23 10:45+0300\n"
+"PO-Revision-Date: 2009-04-23 21:34+0300\n"
"Last-Translator: Jani Välimaa <jani.valimaa@gmail.com>\n"
"Language-Team: Finnish <cooker-i18n@mandrivalinux.org>\n"
"MIME-Version: 1.0\n"
@@ -35,7 +35,7 @@ msgstr "Odota hetki"
#: any.pm:252
#, c-format
msgid "Bootloader installation in progress"
-msgstr "Käyttöjärjestelmän lataajan asennus käynnissä"
+msgstr "Käyttöjärjestelmän lataimen asennus käynnissä"
#: any.pm:263
#, c-format
@@ -96,22 +96,22 @@ msgstr ""
#: any.pm:346
#, c-format
msgid "First sector (MBR) of drive %s"
-msgstr "Levyn %s käynnistyssektori (MBR)"
+msgstr "Kiintolevyn %s käynnistyssektorille (MBR)"
#: any.pm:348
#, c-format
msgid "First sector of drive (MBR)"
-msgstr "Levyn käynnistyssektori (MBR)"
+msgstr "Kiintolevyn käynnistyssektorille (MBR)"
#: any.pm:350
#, c-format
msgid "First sector of the root partition"
-msgstr "Juuriosion ensimmäinen sektori"
+msgstr "Juuriosion ensimmäiselle sektorille"
#: any.pm:352
#, c-format
msgid "On Floppy"
-msgstr "Levykkeellä"
+msgstr "Levykkeelle"
#: any.pm:354 pkgs.pm:261 ugtk2.pm:526
#, c-format
@@ -126,7 +126,7 @@ msgstr "Käynnistyslataimen asennus"
#: any.pm:362
#, c-format
msgid "Where do you want to install the bootloader?"
-msgstr "Minne haluat asentaa käyttöjärjestelmän lataajan?"
+msgstr "Minne käyttöjärjestelmän latain asennetaan?"
#: any.pm:389
#, c-format
@@ -3234,7 +3234,7 @@ msgid ""
"sound card (%s)."
msgstr "Valitse vaihtoehtoinen OSS- tai ALSA-ajuri äänikortille \"%s\"."
-#. -PO: here the first %s is either "OSS" or "ALSA",
+#. -PO: here the first %s is either "OSS" or "ALSA",
#. -PO: the second %s is the name of the current driver
#. -PO: and the third %s is the name of the default driver
#: harddrake/sound.pm:409
@@ -5343,7 +5343,7 @@ msgid ""
"install chapter of the Official Mandriva Linux User's Guide."
msgstr ""
"Onnittelut, asennus on valmis.\n"
-"Poista käynnistyslevyke ja paina Enter käynnistääksesi koneesi uudelleen.\n"
+"Poista käynnistyslevyke ja käynnistä kone uudelleen painamalla Enter.\n"
"\n"
"\n"
"Tähän Mandriva Linuxin versioon saatavilla olevat korjaukset ja\n"
class="hl opt">$::isInstall and $in->set_help('configureNetworkCable'); $netcnx->{type} = 'cable'; if ($::expert) { my @m = ( { description => "dhcp-client", c => 1 }, { description => "dhcpcd", c => 3 }, { description => "dhcpxd", c => 4 }, ); if (my $f = $in->ask_from_listf(N("Connect to the Internet"), N("Which dhcp client do you want to use? Default is dhcp-client."), sub { $_[0]{description} }, \@m)) { $f->{c} == 3 and $netcnx->{dhcp_client} = "dhcpcd" and $in->do_pkgs->install(qw(dhcpcd)); $f->{c} == 4 and $netcnx->{dhcp_client} = "dhcpxd" and $in->do_pkgs->install(qw(dhcpxd)); $f->{c} == 1 and $netcnx->{dhcp_client} = "dhcp-client" and $in->do_pkgs->install(qw(dhcp-client)); } } else { $in->do_pkgs->install(qw(dhcp-client)); } go_ethernet($netc, $intf, 'dhcp', '', '', $first_time); write_cnx_script($netc, "cable", qq( /sbin/ifup $netc->{NET_DEVICE} ), qq( /sbin/ifdown $netc->{NET_DEVICE} ), $netcnx->{type}); 1; } sub configure_lan { my ($netcnx, $netc, $intf, $first_time) = @_; $::isInstall and $in->set_help('configureNetworkIP'); configureNetwork($netc, $intf, $first_time) or return; configureNetwork2($in, $prefix, $netc, $intf); $netc->{NETWORKING} = "yes"; if ($netc->{GATEWAY} || any { $_->{BOOTPROTO} =~ /dhcp/ } values %$intf) { $netcnx->{type} = 'lan'; $netcnx->{NET_DEVICE} = $netc->{NET_DEVICE} = ''; $netcnx->{NET_INTERFACE} = 'lan'; #$netc->{NET_INTERFACE}; write_cnx_script($netc, "local network", qq( /etc/rc.d/init.d/network restart ), qq( /etc/rc.d/init.d/network stop /sbin/ifup lo ), $netcnx->{type}); } $::isStandalone and modules::write_conf($prefix); 1; } sub conf_network_card { my ($netc, $intf, $type, $ipadr, $netadr) = @_; #-type =static or dhcp modules::interactive::load_category($in, 'network/main|gigabit|usb', !$::expert, 1); my @all_cards = conf_network_card_backend($netc, $intf, $type, undef, $ipadr, $netadr); my $interface; @all_cards == () and $in->ask_warn('', N("No ethernet network adapter has been detected on your system. I cannot set up this connection type.")) and return; @all_cards == 1 and $interface = $all_cards[0][0]; while (!$interface) { $interface = $in->ask_from_list(N("Choose the network interface"), N("Please choose which network adapter you want to use to connect to Internet."), [ map { $_->[0] . ($_->[1] ? " (using module $_->[1])" : "") } @all_cards ] ) or return; } $::isStandalone and modules::write_conf($prefix); my $_device = conf_network_card_backend($netc, $intf, $type, $interface, $ipadr, $netadr, $interface); # if ( $::isStandalone and !($type eq "dhcp")) { # $in->ask_yesorno(N("Network interface"), # N("I'm about to restart the network device:\n") . $device . N("\nDo you agree?"), 1) and configureNetwork2($in, $prefix, $netc, $intf) and system("$prefix/sbin/ifdown $device;$prefix/sbin/ifup $device"); # } 1; } #- conf_network_card_backend : configure the network cards and return the list of them, or configure one specified interface : WARNING, you have to setup the ethernet cards, by calling load_category($in, 'network/main|gigabit|usb', !$::expert, 1) or load_category_backend before calling this function. Basically, you call this function in 2 times. #- input #- $prefix #- $netc #- $intf #- $type : type of interface, must be given if $interface is : string : "static" or "dhcp" #- $interface : facultative, if given, set this interface and return it in a proper form. If not, return @all_cards #- $ipadr : facultative, ip address of the interface : string #- $netadr : facultative, netaddress of the interface : string #- when $interface is given, informations are written in $intf and $netc. If not, @all_cards is returned. #- $intf output: $device is the result of #- $intf->{$device}->{DEVICE} : which device is concerned : $device is the result of $interface =~ /(eth[0-9]+)/; my $device = $1;; #- $intf->{$device}->{BOOTPROTO} : $type #- $intf->{$device}->{NETMASK} : '255.255.255.0' #- $intf->{$device}->{NETWORK} : $netadr #- $intf->{$device}->{ONBOOT} : "yes" #- $netc output: #- $netc->{NET_DEVICE} : this is used to indicate that this eth card is used to connect to internet : $device #- output: #- $all_cards : a list of a list ( [eth1, module1], ... , [ethn, modulen]). Pass the ethx as $interface in further call. #- $device : only returned in case $interface was given it's $interface, but filtered by /eth[0-9+]/ : string : /eth[0-9+]/ sub conf_network_card_backend { my ($netc, $intf, $type, $interface, $ipadr, $netadr) = @_; #-type =static or dhcp if (!$interface) { my @all_cards = detect_devices::getNet(); my @unconfigured_interfaces = qw(ADIModem); my @devs = detect_devices::pcmcia_probe(); modules::mergein_conf("$prefix/etc/modules.conf"); my $saved_driver; return map { my $interface = $_; my $a = modules::get_alias($interface); my $b; foreach (@devs) { $_->{device} eq $interface and $b = $_->{driver}; } $a ||= $b; $a and $saved_driver = $a; if_(!member($interface, @unconfigured_interfaces) || $a, [$interface, $saved_driver]); } @all_cards, @unconfigured_interfaces; } my ($device) = $interface =~ /(ADIModem|eth[0-9]+)/ or die("the interface is not an ethx or other (like ADIModem)"); $netc->{NET_DEVICE} = $device; #- one consider that there is only ONE Internet connection device.. @{$intf->{$device}}{qw(DEVICE BOOTPROTO NETMASK NETWORK ONBOOT)} = ($device, $type, '255.255.255.0', $netadr, 'yes'); $intf->{$device}{IPADDR} = $ipadr if $ipadr; $device; } sub go_ethernet { my ($netc, $intf, $type, $ipadr, $netadr, $first_time) = @_; conf_network_card($netc, $intf, $type, $ipadr, $netadr) or return; $netc->{NET_INTERFACE} = $netc->{NET_DEVICE}; configureNetwork($netc, $intf, $first_time) or return; 1; } sub configureNetwork { my ($netc, $intf, $_first_time) = @_; local $_; modules::interactive::load_category($in, 'network/main|gigabit|usb|pcmcia', !$::expert, 1) or return; my @l = detect_devices::getNet() or die N("no network card found"); my @all_cards = conf_network_card_backend($netc, $intf, undef, undef, undef, undef); configureNetwork_step_1: my $n_card = 0; $netc ||= {}; my $last; foreach (@l) { my $intf2 = findIntf($intf ||= {}, $_); add2hash($intf2, $last); add2hash($intf2, { NETMASK => '255.255.255.0' }); configureNetworkIntf($netc, $in, $intf2, $netc->{NET_DEVICE}, 0, $all_cards[$n_card][1]) or return; $last = $intf2; $n_card++; } $last or return; if ($last->{BOOTPROTO} !~ /static/) { $netc->{minus_one} = 1; $::isInstall and $in->set_help('configureNetworkHostDHCP'); $in->ask_from(N("Configuring network"), N("Please enter your host name if you know it. Some DHCP servers require the hostname to work. Your host name should be a fully-qualified host name, such as ``mybox.mylab.myco.com''."), [ { label => N("Host name"), val => \$netc->{HOSTNAME} }, if_($netc->{ZEROCONF}, { label => N("Zeroconf Host name"), val => \$netc->{ZEROCONF_HOSTNAME} }), ]) or goto configureNetwork_step_1; } else { configureNetworkNet($in, $netc, $last ||= {}, @l) or goto configureNetwork_step_1; } network::network::miscellaneous_choose($in, $::o->{miscellaneous} ||= {}) or goto configureNetwork_step_1; 1; } 1;