Exit live history search after accepting a match

functions/widget/.autocomplete.complete-word.completion-widget

@@ -1,24 +1,27 @@
 #!/bin/zsh
 zmodload -F zsh/terminfo p:terminfo
-local -a match=() mbegin=() mend=()  # `zstyle` for some reason assigns these.
 
 local -P key_name=
 case $KEYS in
   ( $'\t'           ) key_name=tab ;;
   ( $terminfo[kcbt] ) key_name=shift-tab ;;
 esac
 
-local +h curcontext=${curcontext:-${WIDGET}:::}
-local +h -a comppostfuncs=( .autocomplete.complete-word.post "$comppostfuncs[@]" )
+() {
+  local -a match=() mbegin=() mend=()  # `zstyle` for some reason assigns these.
+  local +h curcontext=${curcontext:-${WIDGET}:::}
+  local +h -a comppostfuncs=( .autocomplete.complete-word.post "$comppostfuncs[@]" )
 
-if [[ -z $compstate[old_list] ]] || [[ $WIDGET == *menu-* && -v _autocomplete__partial_list ]] ||
-    ( builtin zstyle -t ":autocomplete:${key_name}:" insert-unambiguous &&
-        [[ -n $_autocomplete__unambiguous ]] ); then
-  _main_complete
-else
-  compstate[old_list]=keep
-  [[ $key_name == shift-tab && $_lastcomp[tags] == *all-matches ]] &&
-      compstate[insert]=all
-  _main_complete -
-fi
-[[ _lastcomp[nmatches] -gt 0 && -n $compstate[insert] ]]
+  if [[ -z $compstate[old_list] ]] || [[ $WIDGET == *menu-* && -v _autocomplete__partial_list ]] ||
+      ( builtin zstyle -t ":autocomplete:${key_name}:" insert-unambiguous &&
+          [[ -n $_autocomplete__unambiguous ]] ); then
+    _main_complete
+  else
+    compstate[old_list]=keep
+    [[ $key_name == shift-tab && $_lastcomp[tags] == *all-matches ]] &&
+        compstate[insert]=all
+    _main_complete -
+  fi
+}
+[[ _lastcomp[nmatches] -gt 0 && -n $compstate[insert] ]] &&
+    unset curcontext