Merge from origin/emacs-25
c695fb3
; Spelling fixes03750c0
* doc/misc/texinfo.tex: Sync from gnulib.42fed3b
* lisp/isearch.el (isearch-forward-symbol-at-point): Add isea...
This commit is contained in:
commit
3354582b36
4 changed files with 19 additions and 6 deletions
|
@ -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.
|
||||||
|
|
|
@ -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
|
||||||
|
|
|
@ -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"))
|
||||||
|
|
|
@ -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)))))
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue