From: Mattias Engdegård <mattiase@acm.org>
Date: Thu, 14 May 2020 10:23:23 +0000 (+0200)
Subject: Fix customisation of mouse-drag-and-drop-region (bug#41251)
X-Git-Tag: emacs-28.0.90~7363
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4af8b17149ee04655f038229c6103963f247ff87;p=emacs.git

Fix customisation of mouse-drag-and-drop-region (bug#41251)

Reported by David Ponce.

* lisp/mouse.el (mouse-drag-and-drop-region): Add missing unquote.
---

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 9703d957d57..795b4da19e1 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -2556,7 +2556,7 @@ region, text is copied instead of being cut."
              (lambda (modifier)
                `(const :tag ,(format "Enable, but copy with the %s modifier"
                                      modifier)
-                       modifier))
+                       ,modifier))
              '(alt super hyper shift control meta))
           (other :tag "Enable dragging the region" t))
   :version "26.1")