diff options
| author | Po Lu <luangruo@yahoo.com> | 2022-03-17 03:46:18 +0000 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2022-03-17 03:46:35 +0000 |
| commit | dfdd2f6f2380c785d34f5eb2df0b356d33d0dae1 (patch) | |
| tree | 16d81426d450ada002e13fa0cd57806644fd447e | |
| parent | 00172ae0c8a3087578f6e91251f887f6b7b4f682 (diff) | |
| download | emacs-dfdd2f6f2380c785d34f5eb2df0b356d33d0dae1.tar.gz | |
* lisp/term/haiku-win.el (x-begin-drag): Fix type code of B_MIME_TYPE.
| -rw-r--r-- | lisp/term/haiku-win.el | 2 |
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." (unless (cadr field) ;; Add B_MIME_TYPE to the message if the type was not ;; previously defined. - (push 1296649641 (alist-get (car selection-result) message + (push 1296649541 (alist-get (car selection-result) message nil nil #'equal)))) (push (cadr selection-result) (cdr (alist-get (car selection-result) message |