Commit be6dd481 authored by Ulrik Haugen's avatar Ulrik Haugen
Browse files

* lyskom-rest.el (lyskom-insert-before-prompt): don't let xemacs

add the text-properties of the prompt to all text inserted before
the prompt (fixes bug 421).
parent 26937b1f
2002-03-12 Ulrik Haugen <qha@lysator.liu.se>
* lyskom-rest.el (lyskom-insert-before-prompt): don't let xemacs
add the text-properties of the prompt to all text inserted before
the prompt (fixes bug 421).
2002-03-11 Joel Rosdahl <joel@lysator.liu.se>
* english-strings.el (lyskom-message): Changed last-log-in to say
......@@ -473,8 +479,8 @@
2001-10-14 Ulrik Haugen <qha@lysator.liu.se>
* lyskom-buttons.el (kom-previous-link, kom-next-link): look
for property lyskom-button in stead of lyskom-button-text.
* lyskom-buttons.el (kom-previous-link, kom-next-link): look for
property lyskom-button instead of lyskom-button-text.
(lyskom-generate-button): new arg sublte, callers changed.
2001-10-13 Ulrik Haugen <qha@lysator.liu.se>
......
......@@ -943,7 +943,15 @@ The strings buffered are printed before the prompt by lyskom-update-prompt."
(goto-char (point-max))
(beginning-of-line)
(let ((inhibit-read-only t))
(lyskom-do-insert string))
;; Some (all?) xemacsen adds the text-properties on the prompt
;; to text inserted before it. We don't want this, so insert a
;; blank and remove all text-properties from it, insert the
;; text before the blank and finally remove the blank.
(insert " ")
(backward-char)
(remove-text-properties (point) (+ (point) 1) (text-properties-at (point)))
(lyskom-do-insert string)
(delete-char 1))
(goto-char oldpoint))
(let ((window (get-buffer-window (current-buffer))))
(if (and window
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment