Subject: Re: bug#12895: 24.3.50; Replacement for flet

From: Stefan Monnier <[email-masked]>
Date: Fri, 16 Nov 2012 09:33:50 -0500

> But why I haven't yet replaced flet used in
> message-read-from-minibuffer is that I don't yet have a solution
> better than this:

> 	(flet ((mail-abbrev-in-expansion-header-p nil t))
> 	  (read-from-minibuffer prompt initial-contents))

How 'bout

(defadvice mail-abbrev-in-expansion-header-p (around t-in-minibuffer activate)
  (if (minibufferp) (setq ad-return-value t) ad-do-it))

Or how 'bout filing a feature request?

        Stefan