Make package lines and column numbers numbers in the JSON responses

This commit is contained in:
Christopher Baines 2025-06-24 15:28:13 +02:00
parent a017cddebc
commit beede72314

View file

@ -795,8 +795,8 @@
,@(if (member "location" fields) ,@(if (member "location" fields)
`((location `((location
. ((file . ,location-file) . ((file . ,location-file)
(line . ,location-line) (line . ,(string->number location-line))
(column . ,location-column-number)))) (column . ,(string->number location-column-number)))))
'()) '())
,@(if (member "licenses" fields) ,@(if (member "licenses" fields)
`((licenses `((licenses