… | |
… | |
898 | $table->add_at (1, $row++, $FULLSCREEN_ENABLE = new DC::UI::Selector |
898 | $table->add_at (1, $row++, $FULLSCREEN_ENABLE = new DC::UI::Selector |
899 | value => $CFG->{uitheme}, |
899 | value => $CFG->{uitheme}, |
900 | options => [ |
900 | options => [ |
901 | [wood => "Wood (the default)"], |
901 | [wood => "Wood (the default)"], |
902 | [plain => "Plain (very)"], |
902 | [plain => "Plain (very)"], |
903 | [blue => "Blue"], |
903 | [blue => "Blue (dark)"], |
|
|
904 | [metal => "Metal (light)"], |
904 | ], |
905 | ], |
905 | tooltip => "Choose the User Interface theme that you like most :)", |
906 | tooltip => "Choose the User Interface theme that you like most :)", |
906 | on_changed => sub { my ($self, $value) = @_; $CFG->{uitheme} = $value; 0 } |
907 | on_changed => sub { my ($self, $value) = @_; $CFG->{uitheme} = $value; 0 } |
907 | ); |
908 | ); |
908 | |
909 | |