Click on tag in item detail to switch to search

modules/webapp/src/main/elm/Comp/SearchMenu.elm

@@ -259,6 +259,7 @@ type Msg
     | SetConcPerson IdName
     | SetConcEquip IdName
     | SetFolder IdName
+    | SetTag String
 
 
 type alias NextState =
@@ -371,6 +372,9 @@ updateDrop ddm flags settings msg model =
             in
             resetAndSet (ConcEquipmentMsg (Comp.Dropdown.SetSelection [ equip ]))
 
+        SetTag id ->
+            resetAndSet (TagSelectMsg (Comp.TagSelect.toggleTag id))
+
         GetTagsResp (Ok tags) ->
             let
                 selectModel =