|
From: | Nick Roberts |
Subject: | display property strangeness |
Date: | Sun, 13 Mar 2005 21:40:44 +1300 |
I've just realised what the problem is: 1 2 and 3 are *adjacent positions (if you try 1 3 and 5 it works as you expect) so (defun foo () (interactive) (let ((pos '(1 2 3))) (while pos (put-text-property (car pos) (1+ (car pos)) 'display "A") (setq pos (cdr pos))))) works like: (defun foo-1 () (interactive) (put-text-property 1 3 'display "A")) Nick
[Prev in Thread] | Current Thread | [Next in Thread] |