diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-07-27 22:04:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-07-27 22:04:24 +0000 |
| commit | 130b06dbf2023cbe94b28c0d9101761fd1696e4c (patch) | |
| tree | d77fde7b934953dfb2f0af97f8cfa2e4c5356b18 | |
| parent | cffee4057a2cabdd4d49c12acdc8c9b82bb94992 (diff) | |
| download | emacs-130b06dbf2023cbe94b28c0d9101761fd1696e4c.tar.gz | |
(texinfo-specific-section-type): Use buffer-substring-no-properties.
| -rw-r--r-- | lisp/textmodes/texnfo-upd.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/textmodes/texnfo-upd.el b/lisp/textmodes/texnfo-upd.el index f84cdd51496..b46387dd11b 100644 --- a/lisp/textmodes/texnfo-upd.el +++ b/lisp/textmodes/texnfo-upd.el @@ -1001,10 +1001,11 @@ error if the node is not the top node and a section is not found." t) "top") ((re-search-forward texinfo-section-types-regexp nil t) - (buffer-substring (progn (beginning-of-line) ; copy its name - (1+ (point))) - (progn (forward-word 1) - (point)))) + (buffer-substring-no-properties + (progn (beginning-of-line) ; copy its name + (1+ (point))) + (progn (forward-word 1) + (point)))) (t (error "texinfo-specific-section-type: Chapter or section not found.")))))) |