home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / alt / lucidem / bug / 531 < prev    next >
Encoding:
Text File  |  1993-01-27  |  1.7 KB  |  45 lines
  1. x-gateway: rodan.UU.NET from bug-lucid-emacs to alt.lucid-emacs.bug; Wed, 27 Jan 1993 18:00:50 EST
  2. From: piggy%hilbert.maths.utas.edu.au@lucid.com (La Monte Yarroll)
  3. Message-ID: <9301270632.AA06329@hilbert.maths.utas.edu.au>
  4. Subject: BUG: extents dribble
  5. Date: Wed, 27 Jan 1993 17:32:51 EST
  6. X-Mailer: ELM [version 2.2 PL11]
  7. Newsgroups: alt.lucid-emacs.bug
  8. Path: sparky!uunet!wendy-fate.uu.net!bug-lucid-emacs
  9. Sender: bug-lucid-emacs-request@lucid.com
  10. Lines: 33
  11.  
  12. I'm running the lucid emacs 19.4 sparc binary currently available for ftp.
  13.  
  14. I've noticed an annoying feature of the realization of extents.  Under
  15. conditions I don't yet understand, and extent can dribble over into
  16. the next character for a short period.
  17.  
  18. You can see this effect most easily by highlighting a region and then
  19. using ^w.  You delete one less character than it looked like.
  20.  
  21. At first I thought this was the cursor getting in the way, but it
  22. isn't.  There appear to be conditions under which extents show
  23. themselves from [start, end] instead of [start, end).
  24.  
  25. To investigate this bug, eval the following code to set up an extent.
  26.  
  27. (setq bug-face (make-face 'smile))
  28. (defun demonstrate-extent-problem ()
  29.   (let ((start (point))
  30.     (end))
  31.     (insert "Put it here-")
  32.     (setq end (point))
  33.     (insert "!-to demonstrate bug.")
  34.     (set-face-font bug-face "7x13b")
  35.     (setq bug-extent (make-extent start end))
  36.     (set-extent-face bug-extent bug-face))
  37. )
  38.  
  39.  
  40. Now evaluate (demonstrate-extent-problem).  Put your cursor on the "!".
  41. Type a single character.  Notice that the "!" is now bold.  Now eval
  42. (cons bug-extent (point)); note that (point) is supposedly not
  43. included in the extent.  Now move to the "-" after the "!".  Type
  44. another character, and the "!" reverts.
  45.