GNU bug report logs -
#59793
29.0.60; subr.elc is not compiled correctly
Previous Next
Reported by: Feng Shu <tumashu <at> 163.com>
Date: Sat, 3 Dec 2022 07:26:02 UTC
Severity: normal
Tags: notabug
Found in version 29.0.60
Done: Stefan Kangas <stefankangas <at> gmail.com>
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
On December 3, 2022 5:10:52 PM GMT+02:00, Akib Azmain Turja <akib <at> disroot.org> wrote:
>
> 1. Save the following in a file.
>
> --8<---------------cut here---------------start------------->8---
> (require 'cl-lib)
> (defun bug59593-yank (&optional arg)
> (interactive "*P")
> (cl-letf* ((inhibit-read-only t)
> (insert-for-yank (symbol-function #'insert-for-yank))
> ((symbol-function #'insert-for-yank)
> (lambda (&rest args)
> (cl-letf (((symbol-function #'insert)
> (lambda (&rest args)
> (message
> "%S"
> (mapconcat (lambda (arg)
> (if (stringp arg)
> arg
> (string arg)))
> args "")))))
> (apply insert-for-yank args)))))
> (yank arg)))
> --8<---------------cut here---------------end--------------->8---
>
> 2. emacs -nw -Q -l FILE-FROM-STEP-1 -l PATH/TO/YOUR/SUBR.EL.GZ
> 3. Kill something.
> 4. M-x bug59593-yank. Now you should see the yank text in echo area.
> 5. emacs -nw -Q -l FILE-FROM-STEP-1 -l PATH/TO/ATTACHED/SUBR.ELC
> 6. Kill something.
> 7. M-x bug59593-yank. The yank text got unexpectedly inserted.
Am I missing something, or do you redefine a function and then expect it to work like you never redefined it?
And what do you mean by ATTACHED/SUBR.ELC? I don't see any attachments to your message.
So I'm still confused...
This bug report was last modified 1 year and 252 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.