projects
/
clawsker.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
46f07a6
)
Use param instead of global for selectors
author
Ricardo Mones
<ricardo@mones.org>
Sat, 20 Aug 2016 23:20:38 +0000
(
01:20
+0200)
committer
Ricardo Mones
<ricardo@mones.org>
Sat, 20 Aug 2016 23:20:38 +0000
(
01:20
+0200)
clawsker
patch
|
blob
|
history
diff --git
a/clawsker
b/clawsker
index 05f86f1ac1c589338c31a436724523c3e4bda796..84a4ea1c38ad8a0843d94fb9961fd3d62952d589 100755
(executable)
--- a/
clawsker
+++ b/
clawsker
@@
-535,8
+535,8
@@
sub new_color_button_for($$$) {
return $hbox;
}
return $hbox;
}
-sub new_selection_box_for {
- my ($hash, $key) = @_;
+sub new_selection_box_for
($$$)
{
+ my ($hash, $key
, $vhash
) = @_;
my $name = $$hash{$key}[NAME];
my $label = $$hash{$key}[LABEL];
#
my $name = $$hash{$key}[NAME];
my $label = $$hash{$key}[LABEL];
#
@@
-551,9
+551,9
@@
sub new_selection_box_for {
}
$combo->signal_connect ('changed' => sub {
my ($w, $e) = @_;
}
$combo->signal_connect ('changed' => sub {
my ($w, $e) = @_;
- handle_selection_value ($w, $e, \$
HPVALUE
{$name});
+ handle_selection_value ($w, $e, \$
$vhash
{$name});
});
});
- my $value = $
HPVALUE
{$name};
+ my $value = $
$vhash
{$name};
$value //= $$hash{$key}[CMDEF];
$combo->set_active ($value);
set_widget_hint ($combo, $$hash{$key}[DESC]);
$value //= $$hash{$key}[CMDEF];
$combo->set_active ($value);
set_widget_hint ($combo, $$hash{$key}[DESC]);
@@
-860,7
+860,7
@@
sub new_gui_page() {
new_check_button_for (\%pr::gui, 'swp_from', \%HPVALUE),
new_check_button_for (\%pr::gui, 'two_linev', \%HPVALUE),
new_check_button_for (\%pr::gui, 'next_del', \%HPVALUE),
new_check_button_for (\%pr::gui, 'swp_from', \%HPVALUE),
new_check_button_for (\%pr::gui, 'two_linev', \%HPVALUE),
new_check_button_for (\%pr::gui, 'next_del', \%HPVALUE),
- new_selection_box_for (\%pr::gui, 'from_show')),
+ new_selection_box_for (\%pr::gui, 'from_show'
, \%HPVALUE
)),
$xl::s{mlist_frame}, 'not-packed'),
FALSE, FALSE, FRAME_SPC);
$gf->pack_start (new_subpage_frame (
$xl::s{mlist_frame}, 'not-packed'),
FALSE, FALSE, FRAME_SPC);
$gf->pack_start (new_subpage_frame (
@@
-881,7
+881,7
@@
sub new_gui_page() {
$gf->pack_start (new_subpage_frame (
new_vbox_pack (
new_check_button_for (\%pr::gui, 'h_scroll', \%HPVALUE),
$gf->pack_start (new_subpage_frame (
new_vbox_pack (
new_check_button_for (\%pr::gui, 'h_scroll', \%HPVALUE),
- new_selection_box_for (\%pr::gui, 'v_scroll')),
+ new_selection_box_for (\%pr::gui, 'v_scroll'
, \%HPVALUE
)),
$xl::s{sbar_frame}, 'not-packed'),
FALSE, FALSE, FRAME_SPC);
$gf->pack_start ($tb_zero_char, FALSE, FALSE, 0);
$xl::s{sbar_frame}, 'not-packed'),
FALSE, FALSE, FRAME_SPC);
$gf->pack_start ($tb_zero_char, FALSE, FALSE, 0);