feat: file uploads

src/editor.jl

@@ -35,6 +35,8 @@ function larvaeditor(path=nothing;
         backend_directory::AbstractString=projectdir,
         manualtag::Union{Nothing, String, Symbol}="edited",
         title="LarvaTagger",
+        root_directory=nothing,
+        enable_uploads=false,
         kwargs...)
 
     # to (re-)load a file, the app is reloaded with the filepath as sole information
@@ -47,6 +49,10 @@ function larvaeditor(path=nothing;
         # used for method dispatch (here `Session` is taken to represent Bonito)
         controller[:frontend] = Session
 
+        if !isnothing(root_directory)
+            controller[:workingdirectory] = workingdir(controller, root_directory)
+        end
+
         tryopenfile(controller, input)
 
         editor = EditorView(larvaviewer(controller;
@@ -56,7 +62,7 @@ function larvaeditor(path=nothing;
                             larvafilter(controller),
                             tagfilter(controller; manualtag=manualtag),
                             metadataeditor(controller),
-                            filemenu(controller),
+                            filemenu(controller; upload_button=enable_uploads),
                             backendmenu(controller, backend_directory),
                             loadanimation(controller),
                             twooptiondialog(controller))

src/files.jl

@@ -7,7 +7,9 @@ struct WorkingDirectory
     content::Observable{Vector{String}}
 end
 
-WorkingDirectory(controller, root::String, path::String="") = WorkingDirectory(controller, root, Validator(path), Observable(String[]))
+function WorkingDirectory(controller, root::String, path::String="")
+    WorkingDirectory(controller, root, Validator(path), Observable(String[]))
+end
 
 function workingdir(controller, root::String, path::String=""; secure::Bool=true)
     if secure
@@ -107,7 +109,7 @@ function tryopenfile(controller, path; reload::Bool=false)
         @info "Cannot load file" file=path
         return
     elseif haskey(hub, :input)
-        hub[:input][] = isabspath(path) ? relpath(path) : path
+        hub[:input][] = path
     end
     # tag_lut
     fallback_color = theme[:LarvaPlot][:fallback_color]

src/plots.jl

@@ -562,7 +562,8 @@ function DecoratedLarvae(larvae::Vector{DecoratedLarva})
         @assert hovering_active[]
         i = current_larva[]
         if i == j
-            @warn "moving too fast? - please file an issue at https://gitlab.pasteur.fr/nyx/larvatagger.jl/-/issues"
+            @warn "Moving too fast?"
+            return
         end
         if 0 < i
             i_decorated = larvae[i].decorated

src/wgl.jl

@@ -902,10 +902,10 @@ struct FileMenu
     browser::FileBrowser
 end
 
-function filemenu(controller; kwargs...)
+function filemenu(controller; upload_button=false, kwargs...)
     wd = getworkingdir(controller)
     dir = joinpath(wd.root, wd.path[])
-    browser = FileBrowser(dir; root=wd.root, upload_button=false)
+    browser = FileBrowser(dir; root=wd.root, upload_button=upload_button)
     on(FileBrowsers.selectedfile(browser)) do file
         tryopenfile(controller, file; reload=true)
     end
@@ -920,6 +920,7 @@ function filemenu(controller; kwargs...)
         on(FilePickers.uploadedfile(browser)) do fileinfo
             filepath = joinpath(workingdir[], fileinfo["name"])
             saveinputfile(filepath, fileinfo["content"])
+            notify(workingdir)
         end
     end
     return FileMenu(gethub(controller), browser)