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
|
module Shoes::LogWindow
def setup
stack do
flow do
background black
stack :width => -100 do
tagline "Shoes Console", :stroke => white
end
button "Clear", :margin => 6, :width => 80, :height => 40 do
Shoes.log.clear
end
end
@log, @hash = stack, nil
update
every(0.2) do
update
end
end
end
def update
if @hash != Shoes.log.hash
@hash = Shoes.log.hash
@log.clear do
i = 0
Shoes.log.each do |typ, msg, at, mid, rbf, rbl|
stack do
background "#f1f5e1" if i % 2 == 0
inscription strong(typ.to_s.capitalize, :stroke => "#05C"), " in ",
span(rbf, " line ", rbl, :stroke => "#335"), " | ",
span(at, :stroke => "#777"),
:stroke => "#059", :margin => 4, :margin_bottom => 0
flow do
stack :margin => 6, :width => 20 do
image "#{DIR}/static/icon-#{typ}.png"
end
stack :margin => 4, :width => -20 do
s = msg.to_s.force_encoding "UTF-8"
s << "\n#{msg.backtrace.join("\n")}" if msg.kind_of?(Exception)
para s, :margin => 4, :margin_top => 0
end
end
end
i += 1
end
end
end
end
end
|
