feat(lsp): make list handlers configurable (#15199)

The handlers for textDocument/references, textDocument/documentSymbol,
and workspace/symbol open their results in the quickfix list by default
and are not configurable. They are also incompatible with `vim.lsp.with`
as they do not accept a configuration parameter.

Add a `config` parameter to the handler for these three messages which
allows them to be configured with `vim.lsp.with`. Additionally, add a
new configuration option 'loclist' that, when true, causes these
handlers to open their results in the location list rather than the
quickfix list.

runtime/doc/lsp.txt

@@ -321,6 +321,18 @@ To configure the behavior of a builtin |lsp-handler|, the convenient method
        ),
      }
    }
+<
+  Some handlers do not have an explicitly named handler function (such as
+  |on_publish_diagnostics()|). To override these, first create a reference
+  to the existing handler: >
+
+    local on_references = vim.lsp.handlers["textDocument/references"]
+    vim.lsp.handlers["textDocument/references"] = vim.lsp.with(
+      on_references, {
+        -- Use location list instead of quickfix list
+        loclist = true,
+      }
+    )
 <
                                                       *lsp-handler-resolution*
 Handlers can be set by:

runtime/lua/vim/lsp/handlers.lua

@@ -190,30 +190,41 @@ end
 
 
 --@private
---- Return a function that converts LSP responses to quickfix items and opens the qflist
+--- Return a function that converts LSP responses to list items and opens the list
---
+---
---@param map_result function `((resp, bufnr) -> list)` to convert the response
+--- The returned function has an optional {config} parameter that accepts a table
---@param entity name of the resource used in a `not found` error message
+--- with the following keys:
-local function response_to_qflist(map_result, entity)
+---
-  return function(_, _, result, _, bufnr)
+---   loclist: (boolean) use the location list (default is to use the quickfix list)
+---
+--- @param map_result function `((resp, bufnr) -> list)` to convert the response
+--- @param entity name of the resource used in a `not found` error message
+local function response_to_list(map_result, entity)
+  return function(_, _, result, _, bufnr, config)
     if not result or vim.tbl_isempty(result) then
       vim.notify('No ' .. entity .. ' found')
+    else
+      config = config or {}
+      if config.loclist then
+        util.set_loclist(map_result(result, bufnr))
+        api.nvim_command("lopen")
       else
         util.set_qflist(map_result(result, bufnr))
         api.nvim_command("copen")
       end
     end
+  end
 end
 
 
 --see: https://microsoft.github.io/language-server-protocol/specifications/specification-current/#textDocument_references
-M['textDocument/references'] = response_to_qflist(util.locations_to_items, 'references')
+M['textDocument/references'] = response_to_list(util.locations_to_items, 'references')
 
 --see: https://microsoft.github.io/language-server-protocol/specifications/specification-current/#textDocument_documentSymbol
-M['textDocument/documentSymbol'] = response_to_qflist(util.symbols_to_items, 'document symbols')
+M['textDocument/documentSymbol'] = response_to_list(util.symbols_to_items, 'document symbols')
 
 --see: https://microsoft.github.io/language-server-protocol/specifications/specification-current/#workspace_symbol
-M['workspace/symbol'] = response_to_qflist(util.symbols_to_items, 'symbols')
+M['workspace/symbol'] = response_to_list(util.symbols_to_items, 'symbols')
 
 --see: https://microsoft.github.io/language-server-protocol/specifications/specification-current/#textDocument_rename
 M['textDocument/rename'] = function(_, _, result)