1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
|
# frozen_string_literal: true
require_relative 'edit_window'
require_relative 'extract_tab_list'
Plugin.create :extract_gtk do
settings _('抽出タブ') do
tablist = Plugin::ExtractGtk::ExtractTabList.new(Plugin[:extract])
tablist.hexpand = true
tablist.vexpand = true
btn_add = Gtk::Button.new(stock_id: Gtk::Stock::ADD)
btn_edit = Gtk::Button.new(stock_id: Gtk::Stock::EDIT)
btn_delete = Gtk::Button.new(stock_id: Gtk::Stock::DELETE)
btn_add.ssc(:clicked) do
Plugin.call(:extract_tab_open_create_dialog, toplevel)
true
end
btn_edit.ssc(:clicked) do
slug = tablist.selected_slug
Plugin.call(:extract_open_edit_dialog, slug) if slug
true
end
btn_delete.ssc(:clicked) do
slug = tablist.selected_slug
Plugin.call(:extract_tab_delete_with_confirm, toplevel, slug) if slug
true
end
grid = Gtk::Grid.new
grid.column_spacing = 6
grid << Gtk::ScrolledWindow.new.add(tablist)
grid << Gtk::Grid.new.tap do |subgrid|
subgrid.orientation = :vertical
subgrid.row_spacing = 6
subgrid << btn_add << btn_edit << btn_delete
end
add grid
add_tab_observer = on_extract_tab_create(&tablist.method(:add_record))
update_tab_observer = on_extract_tab_update(&tablist.method(:update_record))
delete_tab_observer = on_extract_tab_delete(&tablist.method(:remove_record))
tablist.ssc(:destroy) do
detach add_tab_observer
detach update_tab_observer
detach delete_tab_observer
end
end
on_extract_tab_delete_with_confirm do |window, slug|
extract = Plugin[:extract].extract_tabs[slug]
extract or next
message = _('本当に抽出タブ「%{name}」を削除しますか？') % { name: extract.name }
dialog = Gtk::MessageDialog.new(parent: window,
type: :question,
buttons: :none,
message:)
dialog.add_button Gtk::Stock::CANCEL, :reject
btn_remove = dialog.add_button Gtk::Stock::REMOVE, :accept
btn_remove.style_context.add_class 'destructive-action'
case dialog.run
when Gtk::ResponseType::ACCEPT
Plugin.call(:extract_tab_delete, slug)
end
dialog.destroy
end
on_extract_tab_open_create_dialog do |window|
dialog = Gtk::Dialog.new(title: _('抽出タブを作成 - %{mikutter}') % { mikutter: Environment::NAME }, parent: window)
dialog.add_button(Gtk::Stock::CANCEL, Gtk::Dialog::RESPONSE_REJECT)
dialog.add_button(Gtk::Stock::OK, Gtk::Dialog::RESPONSE_ACCEPT).tap do |button|
button.style_context.add_class('suggested-action')
end
prompt = Gtk::Entry.new
prompt.hexpand = true
box = Gtk::Box.new(:horizontal, 8).tap do |subbox|
subbox.pack_start(Gtk::Label.new(_('名前')), expand: false)
subbox.add(prompt)
subbox.show_all
end
dialog.child.add(box)
case dialog.run
when Gtk::ResponseType::ACCEPT
Plugin.call(:extract_tab_create, Plugin::Extract::Setting.new(name: prompt.text))
end
dialog.destroy
end
on_extract_open_edit_dialog do |extract_slug|
window = Plugin::ExtractGtk::EditWindow.new(Plugin[:extract].extract_tabs[extract_slug], self)
event = on_extract_tab_update do |setting|
if extract_slug == setting.slug && !window.destroyed?
window.refresh_title
end
end
window.ssc(:destroy) do
event.detach
false
end
end
end
|
