aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPo Lu2022-03-17 03:46:18 +0000
committerPo Lu2022-03-17 03:46:35 +0000
commitdfdd2f6f2380c785d34f5eb2df0b356d33d0dae1 (patch)
tree16d81426d450ada002e13fa0cd57806644fd447e
parent00172ae0c8a3087578f6e91251f887f6b7b4f682 (diff)
downloademacs-dfdd2f6f2380c785d34f5eb2df0b356d33d0dae1.tar.gz
emacs-dfdd2f6f2380c785d34f5eb2df0b356d33d0dae1.zip
* lisp/term/haiku-win.el (x-begin-drag): Fix type code of B_MIME_TYPE.
-rw-r--r--lisp/term/haiku-win.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/term/haiku-win.el b/lisp/term/haiku-win.el
index b7f1991381b..9fa50d62e85 100644
--- a/lisp/term/haiku-win.el
+++ b/lisp/term/haiku-win.el
@@ -200,7 +200,7 @@ take effect on menu items until the menu bar is updated again."
200 (unless (cadr field) 200 (unless (cadr field)
201 ;; Add B_MIME_TYPE to the message if the type was not 201 ;; Add B_MIME_TYPE to the message if the type was not
202 ;; previously defined. 202 ;; previously defined.
203 (push 1296649641 (alist-get (car selection-result) message 203 (push 1296649541 (alist-get (car selection-result) message
204 nil nil #'equal)))) 204 nil nil #'equal))))
205 (push (cadr selection-result) 205 (push (cadr selection-result)
206 (cdr (alist-get (car selection-result) message 206 (cdr (alist-get (car selection-result) message