From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Michael Heerdegen Newsgroups: gmane.emacs.bugs Subject: bug#15900: 24.3.50; foreground-color-at-point returns wrong results Date: Sun, 17 Nov 2013 23:38:11 +0100 Message-ID: <87a9h264do.fsf@web.de> References: <69fed86b-8fdb-4563-88f5-715dc7fce1be@default> <83bo1ihqe9.fsf@gnu.org> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: ger.gmane.org 1384727958 12301 80.91.229.3 (17 Nov 2013 22:39:18 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sun, 17 Nov 2013 22:39:18 +0000 (UTC) Cc: 15900@debbugs.gnu.org To: Eli Zaretskii Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun Nov 17 23:39:22 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 1ViAzy-0006nE-3U for geb-bug-gnu-emacs@m.gmane.org; Sun, 17 Nov 2013 23:39:22 +0100 Original-Received: from localhost ([::1]:40544 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ViAzx-0004XW-LR for geb-bug-gnu-emacs@m.gmane.org; Sun, 17 Nov 2013 17:39:21 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:40638) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ViAzn-0004XL-Ox for bug-gnu-emacs@gnu.org; Sun, 17 Nov 2013 17:39:19 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1ViAze-0001At-NV for bug-gnu-emacs@gnu.org; Sun, 17 Nov 2013 17:39:11 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:45127) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1ViAze-0001AP-Kb for bug-gnu-emacs@gnu.org; Sun, 17 Nov 2013 17:39:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1ViAze-0001SK-7k for bug-gnu-emacs@gnu.org; Sun, 17 Nov 2013 17:39:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Michael Heerdegen Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 17 Nov 2013 22:39:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 15900 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 15900-submit@debbugs.gnu.org id=B15900.13847279085549 (code B ref 15900); Sun, 17 Nov 2013 22:39:02 +0000 Original-Received: (at 15900) by debbugs.gnu.org; 17 Nov 2013 22:38:28 +0000 Original-Received: from localhost ([127.0.0.1]:59146 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1ViAz6-0001RQ-3Z for submit@debbugs.gnu.org; Sun, 17 Nov 2013 17:38:28 -0500 Original-Received: from mout.web.de ([212.227.15.4]:55873) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1ViAz3-0001RC-ST for 15900@debbugs.gnu.org; Sun, 17 Nov 2013 17:38:26 -0500 Original-Received: from drachen.dragon ([90.186.252.235]) by smtp.web.de (mrweb102) with ESMTPA (Nemesis) id 0LeLWz-1VKzmX1JMb-00qCiI for <15900@debbugs.gnu.org>; Sun, 17 Nov 2013 23:38:19 +0100 In-Reply-To: <83bo1ihqe9.fsf@gnu.org> (Eli Zaretskii's message of "Sun, 17 Nov 2013 19:47:10 +0200") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux) X-Provags-ID: V03:K0:KTezp4Pp/YL3CQTBgvkQiCRkJux15jgUEqnKV9tjpeHSdR3XZ5l kCkcOzFt6PEUp5oe48+9GwhjPl+zZbsq/cyHAf73OK+nXatEzWbpIsZZ+pUWCVcwmfjJaBK PyjU0j8W74U6lZgQJxCMOlpcasKqzb01H5wOdMnbD9raDN0SzZcqkw5PEV7TmyVM7wrq7n8 WZfl2mQDb/FVhko19ZiXA== X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.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:80704 Archived-At: Hello, > > I think he means that the value of property `face' (whether from > > a text property or an overlay property) can be a list of faces. Indeed. Plus, I want to look at the font-lock-face property. > Yes, but then you get all that list in a single call to > get-char-property, right? So where's the difficulty in collecting > "all the faces at point"? There's no difficulty. Eli, did you ever read the code snip I had included? Here it is again: (cl-some (lambda (face) (not (memq (face-foreground face nil t) `(nil ,(face-attribute 'default :foreground) "unspecified-fg" "unspecified-bg")))) (cl-mapcan (lambda (face-or-list) (if (facep face-or-list) (list face-or-list) face-or-list)) (list (get-text-property (point) 'face) (get-text-property (point) 'font-lock-face)))) I think what you mean, and what I do in the code, are quite the same (except for the predicate maybe). I appreciate your help, but please tell me if the snipped is ok or if you mean something else, and if so, what. I've just the feeling that we to talk at cross-purposes. Thanks, Michael.