Re: Todays exercise of sanity (or does "see" really match "not"?)

From: David Kastrup <dak@gnu.org>
Cc: juri@jurta.org, lennart.borgman.073@student.lu.se,
	teirllm@dms.auburn.edu, rms@gnu.org, emacs-devel@gnu.org
Subject: Re: Todays exercise of sanity (or does "see" really match "not"?)
Date: Wed, 23 Mar 2005 12:01:41 +0100	[thread overview]
Message-ID: <x5fyymmxre.fsf@lola.goethe.zz> (raw)
In-Reply-To: <m3ll8ed6b8.fsf@kfs-l.imdomain.dk> (Kim F. Storm's message of "Wed, 23 Mar 2005 11:07:07 +0100")

[-- Attachment #1: Type: text/plain, Size: 1673 bytes --]

storm@cua.dk (Kim F. Storm) writes:

> Instead we can explicitly put an inivisible property together with
> the display property on a priece of "hidden" text which should be
> ignored by searches.  That need a little work to check all uses of
> display properties, but it doesn't break any old code relying on the
> current behaviour.
>
> I don't know whether it actually works to put both invisible and
> display on some text (with the effect of showing the image and
> ignoring the under-laying text).

It did in the past.  I remember that effect from when we were
desperately trying to find a combination of text properties that would
work with both Emacs and XEmacs.

> Would someone make some examples to check it?

I just patched up preview-latex to place the invisible property on the
overlays it creates (obviously, not the desired default behavior).
Now this is using overlays, not text properties, but the results
should be pretty much the same.

And the results are that stuff is not found indeed when using isearch.
query-replace-regexp, however, still finds it.  Non-interactive search
doesn't find it.

I also remember that in the Emacs-21.1 code base, placing the
"invisible" property on displayed stuff had the effect that scrolling
did no longer account for the amount of vertical space taken by the
image.  However, with the current HEAD, this effect is not to be seen.

In case that you want to experiment with it, here is the patch I
used.  Unfortunately, the main work is done in a macro, so you need
something like

(let ((load-path (cons "." load-path))) (load "preview.el"))

to let it take effect unless you recompile and reinstall
preview-latex.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Type: text/x-patch, Size: 937 bytes --]

--- prv-emacs.el	18 Mar 2005 22:36:24 +0100	1.63
+++ prv-emacs.el	23 Mar 2005 11:48:08 +0100	
@@ -168,6 +168,7 @@
 	  `(propertize
 	    "x"
 	    'display ,glyph
+	    'invisible t
 	    'mouse-face 'highlight
 	    'help-echo
 	    ,(if (stringp helpstring)
@@ -347,12 +348,12 @@
 	    (overlay-put ov 'category 'preview-overlay)
 	    (if (eq (overlay-start ov) (overlay-end ov))
 		(overlay-put ov 'before-string (car strings))
-	      (dolist (prop '(display keymap mouse-face help-echo))
+	      (dolist (prop '(invisible display keymap mouse-face help-echo))
 		(overlay-put ov prop
 			     (get-text-property 0 prop (car strings))))
 	      (overlay-put ov 'before-string nil))
 	    (overlay-put ov 'face nil))
-	(dolist (prop '(display keymap mouse-face help-echo))
+	(dolist (prop '(invisible display keymap mouse-face help-echo))
 	  (overlay-put ov prop nil))
 	(overlay-put ov 'face 'preview-face)
 	(unless (cdr strings)

[-- Attachment #3: Type: text/plain, Size: 52 bytes --]



-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum

[-- Attachment #4: Type: text/plain, Size: 142 bytes --]

_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel
