From 9b5835504ee80f6078292ee325155f780a95414e Mon Sep 17 00:00:00 2001 From: Janfel <33464477+Janfel@users.noreply.github.com> Date: Fri, 10 Jan 2020 21:14:03 +0100 Subject: [PATCH] Fix #2349: Make +format-completing-read return symbol Currently `+format-completing-read` returns a cons cell like `(symbol . t)`, where `+format/buffer` expects a symbol. This commit makes `+format-completing-read` return a symbol instead. Fixes #2349. --- modules/editor/format/autoload/format.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/modules/editor/format/autoload/format.el b/modules/editor/format/autoload/format.el index 8b6a19441..49345bf5c 100644 --- a/modules/editor/format/autoload/format.el +++ b/modules/editor/format/autoload/format.el @@ -95,7 +95,7 @@ Stolen shamelessly from go-mode" (require 'format-all) (let* ((fmtlist (mapcar #'symbol-name (hash-table-keys format-all--format-table))) (fmt (completing-read "Formatter: " fmtlist))) - (if fmt (cons (intern fmt) t)))) + (if fmt (intern fmt)))) ;;;###autoload (defun +format-probe-a (orig-fn)