[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#13023: 24.3.50; lexical binding does not work within defadvice
From: |
Christopher Schmidt |
Subject: |
bug#13023: 24.3.50; lexical binding does not work within defadvice |
Date: |
Wed, 28 Nov 2012 16:17:17 +0000 (GMT) |
;; -*- lexical-binding: t -*-
(funcall (let ((rms "works"))
(lambda ()
(message "lex-bind %s" rms))))
(defun asdf (b) (funcall b))
(defadvice asdf (before rms (b) activate)
(setf b (let ((abc 1) (b b)) (lambda () (print abc) (funcall b)))))
(asdf 'ding)
I think this code should work fine. It doesn't work with trunk and
emacs-24, though:
Load test.elc? (y or n) y
Loading test.elc...
lex-bind works
Load error for test.elc:
(void-variable abc)
Christopher
- bug#13023: 24.3.50; lexical binding does not work within defadvice,
Christopher Schmidt <=