[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
find-dired output isn't fully propertized
From: |
Stephen Berman |
Subject: |
find-dired output isn't fully propertized |
Date: |
Thu, 26 Apr 2007 23:01:37 +0200 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.98 (gnu/linux) |
1. emacs -Q
2. M-x find-dired RET <path/to/emacs/sources/> RET -name "*src"
3. The buffer *Find* contains this:
,----
| <path/to/emacs/sources/>:
| find . \( -name "*src" \) -exec ls -ld \{\} \;
| drwxr-xr-x 2 steve users 4096 2007-04-26 17:43 lib-src
| drwxr-xr-x 2 steve users 4096 2007-04-26 20:17 src
|
| find finished at Thu Apr 26 20:38:37
`----
In this dired listing, moving the mouse over `lib-src' displays
mouse-face highlighting and a tooltip, but moving the mouse over src
does not.
If step 2 above is replaced by the following:
M-x find-dired RET <path/to/emacs/sources/> RET -name "Make*"
the output is a dired listing of all the Makefiles in the Emacs source
tree, plus Makefile.c files. In this listing moving the mouse the
last N file names fails to show mouse-face highlighting and a tooltip,
where N can be anywhere from 1 to all but the first dired entry;
repeating this find-dired invocation doesn't always yield the same
number, except that at least the last dired entry is not propertized.
In particular, if the output of find-dired is just a single dired
entry (e.g., with `M-x find-dired RET <path/to/emacs/sources/> RET
-name lisp') , then it lacks mouse-face and tooltip.
The following patch fixes this bug, AFAICT:
*** find-dired.el.~1.55.~ 2007-01-21 23:44:41.000000000 +0100
--- find-dired.el 2007-04-26 21:51:25.000000000 +0200
***************
*** 257,263 ****
(delete-region (point) (- (point) 2)))
;; Find all the complete lines in the unprocessed
;; output and process it to add text properties.
! (goto-char end)
(if (search-backward "\n" (process-mark proc) t)
(progn
(dired-insert-set-properties (process-mark proc)
--- 257,263 ----
(delete-region (point) (- (point) 2)))
;; Find all the complete lines in the unprocessed
;; output and process it to add text properties.
! (goto-char (point-max))
(if (search-backward "\n" (process-mark proc) t)
(progn
(dired-insert-set-properties (process-mark proc)
In GNU Emacs 22.0.98.2 (i686-pc-linux-gnu, GTK+ Version 2.10.6)
of 2007-04-20 on escher
Windowing system distributor `The X.Org Foundation', version 11.0.70199902
configured using `configure '--with-x-toolkit=gtk''
Important settings:
value of $LC_ALL: nil
value of $LC_COLLATE: nil
value of $LC_CTYPE: nil
value of $LC_MESSAGES: nil
value of $LC_MONETARY: nil
value of $LC_NUMERIC: nil
value of $LC_TIME: nil
value of $LANG: en_US.UTF-8
locale-coding-system: utf-8
default-enable-multibyte-characters: t
Major mode: Emacs-Lisp
Minor modes in effect:
shell-dirtrack-mode: t
tooltip-mode: t
tool-bar-mode: t
mouse-wheel-mode: t
menu-bar-mode: t
file-name-shadow-mode: t
global-font-lock-mode: t
font-lock-mode: t
blink-cursor-mode: t
unify-8859-on-encoding-mode: t
utf-translate-cjk-mode: t
auto-compression-mode: t
line-number-mode: t
transient-mark-mode: identity
Recent input:
i r e d - m o d e <return> <help-echo> C-x b <return>
<down-mouse-1> <mouse-1> C-h f <return> C-x o <tab>
<return> C-x 1 <down-mouse-4> <mouse-4> <double-down-mouse-4>
<double-mouse-4> <triple-down-mouse-4> <triple-mouse-4>
M-x <up> <return> <up> <return> <return> <help-echo>
C-x k <return> <down-mouse-1> <mouse-1> C-u C-M-x M-x
<up> <return> <up> <return> <return> SPC SPC SPC SPC
SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC
SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC
SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC
SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC
SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC
SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC
SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC SPC
SPC SPC SPC SPC SPC <help-echo> <help-echo> <help-echo>
<help-echo> SPC SPC SPC SPC C-x k <return> M-x <up>
<return> <up> <return> <return> <help-echo> <down-mouse-5>
<mouse-5> C-x 1 <down-mouse-5> <mouse-5> <down-mouse-5>
<mouse-5> <down-mouse-1> <mouse-1> C-s C-w C-w C-w
C-r C-r C-r C-r <down-mouse-1> <mouse-1> <down-mouse-4>
<mouse-4> C-x b <return> C-x b <return> SPC f f f <help-echo>
SPC SPC C-x k <return> <down-mouse-5> <mouse-5> <double-down-mouse-5>
<double-mouse-5> <down-mouse-1> <mouse-1> C-h f <return>
C-x 1 <help-echo> <down-mouse-4> <mouse-4> <double-down-mouse-4>
<double-mouse-4> <down-mouse-4> <mouse-4> <down-mouse-4>
<mouse-4> <down-mouse-4> <mouse-4> <double-down-mouse-4>
<double-mouse-4> <down-mouse-4> <mouse-4> <down-mouse-4>
<mouse-4> <down-mouse-4> <mouse-4> <double-down-mouse-4>
<double-mouse-4> <down-mouse-4> <mouse-4> <double-down-mouse-4>
<double-mouse-4> <triple-down-mouse-4> <triple-mouse-4>
<triple-down-mouse-4> <triple-mouse-4> <down-mouse-5>
<mouse-5> <down-mouse-4> <mouse-4> <double-down-mouse-4>
<double-mouse-4> <triple-down-mouse-4> <triple-mouse-4>
<triple-down-mouse-4> <triple-mouse-4> <down-mouse-4>
<mouse-4> <down-mouse-5> <mouse-5> <down-mouse-5> <mouse-5>
<double-down-mouse-5> <double-mouse-5> C-s p r o c
C-s <down> C-x b <return> <help-echo> <down-mouse-1>
<mouse-2> <help-echo> <down-mouse-1> <mouse-2> <help-echo>
C-x b <return> <help-echo> <down-mouse-1> <mouse-movement>
<drag-mouse-1> <down-mouse-1> <mouse-1> M-x r e p o
<tab> r <tab> <return>
Recent messages:
Go...
Break [2 times]
Breakpoint set in find-dired-filter
Go...
Break
Result: #<marker at 161 in *Find*> [2 times]
Type C-x 1 to remove help window.
Mark saved where search started
Making completion list...
Loading emacsbug...done
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- find-dired output isn't fully propertized,
Stephen Berman <=