bug#59785: 30.0.50; mouse-2 > (wrong-type-argument listp #<frame *Calendar* 0x...>)

[Michael Heerdegen]

Michael Heerdegen <michael_heerdegen@web.de> writes:

> It's hard to get a backtrace for that scenario, though, but I can
> retry if that would help.

Here is it:

| Debugger entered--Lisp error: (wrong-type-argument listp #<frame  *Minibuf-1* 
     micha@drachen 0x5581c2f1bf78>)
|   (posn-col-row #<frame  *Minibuf-1*      micha@drachen 0x5581c2f1bf78>)
|   (#f(compiled-function () #<bytecode -0x1fa7ba0046068077>))
|   (internal--track-mouse #f(compiled-function () #<bytecode 
-0x1fa7ba0046068077>))
|   (mouse-drag-drag (down-mouse-2 (#<window 16 on *Calendar*> 317 (128 . 128) 
6738998 nil 317 (9 . 4) nil (2 . 16) (14 . 28))))
|   (funcall-interactively mouse-drag-drag (down-mouse-2 (#<window 16 on 
*Calendar*> 317 (128 . 128) 6738998 nil 317 (9 . 4) nil (2 . 16) (14 . 28))))
|   (call-interactively mouse-drag-drag nil nil)
|   (command-execute mouse-drag-drag)
|   (#<subr read-string> "Date+time [2022-12-03]: " nil org-read-date-history 
nil nil)
|   (my-read-string--default-in-prompt-around-ad #<subr read-string> "Date+time 
[2022-12-03]: " nil org-read-date-history nil)
|   (apply my-read-string--default-in-prompt-around-ad #<subr read-string> 
("Date+time [2022-12-03]: " nil org-read-date-history nil))
|   (read-string "Date+time [2022-12-03]: " nil org-read-date-history nil)
|   (org-read-date nil t nil nil)
|   (org-capture-fill-template)
|   (#f(compiled-function (&optional goto keys) "Capture 
something.\n\\<org-capture-mode-map>\nThis will let you select a template from 
`org-capture-templates', and\nthen file the newly captured information.  The 
text is immediately\ninserted at the target location, and an indirect buffer is 
shown where\nyou can edit it.  Pressing `\\[org-capture-finalize]' brings you 
back to the previous\nstate of Emacs, so that you can continue your 
work.\n\nWhen called interactively with a `\\[universal-argument]' prefix 
argument GOTO, don't\ncapture anything, just go to the file/headline where the 
selected\ntemplate stores its notes.\n\nWith a `\\[universal-argument] 
\\[universal-argument]' prefix argument, go to the last note stored.\n\nWhen 
called with a `C-0' (zero) prefix, insert a template at point.\n\nWhen called 
with a `C-1' (one) prefix, force prompting for a date when\na datetree entry is 
made.\n\nELisp programs can set KEYS to a string associated with a template\nin 
`org-capture-templates'.  In this case, interactive selection\nwill be 
bypassed.\n\nIf `org-capture-use-agenda-date' is non-nil, capturing from 
the\nagenda will use the date at point as the default date.  Then, a\n`C-1' 
prefix will tell the capture process to use the HH:MM time\nof the day at point 
(if any) or the current HH:MM time." (interactive "P") #<bytecode 
-0xbb89e6d6aa8f2f>) nil)
|   (apply #f(compiled-function (&optional goto keys) "Capture 
something.\n\\<org-capture-mode-map>\nThis will let you select a template from 
`org-capture-templates', and\nthen file the newly captured information.  The 
text is immediately\ninserted at the target location, and an indirect buffer is 
shown where\nyou can edit it.  Pressing `\\[org-capture-finalize]' brings you 
back to the previous\nstate of Emacs, so that you can continue your 
work.\n\nWhen called interactively with a `\\[universal-argument]' prefix 
argument GOTO, don't\ncapture anything, just go to the file/headline where the 
selected\ntemplate stores its notes.\n\nWith a `\\[universal-argument] 
\\[universal-argument]' prefix argument, go to the last note stored.\n\nWhen 
called with a `C-0' (zero) prefix, insert a template at point.\n\nWhen called 
with a `C-1' (one) prefix, force prompting for a date when\na datetree entry is 
made.\n\nELisp programs can set KEYS to a string associated with a template\nin 
`org-capture-templates'.  In this case, interactive selection\nwill be 
bypassed.\n\nIf `org-capture-use-agenda-date' is non-nil, capturing from 
the\nagenda will use the date at point as the default date.  Then, a\n`C-1' 
prefix will tell the capture process to use the HH:MM time\nof the day at point 
(if any) or the current HH:MM time." (interactive "P") #<bytecode 
-0xbb89e6d6aa8f2f>) nil)
|   (my-org-capture--around-ad #f(compiled-function (&optional goto keys) 
"Capture something.\n\\<org-capture-mode-map>\nThis will let you select a 
template from `org-capture-templates', and\nthen file the newly captured 
information.  The text is immediately\ninserted at the target location, and an 
indirect buffer is shown where\nyou can edit it.  Pressing 
`\\[org-capture-finalize]' brings you back to the previous\nstate of Emacs, so 
that you can continue your work.\n\nWhen called interactively with a 
`\\[universal-argument]' prefix argument GOTO, don't\ncapture anything, just go 
to the file/headline where the selected\ntemplate stores its notes.\n\nWith a 
`\\[universal-argument] \\[universal-argument]' prefix argument, go to the last 
note stored.\n\nWhen called with a `C-0' (zero) prefix, insert a template at 
point.\n\nWhen called with a `C-1' (one) prefix, force prompting for a date 
when\na datetree entry is made.\n\nELisp programs can set KEYS to a string 
associated with a template\nin `org-capture-templates'.  In this case, 
interactive selection\nwill be bypassed.\n\nIf `org-capture-use-agenda-date' is 
non-nil, capturing from the\nagenda will use the date at point as the default 
date.  Then, a\n`C-1' prefix will tell the capture process to use the HH:MM 
time\nof the day at point (if any) or the current HH:MM time." (interactive 
"P") #<bytecode -0xbb89e6d6aa8f2f>) nil)
|   (apply my-org-capture--around-ad #f(compiled-function (&optional goto keys) 
"Capture something.\n\\<org-capture-mode-map>\nThis will let you select a 
template from `org-capture-templates', and\nthen file the newly captured 
information.  The text is immediately\ninserted at the target location, and an 
indirect buffer is shown where\nyou can edit it.  Pressing 
`\\[org-capture-finalize]' brings you back to the previous\nstate of Emacs, so 
that you can continue your work.\n\nWhen called interactively with a 
`\\[universal-argument]' prefix argument GOTO, don't\ncapture anything, just go 
to the file/headline where the selected\ntemplate stores its notes.\n\nWith a 
`\\[universal-argument] \\[universal-argument]' prefix argument, go to the last 
note stored.\n\nWhen called with a `C-0' (zero) prefix, insert a template at 
point.\n\nWhen called with a `C-1' (one) prefix, force prompting for a date 
when\na datetree entry is made.\n\nELisp programs can set KEYS to a string 
associated with a template\nin `org-capture-templates'.  In this case, 
interactive selection\nwill be bypassed.\n\nIf `org-capture-use-agenda-date' is 
non-nil, capturing from the\nagenda will use the date at point as the default 
date.  Then, a\n`C-1' prefix will tell the capture process to use the HH:MM 
time\nof the day at point (if any) or the current HH:MM time." (interactive 
"P") #<bytecode -0xbb89e6d6aa8f2f>) nil)
|   (org-capture nil)
|   (funcall-interactively org-capture nil)
|   (call-interactively org-capture nil nil)
|   (command-execute org-capture)

For that to happen the calendar must be in a different frame (different
from the one from where the command had been invoked and where the
active minibuffer is prompting).

Michael.