Test deselection

Allow user to deselect previously selected test. This shows test result
and lights instead of test output. User can again select test directly
from "lights" component

Author: elgopher

gui/gui.lua

@@ -105,10 +105,15 @@ local function start_test(item)
 	local function select_test(test_id)
 		selected_test_id = test_id
 
-		text_output:scroll_to_line(1)
-
-		lights:detach()
-		test_summary:detach()
+		if test_id != nil then
+			text_output:scroll_to_line(1)
+
+			test_summary.visible = false
+			lights.visible = false
+		else
+			test_summary.visible = true
+			lights.visible = true
+		end
 	end
 
 	lights = attach_lights(

gui/lights.lua

@@ -11,6 +11,7 @@ function attach_lights(parent, el)
 	local margin <const> = 1
 
 	el = parent:attach(el)
+	el.visible = true -- Picotron's hidden field is broken
 
 	---@param no integer Starting from 1
 	function el:set_light(no, color)
@@ -34,6 +35,10 @@ function attach_lights(parent, el)
 	end
 
 	function el:update(msg)
+		if not el.visible then
+			return
+		end
+
 		if light_at_cursor_pointer(msg) != nil then
 			el.cursor = "pointer"
 		else
@@ -42,13 +47,21 @@ function attach_lights(parent, el)
 	end
 
 	function el:click(msg)
+		if not el.visible then
+			return
+		end
+
 		local light = light_at_cursor_pointer(msg)
 		if light != nil then
 			el.select(light)
 		end
 	end
 
 	function el:draw()
+		if not el.visible then
+			return
+		end
+
 		rectfill(0, 0, el.width, el.height, 0)
 		local x, y = 0, 0
 

gui/test_summary.lua

@@ -6,8 +6,13 @@ function attach_test_summary(parent, el)
 	local succeeded, failed = 0, 0
 
 	el = parent:attach(el)
+	el.visible = true -- Picotron's hidden field is broken
 
 	function el:draw()
+		if not el.visible then
+			return
+		end
+
 		rectfill(0, 0, el.width, el.height, 0)
 		color(26)
 		print("Succeeded: " .. succeeded .. " \f8 Failed: " .. failed)

gui/tree.lua

@@ -61,8 +61,13 @@ function attach_tree(parent_el, el)
 				 msg.mx <= (indent(node) + 3) * char_width then
 				provider:toggle_line(line_no)
 			end
-			selected_line = line_no
-			el.select(node.id)
+			if selected_line != line_no then
+				selected_line = line_no
+				el.select(node.id)
+			else
+				selected_line = nil
+				el.select(nil)
+			end
 		end,
 		lines_len = function()
 			return provider:nodes_len()