bug#31455: 26.1; last-command bug when selecting region with mouse

bug#31455: 26.1; last-command bug when selecting region with mouse

[Mambo Levis]

[-- Attachment #1: Type: text/plain, Size: 3553 bytes --]

Hi,
I am printing the last-command made in emacs. When I select a region with the mouse a non common message is shown (see highlighted text below) 
In GNU Emacs 26.1 (build 1, x86_64-w64-mingw32) of 2018-04-29 built on FREYRepository revision: c267421647510319d2a70554e42f0d1c394dba0aWindowing system distributor 'Microsoft Corp.', version 10.0.16299Recent messages:last-command: mouse-set-pointlast-command: mouse-drag-regionlast-command: mouse-set-pointlast-command: mouse-drag-regionlast-command: mouse-set-pointlast-command: mwheel-scroll [6 times]last-command: mouse-drag-regionlast-command: mouse-set-pointlast-command: mouse-drag-regionlast-command: mouse-set-pointlast-command: #[257 \307!\310!\211\301\242=\204\0\306\300\311\240\210\211@\262\302=\203-\0\312!\203-\0\313\301\242\305#\202Z\0\314 AA\211?\206X\0\211\303W\203H\0\315\302\303Z\316\301\242$\202X\0\211\304Y\205X\0\315\302\304ZT\316\301\242$\262\207 [(mouse-movement (#<window 48 on *Bug Help*> 267 (350 . 122) 428906093 nil 267 (43 . 7) nil (6 . 10) (8 . 16))) (267) #<window 48 on *Bug Help*> 0 60 0 t event-end posn-point mouse-movement integer-or-marker-p mouse--drag-set-mark-and-point mouse-position mouse-scroll-subr nil auto-hscroll-mode] 9
(fn EVENT) e]Mark setlast-command: #[257 \307!\310!\211\301\242=\204\0\306\300\311\240\210\211@\262\302=\203-\0\312!\203-\0\313\301\242\305#\202Z\0\314 AA\211?\206X\0\211\303W\203H\0\315\302\303Z\316\301\242$\202X\0\211\304Y\205X\0\315\302\304ZT\316\301\242$\262\207 [(mouse-movement (#<window 48 on *Bug Help*> 267 (350 . 122) 428906093 nil 267 (43 . 7) nil (6 . 10) (8 . 16))) (267) #<window 48 on *Bug Help*> 0 60 0 t event-end posn-point mouse-movement integer-or-marker-p mouse--drag-set-mark-and-point mouse-position mouse-scroll-subr nil auto-hscroll-mode] 9
Configured using: 'configure --prefix=/c/emacs/emacs-26.1-rc1 --without-compress-install --without-dbus --with-modules 'CFLAGS=-O2 -pipe -static -gdwarf-4 -g3''
Configured features:XPM JPEG TIFF GIF PNG RSVG SOUND NOTIFY ACL GNUTLS LIBXML2 ZLIBTOOLKIT_SCROLL_BARS MODULES THREADS
Important settings:  value of $LANG: DE  locale-coding-system: cp1252
Major mode: Messages
Minor modes in effect:  dimmer-mode: t  global-diff-hl-mode: t  diff-auto-refine-mode: t  mode-line-bell-mode: t  global-aggressive-indent-mode: t  yas-global-mode: t  yas-minor-mode: t  beacon-mode: t  global-annoying-arrows-mode: t  annoying-arrows-mode: t  frey-manager-mode: t  cua-mode: t  which-key-mode: t  super-save-mode: t  global-flycheck-mode: t  global-company-mode: t  company-mode: t  ivy-mode: t  flx-ido-mode: t  ido-ubiquitous-mode: t  ido-vertical-mode: t  recentf-mode: t  savehist-mode: t  save-place-mode: t  show-paren-mode: t  frey-utilities-mode: t  global-auto-revert-mode: t  delete-selection-mode: t  global-hl-line-mode: t  override-global-mode: t  tooltip-mode: t  global-eldoc-mode: t  electric-indent-mode: t  mouse-wheel-mode: t  menu-bar-mode: t  file-name-shadow-mode: t  global-font-lock-mode: t  font-lock-mode: t  auto-composition-mode: t  auto-encryption-mode: t  auto-compression-mode: t  buffer-read-only: t  size-indication-mode: t  column-number-mode: t  line-number-mode: t  transient-mark-mode: t  abbrev-mode: t

Memory information:((conses 16 455422 383186) (symbols 56 44651 7) (miscs 48 311 2192) (strings 32 117269 41451) (string-bytes 1 3549729) (vectors 16 52474) (vector-slots 8 1786967 522082) (floats 8 345 1828) (intervals 56 4132 4115) (buffers 992 23))

Thanks
Levis

[-- Attachment #2: Type: text/html, Size: 14182 bytes --]

bug#31455: 26.1; last-command bug when selecting region with mouse

[Noam Postavsky]

tags 31455 + notabug
quit

Mambo Levis <mambo.levis@gmail.com> writes:

> I am printing the last-command made in emacs. When I select a region
> with the mouse a non common message is shown (see highlighted text
> below)

> last-command: #[257 \307!\310!\211\301\242=\204\0\306\300\311\240\210\211@\262\302=\203-\0\312!\203-\0\313\301\242\305#\202Z\0\314
> AA\211?\206X\0\211\303W\203H\0\315\302\303Z\316\301\242$\202X\0\211\304Y\205X\0\315\302\304ZT\316\301\242$\262\207 [(mouse-movement
> (#<window 48 on *Bug Help*> 267 (350 . 122) 428906093 nil 267 (43 . 7) nil (6 . 10) (8 . 16))) (267) #<window 48 on *Bug Help*> 0 60 0 t event-end
> posn-point mouse-movement integer-or-marker-p mouse--drag-set-mark-and-point mouse-position mouse-scroll-subr nil auto-hscroll-mode] 9
>
> (fn EVENT) e]

I don't think this is a bug, you're seeing the compiled form of this
lambda in mouse-drag-track:

(defun mouse-drag-track (start-event)
   [...]
       (define-key map [mouse-movement]
         (lambda (event) (interactive "e")
           (let* ((end (event-end event))
                  (end-point (posn-point end)))
              [...]

If you use cl-print functions, you can hide the ugly bytecode stuff,
e.g.:

    (defun print-last-command ()
      (message "last-command: %s" (cl-prin1-to-string last-command)))

Produces

    last-command: #f(compiled-function (event) (interactive "e") #<bytecode 0x4bfd41>)

bug#31455: 26.1; last-command bug when selecting region with mouse

[Noam Postavsky]

close 31455
quit

Noam Postavsky <npostavs@gmail.com> writes:

> I don't think this is a bug, you're seeing the compiled form of this
> lambda in mouse-drag-track:

I'm therefore closing the report.