[Emacs-diffs] master 7098823 2/2: Fix default value of electric-pair-pairs and electric-pair-text-pairs

[João Távora]

branch: master
commit 7098823b422c8334ef34664a9033b519f73ea7e1
Author: João Távora <address@hidden>
Commit: João Távora <address@hidden>

    Fix default value of electric-pair-pairs and electric-pair-text-pairs
    
    Fixes: debbugs:24901
    
    A previous change, titled "Add support for curly quotation marks to
    electric-pair-mode", attempted to add these characters to the default
    value of these variables.  But it did so in a quoted list, preventing
    evaluation of the relevant expressions and resulting in an invalid
    format.
    
    * lisp/elec-pair.el (electric-pair-pairs, electric-pair-text-pairs):
    Use backquote and comma.
---
 lisp/elec-pair.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/elec-pair.el b/lisp/elec-pair.el
index f990851..2a4895e 100644
--- a/lisp/elec-pair.el
+++ b/lisp/elec-pair.el
@@ -28,9 +28,9 @@
 ;;; Electric pairing.
 
 (defcustom electric-pair-pairs
-  '((?\" . ?\")
-    ((nth 0 electric-quote-chars) . (nth 1 electric-quote-chars))
-    ((nth 2 electric-quote-chars) . (nth 3 electric-quote-chars)))
+  `((?\" . ?\")
+    (,(nth 0 electric-quote-chars) . ,(nth 1 electric-quote-chars))
+    (,(nth 2 electric-quote-chars) . ,(nth 3 electric-quote-chars)))
   "Alist of pairs that should be used regardless of major mode.
 
 Pairs of delimiters in this list are a fallback in case they have
@@ -43,9 +43,9 @@ See also the variable `electric-pair-text-pairs'."
   :type '(repeat (cons character character)))
 
 (defcustom electric-pair-text-pairs
-  '((?\" . ?\" )
-    ((nth 0 electric-quote-chars) . (nth 1 electric-quote-chars))
-    ((nth 2 electric-quote-chars) . (nth 3 electric-quote-chars)))
+  `((?\" . ?\")
+    (,(nth 0 electric-quote-chars) . ,(nth 1 electric-quote-chars))
+    (,(nth 2 electric-quote-chars) . ,(nth 3 electric-quote-chars)))
   "Alist of pairs that should always be used in comments and strings.
 
 Pairs of delimiters in this list are a fallback in case they have