summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-07-08 09:25:08 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-07-08 09:25:08 +0000
commit7a021825a770523fc7a7724bb0f881f7777f4e81 (patch)
tree75a3d8cd1c0cc692b888a21aa8894a1792848c32
parent2f43493d195d5d865d63f4506c95efff8e7b9ff7 (diff)
downloaddrakx-backup-do-not-use-7a021825a770523fc7a7724bb0f881f7777f4e81.tar
drakx-backup-do-not-use-7a021825a770523fc7a7724bb0f881f7777f4e81.tar.gz
drakx-backup-do-not-use-7a021825a770523fc7a7724bb0f881f7777f4e81.tar.bz2
drakx-backup-do-not-use-7a021825a770523fc7a7724bb0f881f7777f4e81.tar.xz
drakx-backup-do-not-use-7a021825a770523fc7a7724bb0f881f7777f4e81.zip
enhanced description
-rw-r--r--perl-install/drakxtools.spec9
1 files changed, 9 insertions, 0 deletions
diff --git a/perl-install/drakxtools.spec b/perl-install/drakxtools.spec
index a2d129138..ddbe7bc4b 100644
--- a/perl-install/drakxtools.spec
+++ b/perl-install/drakxtools.spec
@@ -195,12 +195,21 @@ done
%config(noreplace) %{_sysconfdir}/logrotate.d/drakxtools-http
%changelog
+
* Sun Jul 7 2002 Daouda LO <daouda@mandrakesoft.com> 1.1.8-1mdk
- snapshot
- new entries:
o harddrake2 : new hardware detection && configuration tool
o drakbugreport: bug reporting tool a la Kde (not working!)
o drakTermServ : configuration tool for diskless stations.
+- updated programs :
+ o drakxtv: if runned by root, offer to configure bttv for most tv cards
+ o disdrake:
+ * enhanced raid & lvm support,
+ * check if programs (ie jfsprogs) are installed
+ * cleanups
+ o Xconfigurator: bug fix
+- general : better supermout support, use new libldetect, various bug fixes
* Tue Jun 18 2002 Frederic Lepied <flepied@mandrakesoft.com> 1.1.7-99mdk
- added new draksec from Christian and a new way to build the packages (make rpm)
= $starting_word = ''; 0 } );
}
1;
});
@@ -123,7 +124,22 @@ sub create_ctree {
}
undef %wtree;
- my $curr;
+ my $select = sub {
+ my ($node) = @_;
+ for (my $c = $node; $c; $c = $c->row->parent) {
+ $tree->expand($c);
+ }
+ foreach (0 .. $#l) {
+ if ($tree->node_nth($_) == $node) {
+ $tree->set_focus_row($_);
+ last;
+ }
+ }
+ $tree->select($node);
+ $tree->node_moveto($node, 0, 0.5, 0) if $tree->node_is_visible($node) ne 'full';
+ };
+
+ my $curr = $tree->node_nth(0); #- default value
$tree->set_column_auto_resize(0, 1);
$tree->set_selection_mode('browse');
$tree->signal_connect(tree_select_row => sub {
@@ -139,34 +155,68 @@ sub create_ctree {
&$changed;
});
# $tree->signal_connect(button_press_event => sub { &$leave if $_[1]{type} =~ /^2/ });
+ my ($first_time, $starting_word, $start_reg) = (1, '', "^");
+ my $timeout;
+
+ my $toggle = sub {
+ $curr->row->is_leaf ?
+ &$may_go_to_next :
+ $tree->toggle_expansion($curr);
+ };
$tree->signal_connect(key_press_event => sub {
my ($w, $event) = @_;
my $c = chr($event->{keyval} & 0xff);
$curr or return;
- if ($event->{keyval} >= 0x100 ? $c eq "\r" || $c eq "\x8d" : $c eq ' ') {
- if ($curr->row->is_leaf) { &$may_go_to_next }
- else { $tree->toggle_expansion($curr) }
+ Gtk->timeout_remove($timeout) if $timeout; $timeout = '';
+
+ if ($event->{keyval} >= 0x100) {
+ &$toggle if $c eq "\r" || $c eq "\x8d";
+ $starting_word = '' if $event->{keyval} != 0xffe4; # control
+ } else {
+ my $next;
+ if ($event->{state} & 4) {
+ #- control pressed
+ $c eq "s" or return 1;
+ $start_reg and $start_reg = '', return 1;
+ $next = 1;
+ } else {
+ &$toggle if $c eq ' ';
+
+ $next = 1 if $starting_word eq '' || $starting_word eq $c;
+ $starting_word .= $c unless $starting_word eq $c;
+ }
+ my $word = quotemeta $starting_word;
+ my ($after, $best);
+
+ $tree->pre_recursive(undef, sub {
+ my ($tree, $node) = @_;
+ $next &&= !$after;
+ $after ||= $node == $curr;
+ my ($t) = $tree->node_get_pixtext($node, 0);
+
+ if ($t =~ /$start_reg$word/i) {
+ if ($after && !$next) {
+ ($best, $after) = ($node, 0);
+ } else {
+ $best ||= $node;
+ }
+ }
+ });
+ if (defined $best) {
+ $select->($best);
+ } else {
+ $starting_word = '';
+ }
+ $timeout = Gtk->timeout_add($forgetTime, sub { $timeout = $starting_word = ''; 0 });
}
1;
});
+
$tree->set_row_height($tree->style->font->ascent + $tree->style->font->descent + 1);
$tree, sub {
my $v = may_apply($e->{format}, $_[0]);
- my $node = $wleaves{$v} or return;
-
- for (my $c = $node; $c; $c = $c->row->parent) {
- $tree->expand($c);
- }
- $tree->select($node);
- $tree->node_moveto($node, 0, 0.5, 0) if $tree->node_is_visible($node) ne 'full';
-
- foreach (1 .. @l) {
- if ($tree->node_nth($_) == $node) {
- $tree->set_focus_row($_);
- last;
- }
- }
+ $select->($wleaves{$v} || return);
};
}
@@ -348,7 +398,7 @@ sub ask_from_entries_refW {
$advanced ? $advanced_pack->show : $advanced_pack->hide;
@widgets = (@widgets_always, $advanced ? @widgets_advanced : ());
};
- my $advanced_button = [ _("Advanced"), sub { $set_advanced->(!$advanced) } ];
+ my $advanced_button = [ $common->{advanced_label}, sub { $set_advanced->(!$advanced) } ];
my $create_widgets = sub {
my $w = create_packtable({}, map { [($_->{icon_w}, $_->{e}{label}, $_->{real_w})]} @_);