From: Mattias Engdegård <mattiase@acm.org>
Date: Tue, 30 May 2023 08:23:39 +0000 (+0200)
Subject: * test/lisp/dnd-tests.el (dnd-tests-begin-text-drag): Fix typo.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6e255ddfffa90d975eec62749c9acd385336f252;p=emacs.git

* test/lisp/dnd-tests.el (dnd-tests-begin-text-drag): Fix typo.
---

diff --git a/test/lisp/dnd-tests.el b/test/lisp/dnd-tests.el
index a603f29eb6d..9f97d739cec 100644
--- a/test/lisp/dnd-tests.el
+++ b/test/lisp/dnd-tests.el
@@ -172,7 +172,7 @@ This function only tries to handle strings."
            (extracted-1 (dnd-tests-extract-selection-data string-data-1 t))
            (extracted (dnd-tests-extract-selection-data string-data t)))
       (should (and (stringp extracted) (stringp extracted-1)))
-      (should (equal extracted extracted)))
+      (should (equal extracted extracted-1)))
     ;; Now check text/plain.
     (let ((string-data (dnd-tests-verify-selection-data
                         'text/plain)))