From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: lee Newsgroups: gmane.emacs.help Subject: Re: replacing a function with another one Date: Tue, 11 Mar 2014 14:34:32 +0100 Organization: my virtual residence Message-ID: <87y50gj1uf.fsf@yun.yagibdah.de> References: <87vbvofsi6.fsf@yun.yagibdah.de> <87bnxgs4r9.fsf@web.de> <87lhwj1cfz.fsf@yun.yagibdah.de> <87zjkz6vd5.fsf@web.de> <8738ir161u.fsf@yun.yagibdah.de> <87eh2b6nfm.fsf@web.de> <87r46anab5.fsf@yun.yagibdah.de> <87wqg2u77k.fsf@web.de> <87pplugjh6.fsf@yun.yagibdah.de> <8738ipd2kh.fsf@web.de> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Trace: ger.gmane.org 1394564891 25919 80.91.229.3 (11 Mar 2014 19:08:11 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Tue, 11 Mar 2014 19:08:11 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Tue Mar 11 20:08:20 2014 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1WNS2F-0005dT-3i for geh-help-gnu-emacs@m.gmane.org; Tue, 11 Mar 2014 20:08:19 +0100 Original-Received: from localhost ([::1]:56991 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WNS2E-0000Mp-KS for geh-help-gnu-emacs@m.gmane.org; Tue, 11 Mar 2014 15:08:18 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:52088) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WNS1r-0000GJ-5S for help-gnu-emacs@gnu.org; Tue, 11 Mar 2014 15:08:00 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1WNS1k-00024d-IP for help-gnu-emacs@gnu.org; Tue, 11 Mar 2014 15:07:55 -0400 Original-Received: from client-194-42-186-216.muenet.net ([194.42.186.216]:52390 helo=yun.yagibdah.de) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WNS1k-00023t-3F for help-gnu-emacs@gnu.org; Tue, 11 Mar 2014 15:07:48 -0400 Original-Received: from lee by yun.yagibdah.de with local (Exim 4.80.1) (envelope-from ) id 1WNS1g-0002mM-JC for help-gnu-emacs@gnu.org; Tue, 11 Mar 2014 20:07:44 +0100 In-Reply-To: <8738ipd2kh.fsf@web.de> (Michael Heerdegen's message of "Tue, 11 Mar 2014 01:03:10 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux) Mail-Followup-To: help-gnu-emacs@gnu.org X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 194.42.186.216 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:96428 Archived-At: Michael Heerdegen writes: > lee writes: > >> > (advice-add >> > 'hi-lock-write-interactive-patterns :around >> > ;; also include `hi-lock-file-patterns' >> > (lambda (f &rest args) > >> What does (f &rest args) do or mean? > >>>From the doc of `add-function', this is how :around advices FUNCTION are > called: > > (lambda (&rest r) (apply FUNCTION OLDFUN r)) I can only guess what that is supposed to mean. r is undefined, &rest might be some sort of reference, why the old function is to be applied is unknown, and where or what the advice is or how to add it doesn=C2=B4t show anywhere. It is also not shown how to put anything actually around the old function, i. e. how you do something, then call the existing function, then do some more, which would be the purpose of an around advice. > Note that the advice FUNCTION will be called with an additional (the > first) argument, which will be bound to the original function when the > advice is called. The documentation doesn=C2=B4t say that. It seems to be supposed to call t= wo functions, one of them apparently being the existing one, the other one unknown. > This way, you have direct access to the original function through that > binding in your advice, and you can call it with funcall or apply. > This "mechanism" is the replacement for the old ad-do-it. Why doesn=C2=B4t the documentation just say that? > In my example, FUNCTION is (lambda (f &rest args) ...), But f and args are undefined. > which means that f will be bound to OLDFUN, i.e. the original > definition of `hi-lock-write-interactive-patterns', But you are not applying something like the documentation would suggest is needed. > and args will be bound to r, which will be the list of arguments with > which `hi-lock-write-interactive-patterns' gets called. r? So that is something that isn=C2=B4t defined or documented? I tried to look up r, without success other than finding out that it apparently is neither a variable, nor a function. >> > (apply f args))) >> >> f args? >> >> hi-lock-write-interactive-patterns doesn=C2=B4t have any arguments. > > So, the function will always be called without arguments, which means > that args will be bound to the empty list - no problem. > > So why did I write it that way? Because it works with any argument > list. Instead of specifying the original argument list in the advice, > I just use &rest args and apply the original function to args when I > don't need to know the value of any argument. > > Of course you can also write > > (advice-add > 'hi-lock-write-interactive-patterns :around > (lambda (f) > (let ((hi-lock-interactive-patterns > (append hi-lock-interactive-patterns > hi-lock-file-patterns)))) > (funcall f))) How does that go along with the documentation? The documentation says "(lambda (&rest r) (apply FUNCTION OLDFUN r))", whatever that means. You have (f) instead of (&rest r), and "(apply FUNCTION OLDFUN r)" is missing. And if f refers to the original function, why not use a before advice instead? And I thought "let" limits the scope of the variable to what is between its brackets. > But if some day `hi-lock-write-interactive-patterns' might become an > optional argument, this advice would raise an wrong number of arguments > error. What if you want to use one of the arguments? >> [1]: Another question: >> >> To get patterns from a separate file, I=C2=B4m using find-file. This is >> probably not very efficient: I suspect that the file is actually loaded >> every time, with all what that implies. > > No, Emacs doesn't do such things. If the file is already found in a > buffer, this buffer will just be selected when you `find-file' the same > file again. > > If you want to try this approach, you can use `find-file-noselect', > which returns the file's buffer (without selecting it) and assign it to > some variable foo. Later, you can always just use > (with-current-buffer foo ...). What when you use find-file-noselect and the file cannot be visited? The documentation only says it returns the buffer, not what it returns when it fails. --=20 Knowledge is volatile and fluid. Software is power.