all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Michael Heerdegen <michael_heerdegen@web.de>
To: HaiJun Zhang <netjune@outlook.com>
Cc: "help-gnu-emacs@gnu.org" <help-gnu-emacs@gnu.org>,
	Zhang Haijun <ccsmile2008@outlook.com>
Subject: Re: How to stop all edebug?
Date: Thu, 24 Oct 2019 15:13:07 +0200	[thread overview]
Message-ID: <87a79qz3q4.fsf@web.de> (raw)
In-Reply-To: <PS1PR03MB3606BD9544593C756F3E7823B76A0@PS1PR03MB3606.apcprd03.prod.outlook.com> (HaiJun Zhang's message of "Thu, 24 Oct 2019 12:45:55 +0000")

HaiJun Zhang <netjune@outlook.com> writes:

> I tried and it didn’t work. I eval
> `(edebug--edebug-on-entry-functions)` and it returns nil.

Oh well, correct again, that doesn't work as well, sorry for wasting
your time.

Ok, now I have tested that Lars' new `edebug-remove-instrumentation':

#+begin_src emacs-lisp
(defun edebug-remove-instrumentation ()
  "Remove Edebug instrumentation from all functions."
  (interactive)
  (let ((functions nil))
    (mapatoms
     (lambda (symbol)
       (when (and (functionp symbol)
                  (get symbol 'edebug))
         (let ((unwrapped (edebug-unwrap* (symbol-function symbol))))
           (unless (equal unwrapped (symbol-function symbol))
             (push symbol functions)
             (setf (symbol-function symbol) unwrapped)))))
     obarray)
    (if (not functions)
        (message "Found no functions to remove instrumentation from")
      (message "Remove edebug instrumentation from %s"
               (mapconcat #'symbol-name functions ", ")))))
#+end_src

works for me at least in 26.1.  Can you please try that?  Just M-x
edebug-remove-instrumentation.

Regards,

Michael.



  reply	other threads:[~2019-10-24 13:13 UTC|newest]

Thread overview: 14+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2019-10-23  4:56 How to stop all edebug? Zhang Haijun
2019-10-23  6:46 ` Michael Heerdegen
     [not found]   ` <mailman.1523.1571813205.9715.help-gnu-emacs@gnu.org>
2019-10-23  7:31     ` Lars Magne Ingebrigtsen
2019-10-24 11:09       ` Michael Heerdegen
2019-10-24  4:10   ` HaiJun Zhang
2019-10-24 11:05     ` Michael Heerdegen
2019-10-24 12:45       ` HaiJun Zhang
2019-10-24 13:13         ` Michael Heerdegen [this message]
2019-10-24 14:10           ` HaiJun Zhang
     [not found]       ` <70a705e7-cebf-4ac4-b7af-0fc04b383de6@Spark>
2019-10-24 13:12         ` HaiJun Zhang
2019-10-23 12:43 ` Stefan Monnier
2019-10-24  4:12   ` HaiJun Zhang
2019-10-23 15:21 ` Eli Zaretskii
2019-10-24  4:16   ` HaiJun Zhang

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87a79qz3q4.fsf@web.de \
    --to=michael_heerdegen@web.de \
    --cc=ccsmile2008@outlook.com \
    --cc=help-gnu-emacs@gnu.org \
    --cc=netjune@outlook.com \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.