[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#8206: 24.0.50; flet breaks advised functions
From: |
Alex |
Subject: |
bug#8206: 24.0.50; flet breaks advised functions |
Date: |
Wed, 07 Sep 2016 22:14:37 -0600 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/25.1 (gnu/linux) |
close 8206 24.4
quit
Andreas Politz <politza@fh-trier.de> writes:
> I just discovered that `flet' does not work with (at least some form of)
> advised functions, such that it doesn't restore the original function.
> The underlying problem is demonstrated by the following code and seems
> to date back to at least Version 22.3.1 .
>
> (progn
> (defun foo () 'defun)
> (defadvice foo (around foo activate)
> ad-do-it)
> (setq letf-save (symbol-function
> ;;'ad-Orig-foo
> 'foo
> ))
> (fset 'foo (lambda nil 'flet))
> (fset 'foo letf-save)
> (foo))
>
> => flet
This results in 'defun' since at least 24.4, so I'm closing this as fixed.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- bug#8206: 24.0.50; flet breaks advised functions,
Alex <=