summaryrefslogtreecommitdiffstats
path: root/perl-install/share/po/da.po
Commit message (Expand)AuthorAgeFilesLines
* remove uneeded stringThierry Vignaud2005-03-101-4/+0
* merge translations from KDEThierry Vignaud2005-03-101-8/+8
* merge in new stringsThierry Vignaud2005-03-101-3/+112
* Added translation for "recommended" stringPablo Saratxaga2005-03-031-3194/+4124
* updatesKeld Simonsen2004-10-101-5406/+9445
* updatesKeld Simonsen2004-07-081-1957/+2078
* updatesKeld Simonsen2004-04-081-1336/+1282
* updated po filesPablo Saratxaga2004-03-191-3380/+4485
* updated pot filePablo Saratxaga2004-02-191-15197/+16711
* fixed my previous bad entriesPablo Saratxaga2003-12-031-448/+832
* UpdatesKeld Simonsen2003-09-201-864/+594
* updated pot filePablo Saratxaga2003-09-121-1182/+2149
* updated pot filePablo Saratxaga2003-08-131-1766/+2779
* changed the name of the russian phonetic layoutPablo Saratxaga2003-05-311-203/+329
* updated pot filePablo Saratxaga2003-05-161-13379/+13444
* spelling errorsKeld Simonsen2003-03-311-11/+11
* updated Japanese file; updated pot filePablo Saratxaga2003-03-241-33/+45
* updated pot filePablo Saratxaga2003-03-121-213/+442
* updated pot filePablo Saratxaga2003-03-091-1631/+322
* iupdated Vietnamese, Estonian and Dutch files;Pablo Saratxaga2003-03-071-1/+1
* updated pot filePablo Saratxaga2003-03-071-401/+600
* updated pot filePablo Saratxaga2003-02-281-1192/+2558
* simplify translator job by propaging pixel english typo fixThierry Vignaud2003-02-171-11110/+15027
* updated po filesPablo Saratxaga2002-12-051-4596/+5529
* updated pot filePablo Saratxaga2002-09-201-2412/+2533
* removed obsolete old unused strings, to make the po files lighterPablo Saratxaga2002-09-131-975/+653
* updated pot filePablo Saratxaga2002-09-121-292/+335
* Don't break poDavid Baudens2002-09-111-837/+1020
* updated Chinese and Danish filesPablo Saratxaga2002-09-051-548/+693
* updated Danish and Welsh filesPablo Saratxaga2002-09-041-319/+342
* updated pot filePablo Saratxaga2002-09-021-2031/+2739
* updated pot filePablo Saratxaga2002-08-211-2368/+2638
* updated pot filePablo Saratxaga2002-07-311-2395/+3350
* updated po filesPablo Saratxaga2002-03-141-3636/+6165
* updated Danish filePablo Saratxaga2001-09-291-3866/+5274
* updated Russian filePablo Saratxaga2001-06-021-507/+524
* Updated Basque filePablo Saratxaga2001-04-171-1859/+2908
* updated Danish filePablo Saratxaga2000-11-141-680/+773
* 100%, Troels Liebe Bentsen.tlb2000-10-191-378/+558
* updated pot filePablo Saratxaga2000-10-091-2210/+4188
* updated Indonesian filePablo Saratxaga2000-06-111-307/+323
* Updated Danish filePablo Saratxaga2000-05-171-1528/+2509
* update-poPablo Saratxaga2000-01-091-0/+4031
d formatting file %s", $part->{loopback_file})) if $wait_message; fs::loopback::format_part($part); } else { $wait_message->(N("Formatting partition %s", $part->{device})) if $wait_message; part_raw($part, $wait_message); } } sub part_raw { my ($part, $wait_message) = @_; $part->{isFormatted} and return; if ($part->{encrypt_key}) { fs::mount::set_loop($part); } my $dev = $part->{real_device} || $part->{device}; my @options = if_($part->{toFormatCheck}, "-c"); log::l("formatting device $dev (type $part->{fs_type})"); my $fs_type = $part->{fs_type}; if ($fs_type eq 'ext2' || $fs_type eq 'ext3') { push @options, "-m", "0" if $part->{mntpoint} =~ m|^/home|; } elsif (isDos($part)) { $fs_type = 'dos'; } elsif ($fs_type eq 'hfs') { push @options, '-l', "Untitled"; } elsif (isAppleBootstrap($part)) { push @options, '-l', 'bootstrap'; } if ($part->{device_LABEL}) { if ($LABELs{$fs_type}) { my ($option, $length, $handled_by_mount) = @{$LABELs{$fs_type}}; if (length $part->{device_LABEL} > $length) { my $short = substr($part->{device_LABEL}, 0, $length); log::l("shortening LABEL $part->{device_LABEL} to $short"); $part->{device_LABEL} = $short; } delete $part->{prefer_device_LABEL} if !$handled_by_mount || $part->{mntpoint} eq '/' && !member($fs_type, 'ext2', 'ext3'); push @options, $option, $part->{device_LABEL}; } else { log::l("dropping LABEL=$part->{device_LABEL} since we don't know how to set labels for fs_type $part->{fs_type}"); delete $part->{device_LABEL}; delete $part->{prefer_device_LABEL}; } } my ($_pkg, $cmd, @first_options) = @{$cmds{$fs_type} || die N("I do not know how to format %s in type %s", $part->{device}, $part->{fs_type})}; my @args = ($cmd, @first_options, @options, devices::make($dev)); if ($cmd eq 'mkfs.ext2' && $wait_message) { mkfs_ext2($wait_message, @args) or die N("%s formatting of %s failed", $fs_type, $dev); } else { run_program::raw({ timeout => 60 * 60 }, @args) or die N("%s formatting of %s failed", $fs_type, $dev); } if ($fs_type eq 'ext3') { disable_forced_fsck($dev); } set_isFormatted($part, 1); } sub mkfs_ext2 { my ($wait_message, @args) = @_; open(my $F, "@args |"); local $/ = "\b"; local $_; while (<$F>) { #- even if it still takes some time when format is over, we don't want the progress bar to stay at 85% $wait_message->('', $1, $2) if m!^\s*(\d+)/(\d+)\b!; } return close($F); } sub disable_forced_fsck { my ($dev) = @_; run_program::run("tune2fs", "-c0", "-i0", devices::make($dev)); } sub wait_message { my ($in) = @_; my ($w, $progress, $last_msg, $displayed); my $on_expose = sub { $displayed = 1; 0 }; #- declared here to workaround perl limitation $w, sub { my ($msg, $current, $total) = @_; if ($msg) { $last_msg = $msg; if (!$w) { $progress = Gtk2::ProgressBar->new if $in->isa('interactive::gtk'); $w = $in->wait_message('', [ '', if_($progress, $progress) ]); if ($progress) { #- don't show by default, only if we are given progress information $progress->hide; $progress->signal_connect(expose_event => $on_expose); } } $w->set($msg); } elsif ($total) { if ($progress) { $progress->set_fraction($current / $total); $progress->show; $displayed = 0; mygtk2::flush() while !$displayed; } else { $w->set([ $last_msg, "$current / $total" ]); } } }; } sub formatMount_part { my ($part, $all_hds, $fstab, $wait_message) = @_; if (isLoopback($part)) { formatMount_part($part->{loopback_device}, $all_hds, $fstab, $wait_message); } if (my $p = fs::get::up_mount_point($part->{mntpoint}, $fstab)) { formatMount_part($p, $all_hds, $fstab, $wait_message) if !fs::type::carry_root_loopback($part); } if ($part->{toFormat}) { fs::format::part($all_hds, $part, $wait_message); } fs::mount::part($part, 0, $wait_message); } sub formatMount_all { my ($all_hds, $fstab, $wait_message) = @_; formatMount_part($_, $all_hds, $fstab, $wait_message) foreach sort { isLoopback($a) ? 1 : isSwap($a) ? -1 : 0 } grep { $_->{mntpoint} } @$fstab; #- ensure the link is there fs::loopback::carryRootCreateSymlink($_) foreach @$fstab; #- for fun :) #- that way, when install exits via ctrl-c, it gives hand to partition eval { my ($_type, $major, $minor) = devices::entry(fs::get::root($fstab)->{device}); output "/proc/sys/kernel/real-root-dev", makedev($major, $minor); }; } 1;