Add GUI test

Also fixes the doc build

Author: timholy

.github/workflows/CI.yml

@@ -69,7 +69,11 @@ jobs:
           Pkg.develop(PackageSpec(path=pwd()))
           Pkg.instantiate()
       - uses: julia-actions/julia-buildpkg@v1
+        with:
+          prefix: xvfb-run
       - uses: julia-actions/julia-docdeploy@v1
+        with:
+          prefix: xvfb-run
         env:
           GITHUB_TOKEN: ${{ secrets.GITHUB_TOKEN }}
           DOCUMENTER_KEY: ${{ secrets.DOCUMENTER_KEY }}

docs/src/assets/Picture.png

@@ -1,5 +1,10 @@
 
-function gui(outbase, files; colors=distinguishable_colors(15, [RGB(1, 1, 1)]; dropseed=true))
+function gui(
+        outbase, files;
+        colors=distinguishable_colors(15, [RGB(1, 1, 1)]; dropseed=true),
+        btnclick = Condition(),         # used for testing
+        whichbutton = Ref{Symbol}(),    # used for testing
+    )
     channelpct(x) = string(round(Int, x * 100)) * '%'
 
     outbase, _ = splitext(outbase)
@@ -60,8 +65,6 @@ function gui(outbase, files; colors=distinguishable_colors(15, [RGB(1, 1, 1)]; d
         push!(cbs, cb)
     end
     # Add "Done & Next" and "Skip" buttons
-    btnclick = Condition()
-    whichbutton = Ref{Symbol}()
     donebtn = button("Done & Next")
     skipbtn = button("Skip")
     push!(guibx, donebtn)
@@ -129,6 +132,8 @@ function gui(outbase, files; colors=distinguishable_colors(15, [RGB(1, 1, 1)]; d
         end
     end
     destroy(win)
+    notify(btnclick)   # used in testing
+    return
 end
 gui(outbase, glob::Glob.GlobMatch; kwargs...) = gui(outbase, Glob.glob(glob); kwargs...)
 

docs/src/assets/Picture.png

@@ -14,7 +14,7 @@ function segment_image(
     )
     seg = unseeded_region_growing(img, threshold)
     if prune
-        println("Pruning segments smaller than $min_size pixels")
+        # println("Pruning segments smaller than $min_size pixels")
         seg = prune_segments(seg, label -> segment_pixel_count(seg, label) < min_size, (l1, l2) -> colordiff(segment_mean(seg, l1), segment_mean(seg, l2)))
     end
     return seg
@@ -75,7 +75,7 @@ function spots(
     label = seg.image_indexmap
     R = CartesianIndices(label)
     Ibegin, Iend = extrema(R)
-    I1 = one(Ibegin)
+    I1 = oneunit(Ibegin)
     centroidsacc = Dict{Int, Tuple{Int, Int, Int}}()   # accumulator for centroids
     nadj = Dict{Tuple{Int, Int}, Int}()             # number of times two segments are adjacent
     for idx in R

src/gui.jl

@@ -40,4 +40,16 @@ using Test
     process_images(tmpfile, glob"*.png"; dirname=testdir)
     data = XLSX.readtable(tmpfile, "Picture")
     @test isa(data, XLSX.DataTable)
+
+    # Test the gui
+    rm(tmpfile, force=true)
+    btnclick = Condition()
+    whichbutton = Ref{Symbol}()
+    @async gui(tmpfile, [joinpath(testdir, "Picture.png")]; btnclick, whichbutton)
+    sleep(5)
+    whichbutton[] = :done
+    notify(btnclick)
+    wait(btnclick)
+    @test isfile(tmpfile)
+    @test isfile(splitext(tmpfile)[1] * ".jld2")
 end