procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(Info-fontify-node): Mark one more char as intangible.

Browse source
This commit is contained in:
Gerd Moellmann 2001-01-05 12:23:11 +00:00
parent 22b5642678
commit 3828218c96
3 changed files with 15 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,6 +1,10 @@
2001-01-05 Gerd Moellmann <gerd@gnu.org>
* info.el (Info-fontify-node): Mark one more char as intangible.
2000-01-05 Kenichi Handa <handa@etl.go.jp>
* composite.el (compose-last-chars): New argument COMPONENTS. It
* composite.el (compose-last-chars): New argument COMPONENTS. If
it is non-nil, compose preceding characters by compose-region with
COMPONENTS.

8
lisp/info.el
View file

@ -2510,9 +2510,11 @@ the variable `Info-file-list-for-emacs'."
;; This is a serious problem for trying to handle multiple
;; frame types at once. We want this text to be invisible
;; on frames that can display the font above.
(if (memq (framep (selected-frame)) '(x pc w32 mac))
(add-text-properties (match-end 1) (match-end 2)
'(invisible t intangible t))))
(when (memq (framep (selected-frame)) '(x pc w32 mac))
(add-text-properties (match-end 1) (match-end 2)
'(invisible t intangible t))
(add-text-properties (1- (match-end 1)) (match-end 2)
'(intangible t))))
(goto-char (point-min))
(while (re-search-forward "\\*Note[ \n\t]+\\([^:]*\\):" nil t)
(if (= (char-after (1- (match-beginning 0))) ?\") ; hack

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
2001-01-05 Gerd Moellmann <gerd@gnu.org>
* sysdep.c: Don't prototype srandom; it takes an unsigned argument
on some systems, and an unsigned long on others, like FreeBSD 4.1.
2001-01-04 Gerd Moellmann <gerd@gnu.org>
* xterm.c (clear_mouse_face): Don't return if tip_frame is