summaryrefslogtreecommitdiffstats
path: root/perl-install/share/po/pl.po
Commit message (Expand)AuthorAgeFilesLines
* Fix pot fileDexter Morgan2011-03-301-0/+1
* correct and remove google licenseAnne Nicolas2011-02-111-18/+16
* Synthesized commit during git-svn import combining previous Mandriva history ...Mageia SVN-Git Migration2011-02-061-44/+44
* sync with codeThierry Vignaud2010-06-051-2/+27
* Add a string in diskdrake mount options helpPascal Terjan2010-05-131-127/+132
* update POT fileFunda Wang2010-05-011-369/+393
* sync with codeThierry Vignaud2010-03-281-1242/+1508
* (ask_::get_status) enhanced status message (#58194)Thierry Vignaud2010-03-171-2/+2
* updated polish translationMarek Walczak2010-02-181-1017/+875
* Update POT fileFunda Wang2010-01-271-1109/+1273
* -update translation for polish languageMarek Walczak2010-01-091-1030/+874
* adjust translations accordinglyThierry Vignaud2009-10-271-4/+2
* partitioning wizard: fix typo in messagePascal Terjan2009-10-121-1/+1
* Update po for new strings in diskdrake and partitionning wizardPascal Terjan2009-10-071-288/+294
* sync with codeThierry Vignaud2009-09-101-654/+713
* update translation for PolishTomasz Bednarski2009-04-151-78/+42
* sync with codeThierry Vignaud2009-04-141-41/+82
* update translation for PolishTomasz Bednarski2009-04-141-84/+48
* Updated POT fileFunda Wang2009-04-091-162/+210
* update translation for PolishTomasz Bednarski2009-03-281-81/+41
* po: sync with the code.Eugeni Dodonov2009-03-271-110/+152
* update translation for PolishTomasz Bednarski2009-03-191-78/+43
* merge with code: new strings in diskdrakePascal Terjan2009-03-181-405/+447
* update translation for PolishTomasz Bednarski2009-03-051-126/+45
* sync with code (new msec levels).Eugeni Dodonov2009-02-051-344/+388
* update translation for PolishTomasz Bednarski2009-01-281-85/+52
* sync with codeThierry Vignaud2009-01-161-425/+537
* update translation for PolishTomasz Bednarski2008-09-301-1/+23
* update translation for PolishTomasz Bednarski2008-09-291-1/+8
* update translation for PolishTomasz Bednarski2008-09-241-161/+55
* sync with codeThierry Vignaud2008-09-191-408/+406
* sync with codeThierry Vignaud2008-09-191-143/+287
* sync with code: "libsafe" option is no moreThierry Vignaud2008-09-151-51/+83
* (selectCountry) remove ending "." from subtitleThierry Vignaud2008-09-151-2/+2
* update translation for PolishTomasz Bednarski2008-09-121-91/+46
* fix syntactic error (thanks to Reinout van Schouwen) Pascal Rigaux2008-09-121-2/+2
* sync with codeThierry Vignaud2008-09-111-1/+6
* (write_partitions) remove ending "!" from "Partition table of drive %s is go...Thierry Vignaud2008-09-111-2/+2
* remove ending "!" from "Read carefully!"Thierry Vignaud2008-09-111-2/+2
* sync with codeThierry Vignaud2008-09-101-57/+106
* better style (#41358)Thierry Vignaud2008-09-091-1/+1
* update translation for PolishTomasz Bednarski2008-09-061-99/+65
* sync with codeThierry Vignaud2008-09-051-45/+126
* update translation for PolishTomasz Bednarski2008-09-051-215/+76
* (level_choose) explain to translatorsThierry Vignaud2008-08-291-6/+7
* merge in translations from standalone/poThierry Vignaud2008-08-291-3/+3
* usync with codeThierry Vignaud2008-08-291-227/+232
* (selectLanguage_install,selectLanguage_standalone) remove ending point on fre...Thierry Vignaud2008-08-201-2/+2
* sync with codeThierry Vignaud2008-08-181-94/+102
* sync with codeThierry Vignaud2008-08-121-164/+169
generated by cgit v1.2.1 (git 2.21.0) at 2024-12-30 13:33:19 +0000
; $model_list, type => 'combo', sort => 1, separator => '|' }, ], post => sub { ($vendor, $model, $extra) = ($1, $2, $3) if $ups =~ /(.*)\|(.*) \((.*)\)$/; ($name, $driver, $port) = ("myups", $ups_models->{$vendor}{$model . $extra}{driver}, ""); ($driver, $opts) = split(/\s+/, $driver); "driver"; }, }, driver => { name => sub { N("UPS driver configuration") . "\n\n" . N("We are configuring the \"%s\" UPS from \"%s\". Please fill in its name, its driver and its port.", $model, $vendor); }, data => sub { [ { label => N("Name:"), val => \$name, help => N("The name of your ups") }, { label => N("Driver:"), val => \$driver, help => N("The driver that manages your ups") }, { label => N("Port:"), val => \$port, format => \&detect_devices::serialPort2text, type => "combo", list => [ &detect_devices::serialPorts() ], not_edit => 0, help => N("The port on which is connected your ups") }, ]; }, post => sub { $port = '/dev/' . $port if $port !~ m!/dev/!; return 'end'; }, }, end => { name => sub { N("Congratulations") . "\n\n" . N("The wizard successfully configured the new \"%s\" UPS device.", $model . "|" . $vendor); }, end => 1, no_back => 1, next => 0 }, }, }); $wiz->process($in); $config->{$name}{driver} = $driver; $config->{$name}{port} = $port; $config->{$name}{$1} = $2 if $opts =~ /\b(.*)=(.*)\b/; # refresh the GUI when needed: $models{ups}->append_set(1 => $name, 2 => $driver, 3 => $port) if $models{ups}; log::explanations(qq(Configuring "$name" UPS)); } my (@acls, @rules); sub load_access_conf() { foreach (cat_($files{access})) { s/#.*//; if (/^\s*ACL\s*(\S*)\s*(\S*)/) { my ($ip, $mask) = split('/', $2); push @acls, [ $1, $ip, $mask ]; } elsif (/^\s*ACCESS\s*(\S*)\s*(\S*)\s*(\S*)/) { push @rules, [ $1, $2, $3 ]; } } } #------------------------------------------------------------------ # misc gui data sub edit_row { my ($model, $o_iter) = @_; # create new item if needed (that is when adding a new one) at end of list my $iter = $o_iter || $model->append; my $dialog = Gtk3::Dialog->new; $dialog->set_transient_for($w->{real_window}); $dialog->set_modal(1); gtkpack_($dialog->get_child, #map { #} ); gtkadd($dialog->get_action_area, gtksignal_connect(Gtk3::Button->new(N("Ok")), clicked => sub { # create new item if needed (that is when adding a new one) at end of list $iter ||= $model->append; # $model->set($iter, 1 => $file->get_text); # FILL ME $dialog->destroy; # $modified++; }), gtksignal_connect(Gtk3::Button->new(N("Cancel")), clicked => sub { $dialog->destroy }), ); $dialog->show_all; } sub add_callback { my ($model, $_list, $_getindex) = @_; edit_row($model); } sub edit_callback { my ($model, $list) = @_; my ($iter) = $list->get_selection->get_selected; return unless $iter; edit_row($model, $iter); } sub del_callback { my ($model, $list) = @_; #my (undef, $iter) = $list->get_selection->get_selected; #my $removed_idx = $model->get($iter, 0); # 1st column is index #@rules = grep { $_->{index} ne $removed_idx } @rules; #$tree->remove($iter); #sensitive_buttons(0); #$modified++; } my @pages = ( { name => N("UPS devices"), columns => [ N("Name"), N("Driver"), N("Port") ], # N("Manufacturer"), N("Model"), callbacks => { add => sub { eval { add_device_wizard($in, $struct) }; my $err = $@; die $err if $err && $err !~ /wizcancel/; $::WizardWindow->destroy if defined $::WizardWindow; undef $::WizardWindow; }, edit => sub {}, remove => sub {}, }, load => sub { read_nut_config(); map { [ $_, @{$struct->{$_}}{qw(driver port)} ] } keys %$struct; }, id => "ups", }, { name => N("UPS users"), columns => [ N("Name") ], callbacks => { add => sub { my ($name) = @_; $users->{$name} = {}; }, edit => sub {}, remove => sub {}, }, load => sub { $users = Libconf::Glueconf::NUT::Ups_conf->new({ filename => $files{users} }); map { [ $_ ] } keys %$users; }, id => "users", }, { name => N("Access Control Lists"), columns => [ N("Name"), N("IP address"), N("IP mask") ], callbacks => { add => sub {}, edit => sub {}, remove => sub {}, }, load => sub { load_access_conf(); @acls; }, id => "acls", }, { name => N("Rules"), columns => [ N("Action"), N("Level"), N("ACL name"), N("Password") ], callbacks => { N("Add") => sub {}, N("Edit") => sub {}, N("Remove") => sub {}, }, load => sub { @rules }, # already loaded when we loaded acls id => "rules", }, ); #------------------------------------------------------------------ # initialize: #$in = 'interactive'->vnew('su'); # require_root_capability(); $in = 'interactive'->vnew; $ugtk3::wm_icon = "drakups"; if (!$::testing) { $in->do_pkgs->ensure_is_installed('nut-server', '/usr/sbin/upsd') or $in->exit(1); } if (member('--wizard', @ARGV)) { read_nut_config(); add_device_wizard($in, $struct); writeconf(); $in->exit($@ ? 1 : 0); } $w = ugtk3->new(N("UPS Management")); if (!$::isEmbedded) { mygtk3::register_main_window($w->{real_window}); $w->{window}->set_size_request(500, 550); $w->{rwindow}->set_title(N("DrakUPS")); } #------------------------------------------------------------------ # main window: my $_msg = N("Welcome to the UPS configuration tools"); $w->{window}->add(gtkpack_(Gtk3::VBox->new, if_(!$::isEmbedded, 0, Gtk3::Banner->new('drakups', N("DrakUPS"))), 1, my $nb = Gtk3::Notebook->new, 0, create_okcancel( { ok_clicked => sub { #$_->{save}->() foreach @pages; writeconf(); $w->exit; }, cancel_clicked => sub { $w->exit }, }, ), ), ); #------------------------------------------------------------------ # build the notebook foreach my $i (@pages) { my $model = $models{$i->{id}} = Gtk3::ListStore->new("Glib::Int", ("Glib::String") x listlength(@{$i->{columns}})); my (%buttons, $list); $indexes{$i->{name}} = 0; my $idx = \$indexes{$i->{name}}; my $getindex = sub { $$idx++ }; $nb->append_page(gtkpack_(Gtk3::VBox->new, 1, create_scrolled_window($list = Gtk3::TreeView->new_with_model($model), [ 'automatic', 'automatic' ]), 0, gtkpack(Gtk3::HButtonBox->new, (map { my ($id, $label, $sub) = @$_; gtksignal_connect($buttons{$id} = Gtk3::Button->new($label), clicked => sub { $sub->($model, $list, $getindex); }); } ([ 'add', N("Add"), $i->{callbacks}{add} || \&add_callback ], [ 'edit', N("Edit"), \&edit_callback ], [ 'remove', N("Remove"), \&del_callback ], ) ) #(map { # gtksignal_connect(Gtk3::Button->new($_), clicked => $i->{callbacks}{$_}), #} keys %{$i->{callbacks}}) ), ), Gtk3::Label->new($i->{name}), ); #$i->{list} = $list; each_index { $list->append_column(Gtk3::TreeViewColumn->new_with_attributes($_, Gtk3::CellRendererText->new, 'text' => $::i + 1)); } @{$i->{columns}}; my @u = $i->{load}->(); foreach my $line (@u) { $model->append_set(0 => $getindex->(), map_index { $::i + 1 => $_ } @$line); } my $set_sensitive = sub { my ($bool) = @_; $buttons{$_}->set_sensitive($bool) foreach qw(remove edit); }; $set_sensitive->(0); $list->get_selection->signal_connect('changed' => sub { my ($select) = @_; my (undef, $iter) = $select->get_selected; $set_sensitive->(defined $iter); }); } #------------------------------------------------------------------ # let's start the show: $w->{rwindow}->show_all; $w->main;
generated by cgit v1.2.1 (git 2.21.0) at 2024-12-30 13:33:18 +0000