旧形式。Gtk直接叩いたりして非常にあれだった。

set_view.564.rb

# -*- coding: utf-8 -*-
miquire :addon, 'addon'
miquire :core, 'environment'
miquire :addon, 'settings'

Module.new do

  container = Gtk::VBox.new(false, 8).
    closeup(Mtk.group('フォント',
                      Mtk.fontcolorselect(:mumble_basic_font, :mumble_basic_color, 'デフォルトのフォント'),
                      Mtk.fontcolorselect(:mumble_reply_font, :mumble_reply_color, 'リプライ元のフォント'))).
    closeup(Mtk.group('背景色',
                      Mtk.colorselect(:mumble_basic_bg, 'つぶやき'),
                      Mtk.colorselect(:mumble_reply_bg, '自分宛'),
                      Mtk.colorselect(:mumble_self_bg, '自分のつぶやき'))).
    closeup(Mtk.boolean(:show_cumbersome_buttons, 'つぶやきの右側にボタンを表示する').tooltip("各つぶやきの右側に、リプライボタンと引用ボタンを表示します。")).
    closeup(Mtk.boolean(:show_replied_icon, 'リプライを返したつぶやきにはアイコンを表示').tooltip("リプライを返したつぶやきのアイコン上に、リプライボタンを隠さずにずっと表示しておきます。")).
    closeup(Mtk.group('リツイート',
                      Mtk.boolean(:retweeted_by_anyone_show_timeline,
                                  'リツイートを表示する').
                      tooltip("TL上にリツイートを表示します"),
                      Mtk.boolean(:retweeted_by_anyone_age,
                                  'リツイートされたつぶやきをTL上でageる').
                      tooltip("つぶやきがリツイートされたら、投稿された時刻にかかわらず一番上に上げます"),
                      Mtk.boolean(:retweeted_by_myself_age,
                                  '自分がリツイートしたつぶやきをTL上でageる').
                      tooltip("自分がリツイートしたつぶやきを、TLの一番上に上げます"))).
    closeup(Mtk.group('ふぁぼり',
                      Mtk.boolean(:favorited_by_anyone_show_timeline,
                                  'ふぁぼられを表示する').
                      tooltip("ふぁぼられたつぶやきの下に、ふぁぼった人のアイコンを表示します"),
                      Mtk.boolean(:favorited_by_anyone_act_as_reply,
                                  'ふぁぼられをリプライの受信として処理する').
                      tooltip("ふぁぼられたつぶやきが、リプライタブに現れるようになります。"),
                      Mtk.boolean(:favorited_by_anyone_age,
                                  'ふぁぼられたつぶやきをTL上でageる').
                      tooltip("つぶやきがふぁぼられたら、投稿された時刻にかかわらず一番上に上げます"),
                      Mtk.boolean(:favorited_by_myself_age,
                                  '自分がふぁぼったつぶやきをTL上でageる').
                      tooltip("自分がふぁぼったつぶやきを、TLの一番上に上げます"))).
    closeup(Mtk.group('短縮URL', Mtk.boolean(:shrinkurl_expand, '短縮URLを展開して表示').tooltip("受信したつぶやきに短縮URLが含まれていた場合、それを短縮されていない状態に戻してから表示します。"))).
    closeup(Mtk.chooseone(:tab_position, 'タブの位置', 0 => '上', 1 => '下', 2 => '左', 3 => '右')).
    closeup(Mtk.default_or_custom(:url_open_command, 'URLを開く方法', 'デフォルトブラウザを使う', '次のコマンドを使う'))

  plugin = Plugin::create(:set_view)

  plugin.add_event(:boot){ |service|
    Plugin.call(:setting_tab_regist, container, '表示') }

end

#Plugin::Ring.push Addon::SetView.new,[:boot]