bug#27159: 25+; eldoc with curly quote

bug#27159: 25+; eldoc with curly quote

[Thierry Volpiatto]

Here a definition:

(cl-defun foo (a b &key (test 'eq)))

now from the scratch buffer:

(foo 

eldoc is displaying foo...(TEST \='EQ)

Applying substitute-command-keys on the second arg of
elisp--highlight-function-argument fixed the problem.


-- 
Thierry
Gpg Key fingerprint = 6CEC 7081 AB33 E251 4AB8  5FC2 28D1 7F53 59F2 9997

bug#27159: 25+; eldoc with curly quote

[Paul Eggert]

[-- Attachment #1: Type: text/plain, Size: 74 bytes --]

Thanks for reporting that. I installed the attached, which should fix it.

[-- Attachment #2: 0001-Fix-eldoc-bug-with-curved-quote.patch --]
[-- Type: text/x-patch, Size: 988 bytes --]

From 7dd9e7e95c1e4502b7a9fd6a18211208bd2914a5 Mon Sep 17 00:00:00 2001
From: Paul Eggert <eggert@cs.ucla.edu>
Date: Sun, 4 Jun 2017 09:13:15 -0700
Subject: [PATCH] Fix eldoc bug with curved quote

* lisp/progmodes/elisp-mode.el (elisp-get-fnsym-args-string):
Substitute quotes in documentation before returning it (Bug#27159).
---
 lisp/progmodes/elisp-mode.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el
index 6c6fb92..b3f452c 100644
--- a/lisp/progmodes/elisp-mode.el
+++ b/lisp/progmodes/elisp-mode.el
@@ -1372,7 +1372,7 @@ elisp-get-fnsym-args-string
 				(condition-case nil (documentation sym t)
 				  (invalid-function nil))
 				sym))
-		     (car doc))
+		     (substitute-command-keys (car doc)))
 		    (t (help-function-arglist sym)))))
              ;; Stringify, and store before highlighting, downcasing, etc.
 	     (elisp--last-data-store sym (elisp-function-argstring args)
-- 
2.7.4