From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: jidanni@jidanni.org Newsgroups: gmane.emacs.help Subject: Re: I need to turn off defadvice warnings Date: Sat, 07 Jan 2012 06:47:13 +0800 Message-ID: <87boqga0hq.fsf_-_@jidanni.org> References: <87ty48bg9a.fsf@jidanni.org> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1325891602 4774 80.91.229.12 (6 Jan 2012 23:13:22 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Fri, 6 Jan 2012 23:13:22 +0000 (UTC) Cc: yamaoka@jpl.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Sat Jan 07 00:13:18 2012 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RjIyL-0007eN-Fj for geh-help-gnu-emacs@m.gmane.org; Sat, 07 Jan 2012 00:13:17 +0100 Original-Received: from localhost ([::1]:48044 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RjIyK-0005kt-Vk for geh-help-gnu-emacs@m.gmane.org; Fri, 06 Jan 2012 18:13:16 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]:44375) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RjIyG-0005kc-7y for help-gnu-emacs@gnu.org; Fri, 06 Jan 2012 18:13:13 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RjIyF-0003SZ-7O for help-gnu-emacs@gnu.org; Fri, 06 Jan 2012 18:13:12 -0500 Original-Received: from caiajhbdcaib.dreamhost.com ([208.97.132.81]:39801 helo=homiemail-a38.g.dreamhost.com) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RjIyF-0003SU-0h for help-gnu-emacs@gnu.org; Fri, 06 Jan 2012 18:13:11 -0500 Original-Received: from homiemail-a38.g.dreamhost.com (localhost [127.0.0.1]) by homiemail-a38.g.dreamhost.com (Postfix) with ESMTP id 0FE6510AFAA; Fri, 6 Jan 2012 15:13:10 -0800 (PST) DomainKey-Signature: a=rsa-sha1; c=nofws; d=jidanni.org; h=from:to:to:cc :subject:date:references:message-id:mime-version:content-type; q=dns; s=jidanni.org; b=jh+6hd2BplGClUtnP1z7a6ycd02gi/KZ1CrUO/a Nl8BwNslvAw69CV9drAHdVNaq1XN3wGoFNDn+Ii9bR2rjUNsADnlMJx4F5M6wIIV BFGeOoYdTEoEsCDz6NMO0Nc0UApLjH6BP4BaDvJc/a9rWA57DQWJNF8VwrH14P/S U9FY= DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=jidanni.org; h=from:to:to :cc:subject:date:references:message-id:mime-version:content-type ; s=jidanni.org; bh=HyK2B6nWg+wjY980AHxE9jKJqts=; b=pTriIIGgEbcp qKDaHoyNhreSyqVDNaqWUbsFBNP7XCFp/5QyXe2Lqt9py2dWfWzH9xUpXxkKTyLx Sbf/wneE8wwoNNwjyI3pB/Y+Naez1U7fBXUES5IzJ+Ts4hKoqfsdEbV7w5sKpaGa S6QTAFepjvvgQ2SZxrUFzEESfYbk3Fo= Original-Received: from jidanni.org (218-163-16-236.dynamic.hinet.net [218.163.16.236]) (using TLSv1 with cipher AES256-SHA (256/256 bits)) (No client certificate requested) (Authenticated sender: jidanni@jidanni.org) by homiemail-a38.g.dreamhost.com (Postfix) with ESMTPSA id 4CDAE10AFB0; Fri, 6 Jan 2012 15:13:09 -0800 (PST) Original-To: 10392@debbugs.gnu.org Original-To: help-gnu-emacs@gnu.org X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-Received-From: 208.97.132.81 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:83386 Archived-At: OK, (info "(elisp) Advising Functions") should mention that advising functions will produce warnings. And to turn off the warnings, one needs to (setq ad-redefinition-action 'accept), and one cannot just turn them off for one advice, with e.g., let(). ;(let ((ad-redefinition-action 'accept)) (setq ad-redefinition-action 'accept) (defadvice gnus-summary-select-article-buffer (after jump-to-html-part activate) "Jump to an html part that emacs-w3m rendered, if any." (unless (get-text-property (point) 'mm-inline-text-html-with-w3m) (let ((pos (text-property-any (point-min) (point-max) 'mm-inline-text-html-with-w3m t))) (gnus-goto-char pos)))) ;)