Fix #4757 only resolve at exit-fn when the candidate requires resolution

Author: wyuenho

Diff for: lsp-completion.el

@@ -688,10 +688,15 @@ Others: CANDIDATES"
                                            'lsp-completion-item)
                              candidate
                            (cl-find candidate (funcall candidates) :test #'equal)))
+              (item (plist-get (text-properties-at 0 candidate) 'lsp-completion-item))
               (candidate
                ;; see #3498 typescript-language-server does not provide the
                ;; proper insertText without resolving.
-               (if (lsp-completion--find-workspace 'ts-ls)
+               (if (and (lsp-completion--find-workspace 'ts-ls)
+                        (or (and lsp-enable-snippet
+                                 (eql (lsp:completion-item-insert-text-format? item)
+                                      lsp/insert-text-format-snippet))
+                            (eq (plist-get (lsp:completion-item-data? item) :hasAction) t)))
                    (lsp-completion--resolve candidate)
                  candidate))
               ((&plist 'lsp-completion-item item