diff options
| author | Sam Steingold <sds@gnu.org> | 2000-05-22 18:15:56 +0000 |
|---|---|---|
| committer | Sam Steingold <sds@gnu.org> | 2000-05-22 18:15:56 +0000 |
| commit | 0e8c11d82152d20caae80aa6a36cab4d1fdcaabd (patch) | |
| tree | a030744d6a459fee387efcba4b06f9ce40677185 | |
| parent | d903239064e28af26e1ec143163e7f2e062dc46c (diff) | |
| download | emacs-0e8c11d82152d20caae80aa6a36cab4d1fdcaabd.tar.gz | |
(Info-fontify-node): fixed the call to add-text-properties
| -rw-r--r-- | lisp/ChangeLog | 15 | ||||
| -rw-r--r-- | lisp/info.el | 2 |
2 files changed, 11 insertions, 6 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b36dbedebfa..1b8ff6bc055 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-05-22 Sam Steingold <sds@gnu.org> + + * info.el (Info-fontify-node): fixed the call to + `add-text-properties' (bug introduced on 2000-05-18). + 2000-05-22 Dave Love <fx@gnu.org> * bindings.el: Remove debug-ignored-errors set in other files. @@ -12,9 +17,9 @@ quote keywords. (cmpl-string-case-type): Use character classes. - * comint.el: - * textmodes/ispell.el: - * imenu.el: + * comint.el: + * textmodes/ispell.el: + * imenu.el: * mail/mh-e.el: * progmodes/compile.el: Add to debug-ignored-errors. @@ -159,7 +164,7 @@ * msb.el (msb-menu-cond): Add choice `user'. 2000-05-18 Vinicius Jose Latorre <vinicius@cpqd.com.br> - + * ps-print.el: Compatibility, customization and doc fix. (ps-printer-name-option): Replace defconst by defvar. (ps-postscript-code-directory): XEmacs compatibility. @@ -394,7 +399,7 @@ area. (syntax-code-table): Format changed. (string-to-syntax): Adjusted for the above change. - + 2000-05-12 Stefan Monnier <monnier@cs.yale.edu> * font-lock.el (lisp-font-lock-keywords-1): Add define-minor-mode. diff --git a/lisp/info.el b/lisp/info.el index 01409b7d9f2..8b4efe5887a 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -2299,7 +2299,7 @@ The alist key is the character the title is underlined with (?*, ?= or ?-)." ;; on frames that can display the font above. (if (memq (framep (selected-frame)) '(x pc w32)) (add-text-properties (match-end 1) (match-end 2) - 'invisible t 'intangible t))) + '(invisible t intangible t)))) (goto-char (point-min)) (while (re-search-forward "\\*Note[ \n\t]+\\([^:]*\\):" nil t) (if (= (char-after (1- (match-beginning 0))) ?\") ; hack |