package lvm; # $Id$

use diagnostics;
use strict;

#-######################################################################################
#- misc imports
#-######################################################################################
use common;
use modules;
use devices;
use fs::type;
use run_program;

#- for partition_table_xxx emulation
sub new {
    my ($class, $name) = @_;
    $name =~ s/[^\w-]/_/g;
    $name = substr($name, 0, 63); # max length must be < NAME_LEN / 2  where NAME_LEN is 128
    bless { disks => [], VG_name => $name }, $class;
}
sub use_pt_type { 0 }
sub hasExtended { 0 }
sub adjustStart {}
sub adjustEnd {}
sub write {}
sub cylinder_size { 
    my ($hd) = @_;
    $hd->{extent_size};
}

init() or log::l("lvm::init failed");

sub init() {
    devices::init_device_mapper();
    if ($::isInstall) {
	run_program::run('lvm2', 'vgscan');
	run_program::run('lvm2', 'vgchange', '-a', 'y');
    }
    1;
}

sub lvm_cmd {
    if (my $r = run_program::run('lvm2', @_)) {
	$r;
    } else {
	$? >> 8 == 98 or return;

	#- sometimes, it needs running vgscan again, doing so:
	run_program::run('lvm2', 'vgscan');
	run_program::run('lvm2', @_);
    }
}
sub lvm_cmd_or_die {
    my ($prog, @para) = @_;
    lvm_cmd($prog, @para) or die "$prog failed\n";
}

sub check {
    my ($do_pkgs) = @_;

    $do_pkgs->ensure_binary_is_installed('lvm2', 'lvm2') or return;
    init();
    1;
}

sub get_pv_field {
    my ($pv, $field) = @_;
    my $dev = expand_symlinks(devices::make($pv->{device}));
    run_program::get_stdout('lvm2', 'pvs', '--noheadings', '--nosuffix', '-o', $field, $dev);
}
sub pv_physical_extents {
    my ($pv) = @_;
    split(' ', lvm::get_pv_field($pv, 'pv_pe_alloc_count,pv_pe_count'));
}
sub pv_to_vg {
    my ($pv) = @_;
    get_pv_field($pv, 'vg_name') =~ /(\S+)/ && $1;
}

sub pv_move {
    my ($pv) = @_;
    my $dev = expand_symlinks(devices::make($pv->{device}));
    lvm_cmd('pvmove', '-v', $dev) or die N("Moving used physical extents to other physical volumes failed");
}

sub update_size {
    my ($lvm) = @_;
    $lvm->{extent_size} = to_int(run_program::get_stdout('lvm2', 'vgs', '--noheadings', '--nosuffix', '--units', 's', '-o', 'vg_extent_size', $lvm->{VG_name}));
    $lvm->{totalsectors} = to_int(run_program::get_stdout('lvm2', 'vgs', '--noheadings', '--nosuffix', '--units', 's', '-o', 'vg_size', $lvm->{VG_name}));
}

sub get_lv_size {
    my ($lvm_device) = @_;
    to_int(run_program::get_stdout('lvm2', 'lvs', '--noheadings', '--nosuffix', '--units', 's', '-o', 'lv_size', "/dev/$lvm_device"));
}

sub lv_to_pvs {
    my ($lv) = @_;
    map { m!(\S+)\(! } run_program::get_stdout('lvm2', 'lvs', '--noheadings', '-o', 'devices', "/dev/$lv->{device}");
}
sub lv_nb_pvs {
    my ($lv) = @_;
    listlength(lv_to_pvs($lv));      
}

sub get_lvs {
    my ($lvm) = @_;
    my @l = run_program::get_stdout('lvm2', 'lvs', '--noheadings', '--nosuffix', '--units', 's', '-o', 'lv_name', $lvm->{VG_name}) =~ /(\S+)/g;
    $lvm->{primary}{normal} = 
      [
       map {
	   my $device = "$lvm->{VG_name}/$_";
	   my $part = {
	     device => $device, 
	     lv_name => $_,
	     rootDevice => $lvm->{VG_name},
	     size => get_lv_size($device) };
	   if (my $type = -e "/dev/$device" && fs::type::type_subpart_from_magic($part)) {
                put_in_hash($part, $type); 	       
	   } else {
	       $part->{fs_type} = 'ext2';
	   }
	   $part;
       } @l
      ];
}

sub vg_add {
    my ($part) = @_;
    my $dev = expand_symlinks(devices::make($part->{device}));
    output($dev, '\0' x 512); #- help pvcreate
    lvm_cmd_or_die('pvcreate', '-y', '-ff', $dev);
    my $prog = lvm_cmd('vgs', $part->{lvm}) ? 'vgextend' : 'vgcreate';
    lvm_cmd_or_die($prog, $part->{lvm}, $dev);
}

sub vg_reduce {
    my ($lvm_vg, $part_pv) = @_;

    lvm_cmd('vgreduce', $lvm_vg->{VG_name}, devices::make($part_pv->{device})) or die N("Physical volume %s is still in use", $part_pv->{device});
    @{$lvm_vg->{disks}} = difference2($lvm_vg->{disks}, [ $part_pv ]);
    update_size($lvm_vg);
    delete $part_pv->{lvm};
    set_isFormatted($part_pv, 0);
}

sub vg_destroy {
    my ($lvm) = @_;

    is_empty_array_ref($lvm->{primary}{normal}) or die N("Remove the logical volumes first\n");
    lvm_cmd('vgchange', '-a', 'n', $lvm->{VG_name});
    lvm_cmd_or_die('vgremove', $lvm->{VG_name});
    foreach (@{$lvm->{disks}}) {
	lvm_cmd_or_die('pvremove', devices::make($_->{device}));
	delete $_->{lvm};
	set_isFormatted($_, 0);
    }
}

sub lv_delete {
    my ($lvm, $lv) = @_;

    lvm_cmd_or_die('lvremove', '-f', "/dev/$lv->{device}");

    my $list = $lvm->{primary}{normal};
    @$list = grep { $_ != $lv } @$list;
}

sub suggest_lv_name {
    my ($lvm, $lv) = @_;
    my $list = $lvm->{primary}{normal} ||= [];
    $lv->{lv_name} ||= 1 + max(map { if_($_->{device} =~ /(\d+)$/, $1) } @$list);
}

sub lv_create {
    my ($lvm, $lv) = @_;
    suggest_lv_name($lvm, $lv);
    $lv->{device} = "$lvm->{VG_name}/$lv->{lv_name}";
    lvm_cmd_or_die('lvcreate', '--size', int($lv->{size} / 2) . 'k', '-n', $lv->{lv_name}, $lvm->{VG_name});

    if ($lv->{mntpoint} eq '/boot' && lv_nb_pvs($lv) > 1) {
	lvm_cmd_or_die('lvremove', '-f', "/dev/$lv->{device}");
	die N("The bootloader can't handle /boot on multiple physical volumes");
    }

    $lv->{size} = get_lv_size($lv->{device}); #- the created size is smaller than asked size
    set_isFormatted($lv, 0);
    my $list = $lvm->{primary}{normal} ||= [];
    push @$list, $lv;
}

sub lv_resize {
    my ($lv, $oldsize) = @_;
    lvm_cmd_or_die($oldsize > $lv->{size} ? ('lvreduce', '-f') : 'lvextend', 
		   '--size', int($lv->{size} / 2) . 'k', "/dev/$lv->{device}");
    $lv->{size} = get_lv_size($lv->{device}); #- the resized partition may not be the exact asked size
}

sub add_to_VG {
    my ($part, $lvm) = @_;

    $part->{lvm} = $lvm->{VG_name};
    push @{$lvm->{disks}}, $part;
    delete $part->{mntpoint};

    vg_add($part);
    update_size($lvm);
}

sub create_singleton_vg {
    my ($lvms, $part) = @_;

    my %existing = map { $_->{VG_name} => 1 } @$lvms;
    my $VG_name = find { !$existing{$_} } map { "VG$_" } 1 .. 100 or internal_error();    

    my $lvm = new lvm($VG_name);
    push @$lvms, $lvm;

    add_to_VG($part, $lvm);
}

1;
:</td><td class='ctrl'><select name='context' onchange='this.form.submit();'><option value='1'>1</option><option value='2'>2</option><option value='3' selected='selected'>3</option><option value='4'>4</option><option value='5'>5</option><option value='6'>6</option><option value='7'>7</option><option value='8'>8</option><option value='9'>9</option><option value='10'>10</option><option value='15'>15</option><option value='20'>20</option><option value='25'>25</option><option value='30'>30</option><option value='35'>35</option><option value='40'>40</option></select></td></tr><tr><td class='label'>space:</td><td class='ctrl'><select name='ignorews' onchange='this.form.submit();'><option value='0' selected='selected'>include</option><option value='1'>ignore</option></select></td></tr><tr><td class='label'>mode:</td><td class='ctrl'><select name='dt' onchange='this.form.submit();'><option value='0' selected='selected'>unified</option><option value='1'>ssdiff</option><option value='2'>stat only</option></select></td></tr><tr><td/><td class='ctrl'><noscript><input type='submit' value='reload'/></noscript></td></tr></table></form></div><table summary='commit info' class='commit-info'>
<tr><th>author</th><td>Pablo Saratxaga &lt;pablo@mandriva.com&gt;</td><td class='right'>2003-03-14 22:14:40 +0000</td></tr>
<tr><th>committer</th><td>Pablo Saratxaga &lt;pablo@mandriva.com&gt;</td><td class='right'>2003-03-14 22:14:40 +0000</td></tr>
<tr><th>commit</th><td colspan='2' class='sha1'><a href='/software/drakx/commit/perl-install/share?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>fb7bde23c51ab44107f6d8291e0ef65aed8cc60b</a> (<a href='/software/drakx/patch/perl-install/share?id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>patch</a>)</td></tr>
<tr><th>tree</th><td colspan='2' class='sha1'><a href='/software/drakx/tree/?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>401c3f45673613274e813c2b12f0f0ee825b7c99</a> /<a href='/software/drakx/tree/perl-install/share?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>perl-install/share</a></td></tr>
<tr><th>parent</th><td colspan='2' class='sha1'><a href='/software/drakx/commit/perl-install/share?h=10.38&amp;id=ba1992b334b2197656bba6aa642a7f36e0dce556'>ba1992b334b2197656bba6aa642a7f36e0dce556</a> (<a href='/software/drakx/diff/perl-install/share?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b&amp;id2=ba1992b334b2197656bba6aa642a7f36e0dce556'>diff</a>)</td></tr><tr><th>download</th><td colspan='2' class='sha1'><a href='/software/drakx/snapshot/drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.tar'>drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.tar</a><br/><a href='/software/drakx/snapshot/drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.tar.gz'>drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.tar.gz</a><br/><a href='/software/drakx/snapshot/drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.tar.bz2'>drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.tar.bz2</a><br/><a href='/software/drakx/snapshot/drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.tar.xz'>drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.tar.xz</a><br/><a href='/software/drakx/snapshot/drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.zip'>drakx-fb7bde23c51ab44107f6d8291e0ef65aed8cc60b.zip</a><br/></td></tr></table>
<div class='commit-subject'>updated Greek file</div><div class='commit-msg'></div><div class='diffstat-header'><a href='/software/drakx/diff/?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>Diffstat</a> (limited to 'perl-install/share')</div><table summary='diffstat' class='diffstat'><tr><td class='mode'>-rw-r--r--</td><td class='upd'><a href='/software/drakx/diff/perl-install/share/po/el.po?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>perl-install/share/po/el.po</a></td><td class='right'>59</td><td class='graph'><table summary='file diffstat' width='59%'><tr><td class='add' style='width: 42.4%;'/><td class='rem' style='width: 57.6%;'/><td class='none' style='width: 0.0%;'/></tr></table></td></tr>
<tr><td class='mode'>-rw-r--r--</td><td class='upd'><a href='/software/drakx/diff/perl-install/share/po/he.po?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>perl-install/share/po/he.po</a></td><td class='right'>2</td><td class='graph'><table summary='file diffstat' width='59%'><tr><td class='add' style='width: 1.7%;'/><td class='rem' style='width: 1.7%;'/><td class='none' style='width: 96.6%;'/></tr></table></td></tr>
<tr><td class='mode'>-rw-r--r--</td><td class='upd'><a href='/software/drakx/diff/perl-install/share/po/is.po?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>perl-install/share/po/is.po</a></td><td class='right'>2</td><td class='graph'><table summary='file diffstat' width='59%'><tr><td class='add' style='width: 1.7%;'/><td class='rem' style='width: 1.7%;'/><td class='none' style='width: 96.6%;'/></tr></table></td></tr>
</table><div class='diffstat-summary'>3 files changed, 27 insertions, 36 deletions</div><table summary='diff' class='diff'><tr><td><div class='head'>diff --git a/perl-install/share/po/el.po b/perl-install/share/po/el.po<br/>index c82a5b99d..ac2ce53b4 100644<br/>--- a/<a href='/software/drakx/tree/perl-install/share/po/el.po?h=10.38&amp;id=ba1992b334b2197656bba6aa642a7f36e0dce556'>perl-install/share/po/el.po</a><br/>+++ b/<a href='/software/drakx/tree/perl-install/share/po/el.po?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>perl-install/share/po/el.po</a></div><div class='hunk'>@@ -7,8 +7,8 @@</div><div class='ctx'> msgid ""</div><div class='ctx'> msgstr ""</div><div class='ctx'> "Project-Id-Version: DrakX-el\n"</div><div class='del'>-"POT-Creation-Date: 2003-03-12 14:29+0100\n"</div><div class='del'>-"PO-Revision-Date: 2003-03-08 00:36+0200\n"</div><div class='add'>+"POT-Creation-Date: 2003-03-12 17:27+0100\n"</div><div class='add'>+"PO-Revision-Date: 2003-06-14 23:44+0300\n"</div><div class='ctx'> "Last-Translator:  Νίκος Νύκταρης (Nick Niktaris) &lt;niktarin@yahoo.com&gt;\n"</div><div class='ctx'> "Language-Team: Greek &lt;nls@tux.hellug.gr&gt;\n"</div><div class='ctx'> "MIME-Version: 1.0\n"</div><div class='hunk'>@@ -509,9 +509,9 @@ msgid "Force No APIC"</div><div class='ctx'> msgstr ""</div><div class='ctx'> </div><div class='ctx'> #: ../../any.pm:1</div><div class='del'>-#, fuzzy, c-format</div><div class='add'>+#, c-format</div><div class='ctx'> msgid "Enable ACPI"</div><div class='del'>-msgstr "Ενεργοποίηση εκκίνησης από CD;"</div><div class='add'>+msgstr "Ενεργοποίηση ACPI"</div><div class='ctx'> </div><div class='ctx'> #: ../../any.pm:1</div><div class='ctx'> #, c-format</div><div class='hunk'>@@ -16802,9 +16802,9 @@ msgid "Interface %s (using module %s)"</div><div class='ctx'> msgstr "Διεπαφή %s (χρήση αρθρώματος %s)"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/drakgw:1</div><div class='del'>-#, fuzzy, c-format</div><div class='add'>+#, c-format</div><div class='ctx'> msgid "Net Device"</div><div class='del'>-msgstr "Υπηρεσία Xinetd"</div><div class='add'>+msgstr "Συσκευή Δικτύου"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/drakgw:1</div><div class='ctx'> #, c-format</div><div class='hunk'>@@ -17402,9 +17402,9 @@ msgid "choose image file"</div><div class='ctx'> msgstr "Επιλέξτε μια εικόνα"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/draksplash:1</div><div class='del'>-#, fuzzy, c-format</div><div class='add'>+#, c-format</div><div class='ctx'> msgid "choose image"</div><div class='del'>-msgstr "Επιλέξτε μια εικόνα"</div><div class='add'>+msgstr "επιλέξτε εικόνα"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/draksplash:1</div><div class='ctx'> #, c-format</div><div class='hunk'>@@ -17863,9 +17863,9 @@ msgid "Stepping of the cpu (sub model (generation) number)"</div><div class='ctx'> msgstr ""</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/harddrake2:1</div><div class='del'>-#, fuzzy, c-format</div><div class='add'>+#, c-format</div><div class='ctx'> msgid "Model stepping"</div><div class='del'>-msgstr "Φόρτωση ρυθμίσεων"</div><div class='add'>+msgstr "Μοντέλο βηματισμού"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/harddrake2:1</div><div class='ctx'> #, c-format</div><div class='hunk'>@@ -17883,9 +17883,9 @@ msgid "network printer port"</div><div class='ctx'> msgstr "θύρα εκτυπωτή δικτύου"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/harddrake2:1</div><div class='del'>-#, fuzzy, c-format</div><div class='add'>+#, c-format</div><div class='ctx'> msgid "the name of the CPU"</div><div class='del'>-msgstr "το όνομα κατασκευαστή της συσκευής"</div><div class='add'>+msgstr "το όνομα κατασκευαστή του επεξεργαστή"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/harddrake2:1</div><div class='ctx'> #, c-format</div><div class='hunk'>@@ -17893,9 +17893,9 @@ msgid "Name"</div><div class='ctx'> msgstr "Όνομα"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/harddrake2:1</div><div class='del'>-#, fuzzy, c-format</div><div class='add'>+#, c-format</div><div class='ctx'> msgid "the number of buttons the mouse has"</div><div class='del'>-msgstr "Ο αριθμός του επεξεργαστή"</div><div class='add'>+msgstr "Ο αριθμός των πλήκτρων του ποντικιού"</div><div class='ctx'> </div><div class='ctx'> #: ../../standalone/harddrake2:1</div><div class='ctx'> #, c-format</div><div class='hunk'>@@ -18967,7 +18967,7 @@ msgstr ""</div><div class='ctx'> #: ../../share/advertising/05-desktop.pl:1</div><div class='ctx'> #, c-format</div><div class='ctx'> msgid "A customizable environment"</div><div class='del'>-msgstr ""</div><div class='add'>+msgstr "Ένα προσαρμοζόμενο περιβάλλον"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/advertising/06-development.pl:1</div><div class='ctx'> #, c-format</div><div class='hunk'>@@ -19231,14 +19231,12 @@ msgid "Apache, Pro-ftpd"</div><div class='ctx'> msgstr "Apache, Pro-ftpd"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Mail"</div><div class='del'>-msgstr "Μάλι"</div><div class='add'>+msgstr "Ταχυδρομείο"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Postfix mail server"</div><div class='del'>-msgstr "Εξυπηρετητής Ταχυδρομείου Postfix"</div><div class='add'>+msgstr "Εξυπηρετητής ταχυδρομείου Postfix"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='ctx'> msgid "Database"</div><div class='hunk'>@@ -19274,41 +19272,34 @@ msgstr ""</div><div class='ctx'> "εξυπηρετητής NFS, εξυπηρετητής SMB, εξυπηρετητής Proxy, εξυπηρετητής ssh"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Audio station"</div><div class='del'>-msgstr "Σταθμός πολυμέσων"</div><div class='add'>+msgstr "Σταθμός Ήχου"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Sound playing/editing programs"</div><div class='del'>-msgstr "Προγράμματα αναπαραγωγής και διαχείρισης video και ήχου"</div><div class='add'>+msgstr "Προγράμματα αναπαραγωγής/διαχείρισης ήχου"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Video station"</div><div class='del'>-msgstr "Σταθμός παιχνιδιών"</div><div class='add'>+msgstr "Σταθμός βίντεο"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Video playing programs"</div><div class='del'>-msgstr "Προγράμματα αναπαραγωγής και διαχείρισης video και ήχου"</div><div class='add'>+msgstr "Προγράμματα αναπαραγωγής βίντεο"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Graphic station"</div><div class='del'>-msgstr "Σταθμός παιχνιδιών"</div><div class='add'>+msgstr "Σταθμός γραφικών"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Graphics programs"</div><div class='del'>-msgstr "Προγράμματα γραφικών όπως το Gimp"</div><div class='add'>+msgstr "Προγράμματα γραφικών"</div><div class='ctx'> </div><div class='ctx'> #: ../../share/compssUsers:999</div><div class='del'>-#, fuzzy</div><div class='ctx'> msgid "Set of tools to read and send mail and news and to browse the Web"</div><div class='ctx'> msgstr ""</div><div class='del'>-"Εργαλεία για αποστολή και λήψη αλληλογραφίας και ειδήσεων (pine, mutt, "</div><div class='del'>-"tin...) και περιήγηση στο Διαδίκτυο"</div><div class='add'>+"Σετ εργαλείων για την αποστολή και λήψη αλληλογραφίας, ειδήσεων  και "</div><div class='add'>+"περιήγηση στο Διαδίκτυο"</div><div class='ctx'> </div><div class='ctx'> #~ msgid "Printer sharing"</div><div class='ctx'> #~ msgstr "Κοινή χρήση εκτυπωτών"</div><div class='head'>diff --git a/perl-install/share/po/he.po b/perl-install/share/po/he.po<br/>index e5c5d3f87..bfc714b53 100644<br/>--- a/<a href='/software/drakx/tree/perl-install/share/po/he.po?h=10.38&amp;id=ba1992b334b2197656bba6aa642a7f36e0dce556'>perl-install/share/po/he.po</a><br/>+++ b/<a href='/software/drakx/tree/perl-install/share/po/he.po?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>perl-install/share/po/he.po</a></div><div class='hunk'>@@ -5354,7 +5354,7 @@ msgstr "ΧΧ€Χ’Χ Χ™Χ‘Χ˜ΧŸ"</div><div class='ctx'> #: ../../lang.pm:1</div><div class='ctx'> #, c-format</div><div class='ctx'> msgid "default:LTR"</div><div class='del'>-msgstr "Χ‘Χ¨Χ™Χ¨Χͺ ΧžΧ—Χ“Χœ: LTR"</div><div class='add'>+msgstr "default:RTL"</div><div class='ctx'> </div><div class='ctx'> #: ../../loopback.pm:1</div><div class='ctx'> #, c-format</div><div class='head'>diff --git a/perl-install/share/po/is.po b/perl-install/share/po/is.po<br/>index 74d3576f1..b8b313bbc 100644<br/>--- a/<a href='/software/drakx/tree/perl-install/share/po/is.po?h=10.38&amp;id=ba1992b334b2197656bba6aa642a7f36e0dce556'>perl-install/share/po/is.po</a><br/>+++ b/<a href='/software/drakx/tree/perl-install/share/po/is.po?h=10.38&amp;id=fb7bde23c51ab44107f6d8291e0ef65aed8cc60b'>perl-install/share/po/is.po</a></div><div class='hunk'>@@ -5350,7 +5350,7 @@ msgstr "Afganistan"</div><div class='ctx'> #: ../../lang.pm:1</div><div class='ctx'> #, c-format</div><div class='ctx'> msgid "default:LTR"</div><div class='del'>-msgstr "SjΓ‘lfgefiΓ°:LTR"</div><div class='add'>+msgstr "default:LTR"</div><div class='ctx'> </div><div class='ctx'> #: ../../loopback.pm:1</div><div class='ctx'> #, c-format</div></td></tr></table></div> <!-- class=content -->
<div class='footer'>generated by <a href='https://git.zx2c4.com/cgit/about/'>cgit v1.2.1</a> (<a href='https://git-scm.com/'>git 2.21.0</a>) at 2025-03-11 23:17:56 +0000</div>
</div> <!-- id=cgit -->
</body>
</html>