| … | … | ||
|---|---|---|---|
| 37 | if (my ($name, $value, $cb) = $hook->($popup)) { | 37 | if (my ($name, $value, $cb) = $hook->($popup)) { |
| 38 | $popup->add_toggle ($name => $value, sub { $cb->($_[0]) }); | 38 | $popup->add_toggle ($name => $value, sub { $cb->($_[0]) }); |
| 39 | } | 39 | } |
| 40 | } | 40 | } |
| 41 | 41 | ||
| 42 | { | ||
| 43 | $popup->add_separator; | ||
| 44 | my $locale = $self->locale; | ||
| 45 | $locale =~ y/\x20-\x7e//cd; | ||
| 46 | $popup->add_title ("Locale: $locale"); | ||
| 47 | } | ||
| 48 | |||
| 42 | $popup->show; | 49 | $popup->show; |
| 43 | 50 | ||
| 44 | return 1; | 51 | return 1; |
| 45 | } | 52 | } |
| 46 | 53 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |