Merge from origin/emacs-25

c695fb3 ; Spelling fixes
03750c0 * doc/misc/texinfo.tex: Sync from gnulib.
42fed3b * lisp/isearch.el (isearch-forward-symbol-at-point): Add isea...
This commit is contained in:
Paul Eggert 2016-05-01 18:14:23 -07:00
commit 3354582b36
4 changed files with 19 additions and 6 deletions

View file

@ -3,7 +3,7 @@
% Load plain if necessary, i.e., if running under initex. % Load plain if necessary, i.e., if running under initex.
\expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi
% %
\def\texinfoversion{2016-03-29.15} \def\texinfoversion{2016-04-14.07}
% %
% Copyright 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995, % Copyright 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995,
% 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
@ -5371,7 +5371,6 @@
\putwordIndexNonexistent \putwordIndexNonexistent
\else \else
\catcode`\\ = 0 \catcode`\\ = 0
\escapechar = `\\
% %
% If the index file exists but is empty, then \openin leaves \ifeof % If the index file exists but is empty, then \openin leaves \ifeof
% false. We have to make TeX try to read something from the file, so % false. We have to make TeX try to read something from the file, so
@ -6943,7 +6942,6 @@
\catcode `\>=\other \catcode `\>=\other
\catcode `\`=\other \catcode `\`=\other
\catcode `\'=\other \catcode `\'=\other
\escapechar=`\\
% %
% ' is active in math mode (mathcode"8000). So reset it, and all our % ' is active in math mode (mathcode"8000). So reset it, and all our
% other math active characters (just in case), to plain's definitions. % other math active characters (just in case), to plain's definitions.
@ -7921,14 +7919,28 @@
% alias because \c means cedilla in @tex or @math % alias because \c means cedilla in @tex or @math
\let\texinfoc=\c \let\texinfoc=\c
\newcount\savedcatcodeone
\newcount\savedcatcodetwo
% Used at the time of macro expansion. % Used at the time of macro expansion.
% Argument is macro body with arguments substituted % Argument is macro body with arguments substituted
\def\scanmacro#1{% \def\scanmacro#1{%
\newlinechar`\^^M \newlinechar`\^^M
\def\xeatspaces{\eatspaces}% \def\xeatspaces{\eatspaces}%
% %
% Temporarily undo catcode changes of \printindex. Set catcode of @ to
% 0 so that @-commands in macro expansions aren't printed literally when
% formatting an index file, where \ is used as the escape character.
\savedcatcodeone=\catcode`\@
\savedcatcodetwo=\catcode`\\
\catcode`\@=0
\catcode`\\=\active
%
% Process the macro body under the current catcode regime. % Process the macro body under the current catcode regime.
\scantokens{#1\texinfoc}\aftermacro% \scantokens{#1@texinfoc}\aftermacro%
%
\catcode`\@=\savedcatcodeone
\catcode`\\=\savedcatcodetwo
% %
% The \texinfoc is to remove the \newlinechar added by \scantokens, and % The \texinfoc is to remove the \newlinechar added by \scantokens, and
% can be noticed by \parsearg. % can be noticed by \parsearg.

View file

@ -274,7 +274,7 @@ Note: back-references in REGEXPs do not work."
(defun syntax-propertize-via-font-lock (keywords) (defun syntax-propertize-via-font-lock (keywords)
"Propertize for syntax using font-lock syntax. "Propertize for syntax using font-lock syntax.
KEYWORDS obeys the format used in `font-lock-syntactic-keywords'. KEYWORDS obeys the format used in `font-lock-syntactic-keywords'.
The return value is a function (with two paremeters, START and The return value is a function (with two parameters, START and
END) suitable for `syntax-propertize-function'." END) suitable for `syntax-propertize-function'."
(lambda (start end) (lambda (start end)
(with-no-warnings (with-no-warnings

View file

@ -2320,7 +2320,7 @@ If you set `term-file-prefix' to nil, this function does nothing."
(defface variable-pitch (defface variable-pitch
'((((type w32)) '((((type w32))
;; This is a kludgey workaround for an issue discussed in ;; This is a kludgy workaround for an issue discussed in
;; http://lists.gnu.org/archive/html/emacs-devel/2016-04/msg00746.html. ;; http://lists.gnu.org/archive/html/emacs-devel/2016-04/msg00746.html.
:font "-outline-Arial-normal-normal-normal-sans-*-*-*-*-p-*-iso8859-1") :font "-outline-Arial-normal-normal-normal-sans-*-*-*-*-p-*-iso8859-1")
(t :family "Sans Serif")) (t :family "Sans Serif"))

View file

@ -837,6 +837,7 @@ See the command `isearch-forward-symbol' for more information."
(buffer-substring-no-properties (car bounds) (cdr bounds)))) (buffer-substring-no-properties (car bounds) (cdr bounds))))
(t (t
(setq isearch-error "No symbol at point") (setq isearch-error "No symbol at point")
(isearch-push-state)
(isearch-update))))) (isearch-update)))))