William> Wow, that is pretty impressive. :) The really interesting thing is that
William> the mouse-wheel support has absolutely no C level support - it is all in
William> lisp and just sets up some keybindings to the extra mouse buttons that
William> XFree defines for the wheel mouse.
William> Any idea where:
William> debug(error (undefined-keystroke-sequence [#<keypress-event
control-meta-G>])) # (catch debugger ...)
William> Came from? Did you hit that keystroke while you were recklessly flinging
William> your poor mouse wheel around?
Nope. Just the mouse wheel. Bizarre indeed. Another backtrace is
attached.
I'm going to try turning off debug-on-error to see if that helps...
ding(nil buffer-bound)
# bind (etype debug-on-error inhibit-quit old-debug-on-error error-object)
command-error((beginning-of-buffer))
# (catch exit ...)
# bind (standard-input standard-output)
# (unwind-protect ...)
recursive-edit()
# bind (inhibit-trace standard-output buffer-read-only)
byte-code("..." [print-escape-newlines print-length debugger-buffer
debugger-value standard-output debugger-args pop-to-buffer erase-buffer t 50 backtrace
debugger-mode re-search-forward "\n[* ] debug(" 1 debugger-reenable (lambda
debug) "Entering:\n" debug backtrace-debug 3 delete-char ?* 0 exit "Return
value: " prin1 ?\n ?\ error "Signaling: " "Beginning evaluation of
function call form:\n" nil message "" recursive-edit buffer-read-only
inhibit-trace] 3)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (last-command this-command unread-command-event last-input-event last-input-char
last-input-time last-command-event last-command-char overriding-local-map
load-read-function standard-input standard-output cursor-in-echo-area)
# (unwind-protect ...)
# bind (debugger-value debug-on-error debug-on-quit debug-on-signal debugger-buffer
debugger-old-buffer debugger-step-after-exit executing-macro debugger-outer-match-data
debugger-outer-load-read-function debugger-outer-overriding-local-map
debugger-outer-last-command debugger-outer-this-command
debugger-outer-unread-command-event debugger-outer-unread-command-events
debugger-outer-last-input-event debugger-outer-last-input-char
debugger-outer-last-input-time debugger-outer-last-command-event
debugger-outer-last-command-char debugger-outer-standard-input
debugger-outer-standard-output debugger-outer-cursor-in-echo-area debugger-args)
debug(error (end-of-buffer))
# (catch debugger ...)
# (unwind-protect ...)
# bind (stack-trace-on-signal debug-on-signal stack-trace-on-error debug-on-error)
signal(end-of-buffer nil)
# (unwind-protect ...)
# bind (inhibit-point-motion-hooks opoint new count)
line-move(1)
# bind (count)
next-line(1)
# bind (arg)
abbrev-hacking-next-line(1)
# bind (command-debug-status)
call-interactively(abbrev-hacking-next-line)
# (condition-case ... . error)
# (catch top-level ...)