From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: E Sabof Newsgroups: gmane.emacs.bugs Subject: bug#13733: 24.2.50; apropos-value will error when encountering a circular strucure Date: Sun, 17 Feb 2013 10:32:01 +0000 Message-ID: NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=047d7b6dcee06f824704d5e91e68 X-Trace: ger.gmane.org 1361097203 23436 80.91.229.3 (17 Feb 2013 10:33:23 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sun, 17 Feb 2013 10:33:23 +0000 (UTC) To: 13733@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun Feb 17 11:33:45 2013 Return-path: Envelope-to: geb-bug-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 1U71Z0-00017I-Jj for geb-bug-gnu-emacs@m.gmane.org; Sun, 17 Feb 2013 11:33:42 +0100 Original-Received: from localhost ([::1]:34922 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1U71Yg-0001HR-NS for geb-bug-gnu-emacs@m.gmane.org; Sun, 17 Feb 2013 05:33:22 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:51535) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1U71Yb-0001Gh-Ah for bug-gnu-emacs@gnu.org; Sun, 17 Feb 2013 05:33:20 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1U71YT-0000lM-M4 for bug-gnu-emacs@gnu.org; Sun, 17 Feb 2013 05:33:16 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:54622) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1U71YT-0000lD-C5 for bug-gnu-emacs@gnu.org; Sun, 17 Feb 2013 05:33:09 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.72) (envelope-from ) id 1U71ZK-0000bD-4r for bug-gnu-emacs@gnu.org; Sun, 17 Feb 2013 05:34:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: E Sabof Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 17 Feb 2013 10:34:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 13733 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.13610971932243 (code B ref -1); Sun, 17 Feb 2013 10:34:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 17 Feb 2013 10:33:13 +0000 Original-Received: from localhost ([127.0.0.1]:60086 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1U71YW-0000a7-3A for submit@debbugs.gnu.org; Sun, 17 Feb 2013 05:33:12 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:39813) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1U71YT-0000Zz-UW for submit@debbugs.gnu.org; Sun, 17 Feb 2013 05:33:10 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1U71XZ-0000Vl-RD for submit@debbugs.gnu.org; Sun, 17 Feb 2013 05:32:16 -0500 Original-Received: from lists.gnu.org ([208.118.235.17]:44339) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1U71XZ-0000VX-8B for submit@debbugs.gnu.org; Sun, 17 Feb 2013 05:32:13 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:51127) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1U71XT-00015i-W9 for bug-gnu-emacs@gnu.org; Sun, 17 Feb 2013 05:32:12 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1U71XQ-0000Sx-TV for bug-gnu-emacs@gnu.org; Sun, 17 Feb 2013 05:32:07 -0500 Original-Received: from mail-qa0-f41.google.com ([209.85.216.41]:62290) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1U71XQ-0000SI-QH for bug-gnu-emacs@gnu.org; Sun, 17 Feb 2013 05:32:04 -0500 Original-Received: by mail-qa0-f41.google.com with SMTP id hy16so889678qab.7 for ; Sun, 17 Feb 2013 02:32:01 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=mime-version:x-received:date:message-id:subject:from:to :content-type; bh=7iHKBC2eHH5QmZRVr79cCp4tHvlWORgOdxNHSZ1YqPU=; b=z7JLypXp9Y6VUPoeFa+nCqrXKI7jtctuc9YsnPCTFZ21EGl8+2I3NWU1Mn9lhXpVwG P4GmVhbVk7TBSLxQYezVz3CerRrrjRGAFgYO2Bv40K5OauqHkLo6LG/3WXOCX7LUfzFp ZKpzh1BcRZ2//2kpc11ZBLltQ87f9xZZptSDKEGwgROA8+JN7WUHCohtTl0YmhDIyPoj lnWsSNFZv//NjL1vF8CEd5E27SKmJxci3tpDBX6miPue+mARfmDr2B01eY4W2oPyqN4e qHOITkcyaxmbX12qgNehsMtvNlpdmiXTZ7DRfLTrPhaI9IkexRoXG+xFTvU3uSUuTNfr tA1w== X-Received: by 10.49.127.145 with SMTP id ng17mr3376364qeb.25.1361097121563; Sun, 17 Feb 2013 02:32:01 -0800 (PST) Original-Received: by 10.49.4.102 with HTTP; Sun, 17 Feb 2013 02:32:01 -0800 (PST) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x [fuzzy] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:71435 Archived-At: --047d7b6dcee06f824704d5e91e68 Content-Type: text/plain; charset=ISO-8859-1 Patching apropos.el in the following manner seems to have fixed the problem. (defun apropos-value-internal (predicate symbol function) (if (funcall predicate symbol) (progn (setq symbol (or (ignore-errors (prin1-to-string (funcall function symbol))) "")) (if (string-match apropos-regexp symbol) (progn (if apropos-match-face (put-text-property (match-beginning 0) (match-end 0) 'face apropos-match-face symbol)) symbol))))) Evgeni --047d7b6dcee06f824704d5e91e68 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable
Patching apropos.el in the following manner seems to have = fixed the problem.

(defun apropos-value-internal (p= redicate symbol function)
=A0 =A0 =A0 (if (funcall predicate symb= ol)
=A0 =A0 =A0 =A0 =A0 (progn
=A0 =A0 =A0 =A0 =A0 =A0 (setq sym= bol (or (ignore-errors
=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 = =A0 =A0 =A0 =A0 =A0 =A0(prin1-to-string (funcall function symbol)))
=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0"")= )
=A0 =A0 =A0 =A0 =A0 =A0 (if (string-match apropos-regexp symbol)
=
=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (progn
=A0 =A0 =A0 =A0 =A0 = =A0 =A0 =A0 =A0 (if apropos-match-face
=A0 =A0 =A0 =A0 =A0 =A0 = =A0 =A0 =A0 =A0 =A0 (put-text-property (match-beginning 0) (match-end 0)
=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 = =A0 =A0 =A0 =A0'face apropos-match-face
=A0 =A0 =A0 =A0 =A0 = =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0symbol))
=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 symbol)))))

=
Evgeni
--047d7b6dcee06f824704d5e91e68--