From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Drew Adams" Newsgroups: gmane.emacs.bugs Subject: bug#9919: 24.0.91; font-lock broken in dired Date: Mon, 31 Oct 2011 08:11:53 -0700 Message-ID: <1161A09A8D6E494CBF91D53B99D5FBC2@us.oracle.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit X-Trace: dough.gmane.org 1320073991 26396 80.91.229.12 (31 Oct 2011 15:13:11 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Mon, 31 Oct 2011 15:13:11 +0000 (UTC) To: 9919@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Mon Oct 31 16:13:06 2011 Return-path: Envelope-to: geb-bug-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 1RKtXu-00017A-6W for geb-bug-gnu-emacs@m.gmane.org; Mon, 31 Oct 2011 16:13:06 +0100 Original-Received: from localhost ([::1]:47711 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RKtXt-0004ar-HT for geb-bug-gnu-emacs@m.gmane.org; Mon, 31 Oct 2011 11:13:05 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:58085) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RKtXh-0004ER-AI for bug-gnu-emacs@gnu.org; Mon, 31 Oct 2011 11:13:02 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RKtXf-0005K0-5N for bug-gnu-emacs@gnu.org; Mon, 31 Oct 2011 11:12:53 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:54320) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RKtXf-0005Jw-1I for bug-gnu-emacs@gnu.org; Mon, 31 Oct 2011 11:12:51 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.69) (envelope-from ) id 1RKtZm-0006V9-Fw for bug-gnu-emacs@gnu.org; Mon, 31 Oct 2011 11:15:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: "Drew Adams" Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Mon, 31 Oct 2011 15:15:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 9919 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: Original-Received: via spool by submit@debbugs.gnu.org id=B.132007407724943 (code B ref -1); Mon, 31 Oct 2011 15:15:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 31 Oct 2011 15:14:37 +0000 Original-Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RKtZN-0006UF-B1 for submit@debbugs.gnu.org; Mon, 31 Oct 2011 11:14:37 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RKtZL-0006U9-Ga for submit@debbugs.gnu.org; Mon, 31 Oct 2011 11:14:36 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RKtX7-0005BZ-Ce for submit@debbugs.gnu.org; Mon, 31 Oct 2011 11:12:23 -0400 Original-Received: from lists.gnu.org ([140.186.70.17]:46809) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RKtX7-0005BV-B5 for submit@debbugs.gnu.org; Mon, 31 Oct 2011 11:12:17 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:57946) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RKtX1-0003rq-HA for bug-gnu-emacs@gnu.org; Mon, 31 Oct 2011 11:12:17 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RKtWu-00057m-HT for bug-gnu-emacs@gnu.org; Mon, 31 Oct 2011 11:12:11 -0400 Original-Received: from rcsinet15.oracle.com ([148.87.113.117]:48814) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RKtWu-000571-By for bug-gnu-emacs@gnu.org; Mon, 31 Oct 2011 11:12:04 -0400 Original-Received: from ucsinet22.oracle.com (ucsinet22.oracle.com [156.151.31.94]) by rcsinet15.oracle.com (Switch-3.4.4/Switch-3.4.4) with ESMTP id p9VFC0xv005236 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=OK) for ; Mon, 31 Oct 2011 15:12:00 GMT Original-Received: from acsmt356.oracle.com (acsmt356.oracle.com [141.146.40.156]) by ucsinet22.oracle.com (8.14.4+Sun/8.14.4) with ESMTP id p9VFBxRK014723 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=NO) for ; Mon, 31 Oct 2011 15:11:59 GMT Original-Received: from abhmt108.oracle.com (abhmt108.oracle.com [141.146.116.60]) by acsmt356.oracle.com (8.12.11.20060308/8.12.11) with ESMTP id p9VFBrc9020169 for ; Mon, 31 Oct 2011 10:11:53 -0500 Original-Received: from dradamslap1 (/130.35.178.194) by default (Oracle Beehive Gateway v4.0) with ESMTP ; Mon, 31 Oct 2011 08:11:53 -0700 X-Mailer: Microsoft Office Outlook 11 Thread-Index: AcyX32v0cjDKgpEgRy2pUVpARhB4yg== X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.6109 X-Source-IP: ucsinet22.oracle.com [156.151.31.94] X-CT-RefId: str=0001.0A090208.4EAEBAC1.00F4,ss=1,re=0.000,fgs=0 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 1) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Resent-Date: Mon, 31 Oct 2011 11:15:02 -0400 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) 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:53347 Archived-At: This regression started with the second delivery of pretest #1, 2011-10-31. There is no such problem with the first delivery, 2011-10-24. In my setup I use dired+.el, which is here: http://www.emacswiki.org/emacs/download/dired%2b.el. The relevant code is this: (add-hook 'dired-mode-hook '(lambda () (set (make-local-variable 'font-lock-defaults) (cons '(dired-font-lock-keywords diredp-font-lock-keywords-1) ; Two levels. (cdr font-lock-defaults))))) And this: (defvar diredp-font-lock-keywords-1 (list '("^ \\(.+:\\)$" 1 diredp-dir-heading) ; Directory headers '("^ wildcard.*$" 0 'default) ; Override others, e.g. `l' for `diredp-other-priv'. '("^ (No match).*$" 0 'default) ; Override others, e.g. `t' for `diredp-other-priv'. '("[^ .]\\.\\([^. /]+\\)$" 1 diredp-file-suffix) ; Suffix '("\\([^ ]+\\) -> [^ ]+$" 1 diredp-symlink) ; Symbolic links ;; 1) Date/time and 2) filename w/o suffix: (list dired-move-to-filename-regexp (if (or (not (fboundp 'version<)) (version< emacs-version "23.2")) (list 1 'diredp-date-time t t) (list 2 'diredp-date-time t t)) ; Date/time (list "\\(.+\\)$" nil nil (list 0 diredp-file-name 'keep t))) ; Filename ;; Files to ignore (list (concat "^ \\(.*\\(" (concat (mapconcat 'regexp-quote (or (and (boundp 'dired-omit-extensions) dired-omit-extensions) completion-ignored-extensions) "[*]?\\|") "[*]?") ; Allow for executable flag (*). "\\|\\.\\(g?z\\|Z\\)[*]?\\)\\)$") ; Compressed. 1 diredp-ignored-file-name t) '("[^ .]\\.\\([bg]?[zZ]2?\\)[*]?$" 1 diredp-compressed-file-suffix t) ; Compressed (*.z) '("\\([*]\\)$" 1 diredp-executable-tag t) ; Executable (*) ;; Inode, hard-links, & file size (. and , are for the decimal point, depending on locale) ;; See comment for `directory-listing-before-filename-regexp' in `files.el' or `files+.el'. '("\\(\\([0-9]+\\([.,][0-9]+\\)?\\)[BkKMGTPEZY]? \\)" 1 diredp-number) ;; Directory names (list "^..\\([0-9]* \\)*d" (list dired-move-to-filename-regexp nil nil) (list "\\(.+\\)" nil nil '(0 diredp-dir-priv t t))) '("^..\\([0-9]* \\)*.........\\(x\\)" 2 diredp-exec-priv) ;o x '("^..\\([0-9]* \\)*.........\\([lsStT]\\)" 2 diredp-other-priv) ; o misc '("^..\\([0-9]* \\)*........\\(w\\)" 2 diredp-write-priv) ; o w '("^..\\([0-9]* \\)*.......\\(r\\)" 2 diredp-read-priv) ; o r '("^..\\([0-9]* \\)*......\\(x\\)" 2 diredp-exec-priv) ; g x '("^..\\([0-9]* \\)*....[^0-9].\\([lsStT]\\)" 2 diredp-other-priv) ; g misc '("^..\\([0-9]* \\)*.....\\(w\\)" 2 diredp-write-priv) ; g w '("^..\\([0-9]* \\)*....\\(r\\)" 2 diredp-read-priv) ; g r '("^..\\([0-9]* \\)*...\\(x\\)" 2 diredp-exec-priv) ; u x '("^..\\([0-9]* \\)*...\\([lsStT]\\)" 2 diredp-other-priv) ; u misc '("^..\\([0-9]* \\)*..\\(w\\)" 2 diredp-write-priv) ; u w '("^..\\([0-9]* \\)*.\\(r\\)" 2 diredp-read-priv) ; u r '("^..\\([0-9]* \\)*.\\([-rwxlsStT]+\\)" 2 diredp-no-priv keep) ;- '("^..\\([0-9]* \\)*\\([bcsmpS]\\)[-rwxlsStT]" 2 diredp-rare-priv) ; (rare) '("^..\\([0-9]* \\)*\\(l\\)[-rwxlsStT]" 2 diredp-link-priv) ; l (list (concat "^\\([^\n " (char-to-string dired-del-marker) "].*$\\)") 1 diredp-flag-mark-line t) ; Flag/mark lines (list (concat "^\\([" (char-to-string dired-del-marker) "]\\)") ; Deletion flags (D) '(1 diredp-deletion t) '(".+" (dired-move-to-filename) nil (0 diredp-deletion-file-name t))) (list (concat "^\\([^\n " (char-to-string dired-del-marker) "]\\)") ; Flags, marks (except D) 1 diredp-flag-mark t) ) "2nd level of Dired highlighting. See `font-lock-maximum-decoration'.") The local value of `font-lock-defaults' is correctly set to this value, as it is in the earlier pretest #1 and in all prior Emacs releases: ((dired-font-lock-keywords diredp-font-lock-keywords-1) t nil nil beginning-of-line) But none of the specified font-locking is manifested. I see only the default emacs -Q font-locking. I don't know why, and am not sure how to check this further. I've diff'd dired.el, dired-x.el, dired-aux.el, and font-lock.el between the first pretest #1 delivery (2011-10-24) and the second one (2011-10-31), but I don't recognize any change that would affect this. Dunno what other code changes were made between these two pretest deliveries, but something broke font-locking badly in this context. In GNU Emacs 24.0.91.1 (i386-mingw-nt5.1.2600) of 2011-10-30 on MARVIN Windowing system distributor `Microsoft Corp.', version 5.1.2600 configured using `configure --with-gcc (4.6) --no-opt --cflags -I"D:/devel/emacs/libs/libXpm-3.5.8/include" -I"D:/devel/emacs/libs/libXpm-3.5.8/src" -I"D:/devel/emacs/libs/libpng-dev_1.4.3-1/include" -I"D:/devel/emacs/libs/zlib-dev_1.2.5-2/include" -I"D:/devel/emacs/libs/giflib-4.1.4-1/include" -I"D:/devel/emacs/libs/jpeg-6b-4/include" -I"D:/devel/emacs/libs/tiff-3.8.2-1/include" -I"D:/devel/emacs/libs/gnutls-2.10.1/include" --ldflags -L"D:/devel/emacs/libs/gnutls-2.10.1/lib"'