c8h4/aux-search
1
0
Fork 0
Code Issues Pull requests Packages Releases Activity

frontend: show query in title (#662)

Browse source 
Fixes https://github.com/NixOS/nixos-search/issues/661
This commit is contained in:
Naïm Favier 2023-06-11 13:02:41 +02:00 committed by GitHub
parent 7ef651230b
commit c98b1e3685
Failed to generate hash of commit
1 changed files with 22 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
frontend/src/Main.elm
View file

@ -343,16 +343,32 @@ view :
}
view model =
let
maybeQuery m =
case m.query of
Nothing ->
""
Just q ->
" - " ++ q
maybeFlakeQuery m =
case m of
OptionModel m_ ->
maybeQuery m_
PackagesModel m_ ->
maybeQuery m_
title =
case model.page of
Packages _ ->
"NixOS Search - Packages"
Packages m ->
"NixOS Search - Packages" ++ maybeQuery m
Options _ ->
"NixOS Search - Options"
Options m ->
"NixOS Search - Options" ++ maybeQuery m
Flakes _ ->
"NixOS Search - Flakes (Experimental)"
Flakes m ->
"NixOS Search - Flakes (Experimental)" ++ maybeFlakeQuery m
_ ->
"NixOS Search"