# HG changeset patch # User Glenn Morris # Date 1289375940 28800 # Node ID 20c4d074b74da93e0f356043694f2d650a2cb13b # Parent b6da43d9e0f5e42ff69e142f83f51ae7ae5d8c29 * lisp/textmodes/texnfo-upd.el (texinfo-pointer-name): Fix typo. diff -r b6da43d9e0f5 -r 20c4d074b74d lisp/ChangeLog --- a/lisp/ChangeLog Wed Nov 10 07:55:25 2010 +0000 +++ b/lisp/ChangeLog Tue Nov 09 23:59:00 2010 -0800 @@ -8,6 +8,8 @@ * emulation/tpu-extras.el (tpu-with-position): New macro. (tpu-paragraph, tpu-page, tpu-search-internal): Use it. + * textmodes/texnfo-upd.el (texinfo-pointer-name): Fix typo. + * textmodes/texnfo-upd.el (texinfo-all-menus-update) (texinfo-menu-copy-old-description, texinfo-start-menu-description) (texinfo-master-menu, texinfo-insert-node-lines) diff -r b6da43d9e0f5 -r 20c4d074b74d lisp/textmodes/texnfo-upd.el --- a/lisp/textmodes/texnfo-upd.el Wed Nov 10 07:55:25 2010 +0000 +++ b/lisp/textmodes/texnfo-upd.el Tue Nov 09 23:59:00 2010 -0800 @@ -1439,8 +1439,7 @@ (end-of-line) ; this handles prev node top case (re-search-backward ; when point is already "^@node" ; at the beginning of @node line - ;; FIXME this can't be right. Missing the point? - (save-excursion (forward-line -3)) + (line-beginning-position -2) t) (setq name (texinfo-copy-node-name))) ((eq kind 'no-pointer)