diff options
| author | John Wiegley | 2016-03-11 13:33:32 -0800 |
|---|---|---|
| committer | John Wiegley | 2016-03-11 13:33:32 -0800 |
| commit | 63efcc268635dea78c6bd80749eae4ee2c72d717 (patch) | |
| tree | 888b43de0eb148cf46a129a15f08a80caa8a5dfe | |
| parent | b4fbd69b66a927ad8ff479bee6ca57e977d7e649 (diff) | |
| parent | facb5e20ce186e47506860bde982e35020fedce5 (diff) | |
| download | emacs-63efcc268635dea78c6bd80749eae4ee2c72d717.tar.gz emacs-63efcc268635dea78c6bd80749eae4ee2c72d717.zip | |
Merge from origin/emacs-25
facb5e2 Update Emacs manual section related to character folding
4efea8e ; * etc/DEBUG: Fix a typo. (Bug#22984)
f8df21b Update admin/notes/unicode
950be68 Add symref-filepattern entries for c?perl-mode
8b8a6ad Don't use XRANDR 1.3 extensions if the server doesn't support them.
985dacf ; NEWS update for the last change in etags
741a6f8 Sync with gnulib
7352c6c Rework C source files to avoid ^(
a589e9a By default, etags produces unqualified Perl tag names
72c7438 Indent methods with keyword names correctly
28532a9 Propertize character literals and special global variables
differently
a7d6f39 ; Fix last change in NEWS
83b2a20 Change how /etc/NEWS presents character folding
b417c5a Revert "Revert "Backport: * lisp/isearch.el: Turn char-folding
off by default""
711ca36 Properly handle lambda as read function (bug 22961)
1b9d616 Propertize operator symbol names with symbol syntax class
9b16bc2 Stop recognizing :#{} as symbol in ruby-mode
366ec77 Allow using the left shift operator without spaces on both sides
02bf7cc Properly handle unquoting in wdired (bug 22938)
16cf469 ; Spelling fix and tighten up comment
f50bc04 Allow splat operator before percent literal
991c801 Don't apply the return value of goto-char as syntax class
6e63b3e Guard against nested percent literals
066f3bc Recognize iuwu-mod after an escaped newline
6f7a57c Fix symbolic mode string conversion for s and t
50b9826 Update 'ucs-names' database
993b2fb Improve doc string of 'shell-command'
b71c717 Make the code in movemail_strftime more general
cc057e4 Speed up redisplay of binary files with long series of nulls
e51b27e Remove the highlighting support for quoting 'like this' inside
Lisp docstrings
b1abce1 Restore leading space in movemail pop output
98b8d44 Fix bidi-paragraph-direction in Rmail view buffer
dc9d837 Don't misindent computed property generator methods
7923112 Fix mbox files produced by movemail on MS-Windows
c45a1ca doc string file descriptor exhaustion fix
265141b Fix Bug#22814
257 files changed, 1386 insertions, 1316 deletions
diff --git a/admin/alloc-colors.c b/admin/alloc-colors.c index 9f6161ef0d9..3158cf40bad 100644 --- a/admin/alloc-colors.c +++ b/admin/alloc-colors.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/admin/notes/unicode b/admin/notes/unicode index 51314b199f6..0b2ce90067a 100644 --- a/admin/notes/unicode +++ b/admin/notes/unicode | |||
| @@ -10,7 +10,9 @@ Emacs uses the following files from the Unicode Character Database | |||
| 10 | (a.k.a. "UCD): | 10 | (a.k.a. "UCD): |
| 11 | 11 | ||
| 12 | . UnicodeData.txt | 12 | . UnicodeData.txt |
| 13 | . Blocks.txt | ||
| 13 | . BidiMirroring.txt | 14 | . BidiMirroring.txt |
| 15 | . BidiBrackets.txt | ||
| 14 | . IVD_Sequences.txt | 16 | . IVD_Sequences.txt |
| 15 | 17 | ||
| 16 | First, these files need to be copied into admin/unidata/, and then | 18 | First, these files need to be copied into admin/unidata/, and then |
| @@ -37,6 +39,11 @@ Any new scripts added by UnicodeData.txt will also need updates to | |||
| 37 | script-representative-chars defined in fontset.el. Other databases in | 39 | script-representative-chars defined in fontset.el. Other databases in |
| 38 | fontset.el might also need to be updated as needed. | 40 | fontset.el might also need to be updated as needed. |
| 39 | 41 | ||
| 42 | The function 'ucs-names', defined in lisp/international/mule-cmds.el, | ||
| 43 | might need to be updated because it knows about used and unused ranges | ||
| 44 | of Unicode codepoints, which a new release of the Unicode Standard | ||
| 45 | could change. | ||
| 46 | |||
| 40 | Problems, fixmes and other unicode-related issues | 47 | Problems, fixmes and other unicode-related issues |
| 41 | ------------------------------------------------------------- | 48 | ------------------------------------------------------------- |
| 42 | 49 | ||
diff --git a/configure.ac b/configure.ac index 940a1e23b3c..39ded74e44e 100644 --- a/configure.ac +++ b/configure.ac | |||
| @@ -3600,14 +3600,6 @@ if test "${HAVE_X11}" = "yes"; then | |||
| 3600 | fi | 3600 | fi |
| 3601 | fi | 3601 | fi |
| 3602 | if test $HAVE_XRANDR = yes; then | 3602 | if test $HAVE_XRANDR = yes; then |
| 3603 | SAVE_CFLAGS="$CFLAGS" | ||
| 3604 | SAVE_LIBS="$LIBS" | ||
| 3605 | CFLAGS="$XRANDR_CFLAGS $CFLAGS" | ||
| 3606 | LIBS="$XRANDR_LIBS $LIBS" | ||
| 3607 | AC_CHECK_FUNCS(XRRGetOutputPrimary XRRGetScreenResourcesCurrent) | ||
| 3608 | CFLAGS="$SAVE_CFLAGS" | ||
| 3609 | LIBS="$SAVE_LIBS" | ||
| 3610 | |||
| 3611 | AC_DEFINE(HAVE_XRANDR, 1, [Define to 1 if you have the XRandr extension.]) | 3603 | AC_DEFINE(HAVE_XRANDR, 1, [Define to 1 if you have the XRandr extension.]) |
| 3612 | fi | 3604 | fi |
| 3613 | fi | 3605 | fi |
| @@ -5116,8 +5108,8 @@ This file is part of GNU Emacs. | |||
| 5116 | 5108 | ||
| 5117 | GNU Emacs is free software: you can redistribute it and/or modify | 5109 | GNU Emacs is free software: you can redistribute it and/or modify |
| 5118 | it under the terms of the GNU General Public License as published by | 5110 | it under the terms of the GNU General Public License as published by |
| 5119 | the Free Software Foundation, either version 3 of the License, or | 5111 | the Free Software Foundation, either version 3 of the License, or (at |
| 5120 | (at your option) any later version. | 5112 | your option) any later version. |
| 5121 | 5113 | ||
| 5122 | GNU Emacs is distributed in the hope that it will be useful, | 5114 | GNU Emacs is distributed in the hope that it will be useful, |
| 5123 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 5115 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/doc/emacs/search.texi b/doc/emacs/search.texi index 10c1f73b331..459e8446937 100644 --- a/doc/emacs/search.texi +++ b/doc/emacs/search.texi | |||
| @@ -1265,14 +1265,14 @@ character sequences}. | |||
| 1265 | 1265 | ||
| 1266 | @kindex M-s ' @r{(Incremental Search)} | 1266 | @kindex M-s ' @r{(Incremental Search)} |
| 1267 | @findex isearch-toggle-character-fold | 1267 | @findex isearch-toggle-character-fold |
| 1268 | Generally, search commands in Emacs by default perform character | 1268 | Generally, search commands in Emacs do not by default perform |
| 1269 | folding, thus matching equivalent character sequences. You can | 1269 | character folding in order to match equivalent character sequences. |
| 1270 | disable this behavior by customizing the variable | 1270 | You can enable this behavior by customizing the variable |
| 1271 | @code{search-default-mode} to @code{nil}. @xref{Search | 1271 | @code{search-default-mode} to @code{character-fold-to-regexp}. |
| 1272 | Customizations}. Within an incremental search, typing @kbd{M-s '} | 1272 | @xref{Search Customizations}. Within an incremental search, typing |
| 1273 | (@code{isearch-toggle-character-fold}) toggles character folding, but | 1273 | @kbd{M-s '} (@code{isearch-toggle-character-fold}) toggles character |
| 1274 | only for that search. (Replace commands have a different default, | 1274 | folding, but only for that search. (Replace commands have a different |
| 1275 | controlled by a separate option; see @ref{Replacement and Lax | 1275 | default, controlled by a separate option; see @ref{Replacement and Lax |
| 1276 | Matches}.) | 1276 | Matches}.) |
| 1277 | 1277 | ||
| 1278 | Like with case folding, typing an explicit variant of a character, | 1278 | Like with case folding, typing an explicit variant of a character, |
| @@ -1806,9 +1806,8 @@ do literal searches without character folding, but with case folding | |||
| 1806 | and lax-whitespace matches as determined by @code{case-fold-search} | 1806 | and lax-whitespace matches as determined by @code{case-fold-search} |
| 1807 | and @code{search-whitespace-regexp}, respectively (@pxref{Lax | 1807 | and @code{search-whitespace-regexp}, respectively (@pxref{Lax |
| 1808 | Search}). If the value is @code{t}, incremental search defaults to | 1808 | Search}). If the value is @code{t}, incremental search defaults to |
| 1809 | regexp searches. The default value specifies a function that causes | 1809 | regexp searches. The default value specifies a function that only |
| 1810 | the default search mode to perform character folding in addition to | 1810 | performs case folding and lax-whitespace matching. |
| 1811 | case folding and lax-whitespace matching. | ||
| 1812 | 1811 | ||
| 1813 | @vindex search-highlight | 1812 | @vindex search-highlight |
| 1814 | The current match of an on-going incremental search is highlighted | 1813 | The current match of an on-going incremental search is highlighted |
diff --git a/doc/man/etags.1 b/doc/man/etags.1 index 87353a1cedc..d5fdc5f943a 100644 --- a/doc/man/etags.1 +++ b/doc/man/etags.1 | |||
| @@ -139,10 +139,10 @@ May be used (only once) in place of a file name on the command line. | |||
| 139 | \fBetags\fP will read from standard input and mark the produced tags | 139 | \fBetags\fP will read from standard input and mark the produced tags |
| 140 | as belonging to the file \fBFILE\fP. | 140 | as belonging to the file \fBFILE\fP. |
| 141 | .TP | 141 | .TP |
| 142 | \fB\-\-class\-qualify\fP | 142 | \fB \-Q, \-\-class\-qualify\fP |
| 143 | Qualify tag names with their class name in C++, ObjC, and Java. | 143 | Qualify tag names with their class name in C++, ObjC, Java, and Perl. |
| 144 | This produces tag names of the form \fIclass\fP\fB::\fP\fImember\fP | 144 | This produces tag names of the form \fIclass\fP\fB::\fP\fImember\fP |
| 145 | for C++, | 145 | for C++ and Perl, |
| 146 | \fIclass\fP\fB(\fP\fIcategory\fP\fB)\fP for Objective C, and \fIclass\fP\fB.\fP\fImember\fP for Java. | 146 | \fIclass\fP\fB(\fP\fIcategory\fP\fB)\fP for Objective C, and \fIclass\fP\fB.\fP\fImember\fP for Java. |
| 147 | For Objective C, this also produces class methods qualified with | 147 | For Objective C, this also produces class methods qualified with |
| 148 | their arguments, as in \fIfoo\fP\fB:\fP\fIbar\fP\fB:\fP\fIbaz\fP\fB:\fP\fImore\fP. | 148 | their arguments, as in \fIfoo\fP\fB:\fP\fIbar\fP\fB:\fP\fIbaz\fP\fB:\fP\fImore\fP. |
diff --git a/doc/misc/texinfo.tex b/doc/misc/texinfo.tex index 08baf5da257..d04e2ddd3b3 100644 --- a/doc/misc/texinfo.tex +++ b/doc/misc/texinfo.tex | |||
| @@ -3,7 +3,7 @@ | |||
| 3 | % Load plain if necessary, i.e., if running under initex. | 3 | % Load plain if necessary, i.e., if running under initex. |
| 4 | \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi | 4 | \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi |
| 5 | % | 5 | % |
| 6 | \def\texinfoversion{2016-02-16.15} | 6 | \def\texinfoversion{2016-03-06.18} |
| 7 | % | 7 | % |
| 8 | % Copyright 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995, | 8 | % Copyright 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995, |
| 9 | % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, | 9 | % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, |
| @@ -1525,7 +1525,7 @@ output) for that.)} | |||
| 1525 | \def\pdfmkdest#1{{% | 1525 | \def\pdfmkdest#1{{% |
| 1526 | % We have to set dummies so commands such as @code, and characters | 1526 | % We have to set dummies so commands such as @code, and characters |
| 1527 | % such as \, aren't expanded when present in a section title. | 1527 | % such as \, aren't expanded when present in a section title. |
| 1528 | \indexnofonts | 1528 | \indexnofonts % For avoiding UTF-16 convert issue of xdvipdfmx 20150315. |
| 1529 | \makevalueexpandable | 1529 | \makevalueexpandable |
| 1530 | % In the case of XeTeX, xdvipdfmx converts strings to UTF-16. | 1530 | % In the case of XeTeX, xdvipdfmx converts strings to UTF-16. |
| 1531 | % Therefore \txiescapepdf is not necessary. | 1531 | % Therefore \txiescapepdf is not necessary. |
| @@ -1574,7 +1574,7 @@ output) for that.)} | |||
| 1574 | % In the case of XeTeX, xdvipdfmx converts strings to UTF-16. | 1574 | % In the case of XeTeX, xdvipdfmx converts strings to UTF-16. |
| 1575 | % Therefore, the encoding and the language may not be considered. | 1575 | % Therefore, the encoding and the language may not be considered. |
| 1576 | % | 1576 | % |
| 1577 | \indexnofonts | 1577 | \indexnofonts % For avoiding UTF-16 convert issue of xdvipdfmx 20150315. |
| 1578 | \setupdatafile | 1578 | \setupdatafile |
| 1579 | % We can have normal brace characters in the PDF outlines, unlike | 1579 | % We can have normal brace characters in the PDF outlines, unlike |
| 1580 | % Texinfo index files. So set that up. | 1580 | % Texinfo index files. So set that up. |
| @@ -1591,16 +1591,11 @@ output) for that.)} | |||
| 1591 | ] | 1591 | ] |
| 1592 | 1592 | ||
| 1593 | \special{pdf:docview << /PageMode /UseOutlines >> } | 1593 | \special{pdf:docview << /PageMode /UseOutlines >> } |
| 1594 | \openin 1 uptex.tex % upTeX has UTF8-UTF16 cmap | 1594 | % ``\special{pdf:tounicode ...}'' is not necessary |
| 1595 | \ifeof 1 | 1595 | % because xdvipdfmx converts strings from UTF-8 to UTF-16 without it. |
| 1596 | % upTeX does not exist. To use UTF8-UCS2 cmap. | 1596 | % However, due to UTF-16 convert issue of xdvipdfmx 20150315, |
| 1597 | % In this case, non-BMP characters (over U+FFFF) can not be used. | 1597 | % ``\special{pdf:dest ...}'' can not handle non-ASCII strings. |
| 1598 | \special{pdf:tounicode UTF8-UCS2} | 1598 | % It fixed by xdvipdfmx 20160106 (TeX Live SVN r39753). |
| 1599 | \else | ||
| 1600 | % upTeX exists. To use UTF8-UTF16 cmap. | ||
| 1601 | % Non-BMP characters (over U+FFFF) can be used. | ||
| 1602 | \special{pdf:tounicode UTF8-UTF16} | ||
| 1603 | \fi | ||
| 1604 | \fi | 1599 | \fi |
| 1605 | 1600 | ||
| 1606 | % | 1601 | % |
| @@ -3477,13 +3472,16 @@ end | |||
| 3477 | \newif\ifseenauthor | 3472 | \newif\ifseenauthor |
| 3478 | \newif\iffinishedtitlepage | 3473 | \newif\iffinishedtitlepage |
| 3479 | 3474 | ||
| 3480 | % Do an implicit @contents or @shortcontents after @end titlepage if the | 3475 | % @setcontentsaftertitlepage used to do an implicit @contents or |
| 3481 | % user says @setcontentsaftertitlepage or @setshortcontentsaftertitlepage. | 3476 | % @shortcontents after @end titlepage, but it is now obsolete. |
| 3482 | % | 3477 | \def\setcontentsaftertitlepage{% |
| 3483 | \newif\ifsetcontentsaftertitlepage | 3478 | \errmessage{@setcontentsaftertitlepage has been removed as a Texinfo |
| 3484 | \let\setcontentsaftertitlepage = \setcontentsaftertitlepagetrue | 3479 | command; move your @contents command if you want the contents |
| 3485 | \newif\ifsetshortcontentsaftertitlepage | 3480 | after the title page.}}% |
| 3486 | \let\setshortcontentsaftertitlepage = \setshortcontentsaftertitlepagetrue | 3481 | \def\setshortcontentsaftertitlepage{% |
| 3482 | \errmessage{@setshortcontentsaftertitlepage has been removed as a Texinfo | ||
| 3483 | command; move your @shortcontents and @contents commands if you | ||
| 3484 | want the contents after the title page.}}% | ||
| 3487 | 3485 | ||
| 3488 | \parseargdef\shorttitlepage{% | 3486 | \parseargdef\shorttitlepage{% |
| 3489 | \begingroup \hbox{}\vskip 1.5in \chaprm \centerline{#1}% | 3487 | \begingroup \hbox{}\vskip 1.5in \chaprm \centerline{#1}% |
| @@ -3525,20 +3523,6 @@ end | |||
| 3525 | % Need this before the \...aftertitlepage checks so that if they are | 3523 | % Need this before the \...aftertitlepage checks so that if they are |
| 3526 | % in effect the toc pages will come out with page numbers. | 3524 | % in effect the toc pages will come out with page numbers. |
| 3527 | \HEADINGSon | 3525 | \HEADINGSon |
| 3528 | % | ||
| 3529 | % If they want short, they certainly want long too. | ||
| 3530 | \ifsetshortcontentsaftertitlepage | ||
| 3531 | \shortcontents | ||
| 3532 | \contents | ||
| 3533 | \global\let\shortcontents = \relax | ||
| 3534 | \global\let\contents = \relax | ||
| 3535 | \fi | ||
| 3536 | % | ||
| 3537 | \ifsetcontentsaftertitlepage | ||
| 3538 | \contents | ||
| 3539 | \global\let\contents = \relax | ||
| 3540 | \global\let\shortcontents = \relax | ||
| 3541 | \fi | ||
| 3542 | } | 3526 | } |
| 3543 | 3527 | ||
| 3544 | \def\finishtitlepage{% | 3528 | \def\finishtitlepage{% |
| @@ -6371,30 +6355,6 @@ end | |||
| 6371 | } | 6355 | } |
| 6372 | 6356 | ||
| 6373 | 6357 | ||
| 6374 | % I don't think this chapter style is supported any more, so I'm not | ||
| 6375 | % updating it with the new noderef stuff. We'll see. --karl, 11aug03. | ||
| 6376 | % | ||
| 6377 | \parseargdef\setchapterstyle{\csname CHAPF#1\endcsname} | ||
| 6378 | % | ||
| 6379 | \def\unnchfopen #1{% | ||
| 6380 | \chapoddpage | ||
| 6381 | \vbox{\chapfonts \raggedtitlesettings #1\par}% | ||
| 6382 | \nobreak\bigskip\nobreak | ||
| 6383 | } | ||
| 6384 | \def\chfopen #1#2{\chapoddpage {\chapfonts | ||
| 6385 | \vbox to 3in{\vfil \hbox to\hsize{\hfil #2} \hbox to\hsize{\hfil #1} \vfil}}% | ||
| 6386 | \par\penalty 5000 % | ||
| 6387 | } | ||
| 6388 | \def\centerchfopen #1{% | ||
| 6389 | \chapoddpage | ||
| 6390 | \vbox{\chapfonts \raggedtitlesettings \hfill #1\hfill}% | ||
| 6391 | \nobreak\bigskip \nobreak | ||
| 6392 | } | ||
| 6393 | \def\CHAPFopen{% | ||
| 6394 | \global\let\chapmacro=\chfopen | ||
| 6395 | \global\let\centerchapmacro=\centerchfopen} | ||
| 6396 | |||
| 6397 | |||
| 6398 | % Section titles. These macros combine the section number parts and | 6358 | % Section titles. These macros combine the section number parts and |
| 6399 | % call the generic \sectionheading to do the printing. | 6359 | % call the generic \sectionheading to do the printing. |
| 6400 | % | 6360 | % |
| @@ -7839,7 +7799,7 @@ end | |||
| 7839 | % Argument is macro body with arguments substituted | 7799 | % Argument is macro body with arguments substituted |
| 7840 | \def\scanmacro#1{% | 7800 | \def\scanmacro#1{% |
| 7841 | \newlinechar`\^^M | 7801 | \newlinechar`\^^M |
| 7842 | \def\xprocessmacroarg{\eatspaces}% | 7802 | \def\xeatspaces{\eatspaces}% |
| 7843 | % | 7803 | % |
| 7844 | % Process the macro body under the current catcode regime. | 7804 | % Process the macro body under the current catcode regime. |
| 7845 | \scantokens{#1\texinfoc}\aftermacro% | 7805 | \scantokens{#1\texinfoc}\aftermacro% |
| @@ -7935,7 +7895,7 @@ end | |||
| 7935 | \catcode`\_=\other | 7895 | \catcode`\_=\other |
| 7936 | \catcode`\|=\other | 7896 | \catcode`\|=\other |
| 7937 | \catcode`\~=\other | 7897 | \catcode`\~=\other |
| 7938 | \ifx\declaredencoding\ascii \else \setcharscatcodeothernonglobal \fi | 7898 | \passthroughcharstrue |
| 7939 | } | 7899 | } |
| 7940 | 7900 | ||
| 7941 | \def\scanargctxt{% used for copying and captions, not macros. | 7901 | \def\scanargctxt{% used for copying and captions, not macros. |
| @@ -8069,7 +8029,7 @@ end | |||
| 8069 | \paramno=0\def\paramlist{}% | 8029 | \paramno=0\def\paramlist{}% |
| 8070 | \let\hash\relax | 8030 | \let\hash\relax |
| 8071 | % \hash is redefined to `#' later to get it into definitions | 8031 | % \hash is redefined to `#' later to get it into definitions |
| 8072 | \let\processmacroarg\relax | 8032 | \let\xeatspaces\relax |
| 8073 | \parsemargdefxxx#1,;,% | 8033 | \parsemargdefxxx#1,;,% |
| 8074 | \ifnum\paramno<10\relax\else | 8034 | \ifnum\paramno<10\relax\else |
| 8075 | \paramno0\relax | 8035 | \paramno0\relax |
| @@ -8081,7 +8041,7 @@ end | |||
| 8081 | \else \let\next=\parsemargdefxxx | 8041 | \else \let\next=\parsemargdefxxx |
| 8082 | \advance\paramno by 1 | 8042 | \advance\paramno by 1 |
| 8083 | \expandafter\edef\csname macarg.\eatspaces{#1}\endcsname | 8043 | \expandafter\edef\csname macarg.\eatspaces{#1}\endcsname |
| 8084 | {\processmacroarg{\hash\the\paramno}}% | 8044 | {\xeatspaces{\hash\the\paramno}}% |
| 8085 | \edef\paramlist{\paramlist\hash\the\paramno,}% | 8045 | \edef\paramlist{\paramlist\hash\the\paramno,}% |
| 8086 | \fi\next} | 8046 | \fi\next} |
| 8087 | 8047 | ||
| @@ -8307,16 +8267,9 @@ end | |||
| 8307 | %%%%%%%%%%%%%% End of code for > 10 arguments %%%%%%%%%%%%%%%%%% | 8267 | %%%%%%%%%%%%%% End of code for > 10 arguments %%%%%%%%%%%%%%%%%% |
| 8308 | 8268 | ||
| 8309 | 8269 | ||
| 8310 | |||
| 8311 | % Remove following spaces at the expansion stage. | ||
| 8312 | % This works because spaces are discarded before each argument when TeX is | ||
| 8313 | % getting the arguments for a macro. | ||
| 8314 | % This must not be immediately followed by a }. | ||
| 8315 | \long\def\gobblespaces#1{#1} | ||
| 8316 | |||
| 8317 | % This defines a Texinfo @macro or @rmacro, called by \parsemacbody. | 8270 | % This defines a Texinfo @macro or @rmacro, called by \parsemacbody. |
| 8318 | % \macrobody has the body of the macro in it, with placeholders for | 8271 | % \macrobody has the body of the macro in it, with placeholders for |
| 8319 | % its parameters, looking like "\processmacroarg{\hash 1}". | 8272 | % its parameters, looking like "\xeatspaces{\hash 1}". |
| 8320 | % \paramno is the number of parameters | 8273 | % \paramno is the number of parameters |
| 8321 | % \paramlist is a TeX parameter text, e.g. "#1,#2,#3," | 8274 | % \paramlist is a TeX parameter text, e.g. "#1,#2,#3," |
| 8322 | % There are eight cases: recursive and nonrecursive macros of zero, one, | 8275 | % There are eight cases: recursive and nonrecursive macros of zero, one, |
| @@ -8327,14 +8280,13 @@ end | |||
| 8327 | \def\defmacro{% | 8280 | \def\defmacro{% |
| 8328 | \let\hash=##% convert placeholders to macro parameter chars | 8281 | \let\hash=##% convert placeholders to macro parameter chars |
| 8329 | \ifnum\paramno=1 | 8282 | \ifnum\paramno=1 |
| 8330 | \def\processmacroarg{\gobblespaces}% | 8283 | \def\xeatspaces##1{##1}% |
| 8331 | % This removes the pair of braces around the argument. We don't | 8284 | % This removes the pair of braces around the argument. We don't |
| 8332 | % use \eatspaces, because this can cause ends of lines to be lost | 8285 | % use \eatspaces, because this can cause ends of lines to be lost |
| 8333 | % when the argument to \eatspaces is read, leading to line-based | 8286 | % when the argument to \eatspaces is read, leading to line-based |
| 8334 | % commands like "@itemize" not being read correctly. | 8287 | % commands like "@itemize" not being read correctly. |
| 8335 | \else | 8288 | \else |
| 8336 | \def\processmacroarg{\xprocessmacroarg}% | 8289 | \let\xeatspaces\relax % suppress expansion |
| 8337 | \let\xprocessmacroarg\relax | ||
| 8338 | \fi | 8290 | \fi |
| 8339 | \ifrecursive %%%%%%%%%%%%%% Recursive %%%%%%%%%%%%%%%%%%%%%%%%%%%%% | 8291 | \ifrecursive %%%%%%%%%%%%%% Recursive %%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
| 8340 | \ifcase\paramno | 8292 | \ifcase\paramno |
| @@ -8347,12 +8299,9 @@ end | |||
| 8347 | \noexpand\braceorline | 8299 | \noexpand\braceorline |
| 8348 | \expandafter\noexpand\csname\the\macname @@@\endcsname}% | 8300 | \expandafter\noexpand\csname\the\macname @@@\endcsname}% |
| 8349 | \expandafter\xdef\csname\the\macname @@@\endcsname##1{% | 8301 | \expandafter\xdef\csname\the\macname @@@\endcsname##1{% |
| 8350 | \expandafter\noexpand\csname\the\macname @@@@\endcsname{% | 8302 | \egroup |
| 8351 | \noexpand\gobblespaces##1\empty}% | 8303 | \noexpand\scanmacro{\macrobody}% |
| 8352 | % The \empty is for \gobblespaces in case #1 is empty | 8304 | }% |
| 8353 | }% | ||
| 8354 | \expandafter\xdef\csname\the\macname @@@@\endcsname##1{% | ||
| 8355 | \egroup\noexpand\scanmacro{\macrobody}}% | ||
| 8356 | \else | 8305 | \else |
| 8357 | \ifnum\paramno<10\relax % at most 9 | 8306 | \ifnum\paramno<10\relax % at most 9 |
| 8358 | % See non-recursive section below for comments | 8307 | % See non-recursive section below for comments |
| @@ -8391,11 +8340,6 @@ end | |||
| 8391 | \noexpand\braceorline | 8340 | \noexpand\braceorline |
| 8392 | \expandafter\noexpand\csname\the\macname @@@\endcsname}% | 8341 | \expandafter\noexpand\csname\the\macname @@@\endcsname}% |
| 8393 | \expandafter\xdef\csname\the\macname @@@\endcsname##1{% | 8342 | \expandafter\xdef\csname\the\macname @@@\endcsname##1{% |
| 8394 | \expandafter\noexpand\csname\the\macname @@@@\endcsname{% | ||
| 8395 | \noexpand\gobblespaces##1\empty}% | ||
| 8396 | % The \empty is for \gobblespaces in case #1 is empty | ||
| 8397 | }% | ||
| 8398 | \expandafter\xdef\csname\the\macname @@@@\endcsname##1{% | ||
| 8399 | \egroup | 8343 | \egroup |
| 8400 | \noexpand\scanmacro{\macrobody}% | 8344 | \noexpand\scanmacro{\macrobody}% |
| 8401 | }% | 8345 | }% |
| @@ -9049,9 +8993,6 @@ end | |||
| 9049 | % now. --karl, 15jan04. | 8993 | % now. --karl, 15jan04. |
| 9050 | \catcode`\\=\other | 8994 | \catcode`\\=\other |
| 9051 | % | 8995 | % |
| 9052 | % Make the characters 128-255 be printing characters. | ||
| 9053 | {\setcharscatcodeothernonglobal}% | ||
| 9054 | % | ||
| 9055 | % @ is our escape character in .aux files, and we need braces. | 8996 | % @ is our escape character in .aux files, and we need braces. |
| 9056 | \catcode`\{=1 | 8997 | \catcode`\{=1 |
| 9057 | \catcode`\}=2 | 8998 | \catcode`\}=2 |
| @@ -9815,109 +9756,119 @@ directory should work if nowhere else does.} | |||
| 9815 | % macros containing the character definitions. | 9756 | % macros containing the character definitions. |
| 9816 | \setnonasciicharscatcode\active | 9757 | \setnonasciicharscatcode\active |
| 9817 | % | 9758 | % |
| 9759 | |||
| 9760 | \def\gdefchar#1#2{% | ||
| 9761 | \gdef#1{% | ||
| 9762 | \ifpassthroughchars | ||
| 9763 | \string#1% | ||
| 9764 | \else | ||
| 9765 | #2% | ||
| 9766 | \fi | ||
| 9767 | }} | ||
| 9768 | |||
| 9818 | % Latin1 (ISO-8859-1) character definitions. | 9769 | % Latin1 (ISO-8859-1) character definitions. |
| 9819 | \def\latonechardefs{% | 9770 | \def\latonechardefs{% |
| 9820 | \gdef^^a0{\tie} | 9771 | \gdefchar^^a0{\tie} |
| 9821 | \gdef^^a1{\exclamdown} | 9772 | \gdefchar^^a1{\exclamdown} |
| 9822 | \gdef^^a2{{\tcfont \char162}} % cent | 9773 | \gdefchar^^a2{{\tcfont \char162}} % cent |
| 9823 | \gdef^^a3{\pounds} | 9774 | \gdefchar^^a3{\pounds} |
| 9824 | \gdef^^a4{{\tcfont \char164}} % currency | 9775 | \gdefchar^^a4{{\tcfont \char164}} % currency |
| 9825 | \gdef^^a5{{\tcfont \char165}} % yen | 9776 | \gdefchar^^a5{{\tcfont \char165}} % yen |
| 9826 | \gdef^^a6{{\tcfont \char166}} % broken bar | 9777 | \gdefchar^^a6{{\tcfont \char166}} % broken bar |
| 9827 | \gdef^^a7{\S} | 9778 | \gdefchar^^a7{\S} |
| 9828 | \gdef^^a8{\"{}} | 9779 | \gdefchar^^a8{\"{}} |
| 9829 | \gdef^^a9{\copyright} | 9780 | \gdefchar^^a9{\copyright} |
| 9830 | \gdef^^aa{\ordf} | 9781 | \gdefchar^^aa{\ordf} |
| 9831 | \gdef^^ab{\guillemetleft} | 9782 | \gdefchar^^ab{\guillemetleft} |
| 9832 | \gdef^^ac{\ensuremath\lnot} | 9783 | \gdefchar^^ac{\ensuremath\lnot} |
| 9833 | \gdef^^ad{\-} | 9784 | \gdefchar^^ad{\-} |
| 9834 | \gdef^^ae{\registeredsymbol} | 9785 | \gdefchar^^ae{\registeredsymbol} |
| 9835 | \gdef^^af{\={}} | 9786 | \gdefchar^^af{\={}} |
| 9836 | % | 9787 | % |
| 9837 | \gdef^^b0{\textdegree} | 9788 | \gdefchar^^b0{\textdegree} |
| 9838 | \gdef^^b1{$\pm$} | 9789 | \gdefchar^^b1{$\pm$} |
| 9839 | \gdef^^b2{$^2$} | 9790 | \gdefchar^^b2{$^2$} |
| 9840 | \gdef^^b3{$^3$} | 9791 | \gdefchar^^b3{$^3$} |
| 9841 | \gdef^^b4{\'{}} | 9792 | \gdefchar^^b4{\'{}} |
| 9842 | \gdef^^b5{$\mu$} | 9793 | \gdefchar^^b5{$\mu$} |
| 9843 | \gdef^^b6{\P} | 9794 | \gdefchar^^b6{\P} |
| 9844 | \gdef^^b7{\ensuremath\cdot} | 9795 | \gdefchar^^b7{\ensuremath\cdot} |
| 9845 | \gdef^^b8{\cedilla\ } | 9796 | \gdefchar^^b8{\cedilla\ } |
| 9846 | \gdef^^b9{$^1$} | 9797 | \gdefchar^^b9{$^1$} |
| 9847 | \gdef^^ba{\ordm} | 9798 | \gdefchar^^ba{\ordm} |
| 9848 | \gdef^^bb{\guillemetright} | 9799 | \gdefchar^^bb{\guillemetright} |
| 9849 | \gdef^^bc{$1\over4$} | 9800 | \gdefchar^^bc{$1\over4$} |
| 9850 | \gdef^^bd{$1\over2$} | 9801 | \gdefchar^^bd{$1\over2$} |
| 9851 | \gdef^^be{$3\over4$} | 9802 | \gdefchar^^be{$3\over4$} |
| 9852 | \gdef^^bf{\questiondown} | 9803 | \gdefchar^^bf{\questiondown} |
| 9853 | % | 9804 | % |
| 9854 | \gdef^^c0{\`A} | 9805 | \gdefchar^^c0{\`A} |
| 9855 | \gdef^^c1{\'A} | 9806 | \gdefchar^^c1{\'A} |
| 9856 | \gdef^^c2{\^A} | 9807 | \gdefchar^^c2{\^A} |
| 9857 | \gdef^^c3{\~A} | 9808 | \gdefchar^^c3{\~A} |
| 9858 | \gdef^^c4{\"A} | 9809 | \gdefchar^^c4{\"A} |
| 9859 | \gdef^^c5{\ringaccent A} | 9810 | \gdefchar^^c5{\ringaccent A} |
| 9860 | \gdef^^c6{\AE} | 9811 | \gdefchar^^c6{\AE} |
| 9861 | \gdef^^c7{\cedilla C} | 9812 | \gdefchar^^c7{\cedilla C} |
| 9862 | \gdef^^c8{\`E} | 9813 | \gdefchar^^c8{\`E} |
| 9863 | \gdef^^c9{\'E} | 9814 | \gdefchar^^c9{\'E} |
| 9864 | \gdef^^ca{\^E} | 9815 | \gdefchar^^ca{\^E} |
| 9865 | \gdef^^cb{\"E} | 9816 | \gdefchar^^cb{\"E} |
| 9866 | \gdef^^cc{\`I} | 9817 | \gdefchar^^cc{\`I} |
| 9867 | \gdef^^cd{\'I} | 9818 | \gdefchar^^cd{\'I} |
| 9868 | \gdef^^ce{\^I} | 9819 | \gdefchar^^ce{\^I} |
| 9869 | \gdef^^cf{\"I} | 9820 | \gdefchar^^cf{\"I} |
| 9870 | % | 9821 | % |
| 9871 | \gdef^^d0{\DH} | 9822 | \gdefchar^^d0{\DH} |
| 9872 | \gdef^^d1{\~N} | 9823 | \gdefchar^^d1{\~N} |
| 9873 | \gdef^^d2{\`O} | 9824 | \gdefchar^^d2{\`O} |
| 9874 | \gdef^^d3{\'O} | 9825 | \gdefchar^^d3{\'O} |
| 9875 | \gdef^^d4{\^O} | 9826 | \gdefchar^^d4{\^O} |
| 9876 | \gdef^^d5{\~O} | 9827 | \gdefchar^^d5{\~O} |
| 9877 | \gdef^^d6{\"O} | 9828 | \gdefchar^^d6{\"O} |
| 9878 | \gdef^^d7{$\times$} | 9829 | \gdefchar^^d7{$\times$} |
| 9879 | \gdef^^d8{\O} | 9830 | \gdefchar^^d8{\O} |
| 9880 | \gdef^^d9{\`U} | 9831 | \gdefchar^^d9{\`U} |
| 9881 | \gdef^^da{\'U} | 9832 | \gdefchar^^da{\'U} |
| 9882 | \gdef^^db{\^U} | 9833 | \gdefchar^^db{\^U} |
| 9883 | \gdef^^dc{\"U} | 9834 | \gdefchar^^dc{\"U} |
| 9884 | \gdef^^dd{\'Y} | 9835 | \gdefchar^^dd{\'Y} |
| 9885 | \gdef^^de{\TH} | 9836 | \gdefchar^^de{\TH} |
| 9886 | \gdef^^df{\ss} | 9837 | \gdefchar^^df{\ss} |
| 9887 | % | 9838 | % |
| 9888 | \gdef^^e0{\`a} | 9839 | \gdefchar^^e0{\`a} |
| 9889 | \gdef^^e1{\'a} | 9840 | \gdefchar^^e1{\'a} |
| 9890 | \gdef^^e2{\^a} | 9841 | \gdefchar^^e2{\^a} |
| 9891 | \gdef^^e3{\~a} | 9842 | \gdefchar^^e3{\~a} |
| 9892 | \gdef^^e4{\"a} | 9843 | \gdefchar^^e4{\"a} |
| 9893 | \gdef^^e5{\ringaccent a} | 9844 | \gdefchar^^e5{\ringaccent a} |
| 9894 | \gdef^^e6{\ae} | 9845 | \gdefchar^^e6{\ae} |
| 9895 | \gdef^^e7{\cedilla c} | 9846 | \gdefchar^^e7{\cedilla c} |
| 9896 | \gdef^^e8{\`e} | 9847 | \gdefchar^^e8{\`e} |
| 9897 | \gdef^^e9{\'e} | 9848 | \gdefchar^^e9{\'e} |
| 9898 | \gdef^^ea{\^e} | 9849 | \gdefchar^^ea{\^e} |
| 9899 | \gdef^^eb{\"e} | 9850 | \gdefchar^^eb{\"e} |
| 9900 | \gdef^^ec{\`{\dotless i}} | 9851 | \gdefchar^^ec{\`{\dotless i}} |
| 9901 | \gdef^^ed{\'{\dotless i}} | 9852 | \gdefchar^^ed{\'{\dotless i}} |
| 9902 | \gdef^^ee{\^{\dotless i}} | 9853 | \gdefchar^^ee{\^{\dotless i}} |
| 9903 | \gdef^^ef{\"{\dotless i}} | 9854 | \gdefchar^^ef{\"{\dotless i}} |
| 9904 | % | 9855 | % |
| 9905 | \gdef^^f0{\dh} | 9856 | \gdefchar^^f0{\dh} |
| 9906 | \gdef^^f1{\~n} | 9857 | \gdefchar^^f1{\~n} |
| 9907 | \gdef^^f2{\`o} | 9858 | \gdefchar^^f2{\`o} |
| 9908 | \gdef^^f3{\'o} | 9859 | \gdefchar^^f3{\'o} |
| 9909 | \gdef^^f4{\^o} | 9860 | \gdefchar^^f4{\^o} |
| 9910 | \gdef^^f5{\~o} | 9861 | \gdefchar^^f5{\~o} |
| 9911 | \gdef^^f6{\"o} | 9862 | \gdefchar^^f6{\"o} |
| 9912 | \gdef^^f7{$\div$} | 9863 | \gdefchar^^f7{$\div$} |
| 9913 | \gdef^^f8{\o} | 9864 | \gdefchar^^f8{\o} |
| 9914 | \gdef^^f9{\`u} | 9865 | \gdefchar^^f9{\`u} |
| 9915 | \gdef^^fa{\'u} | 9866 | \gdefchar^^fa{\'u} |
| 9916 | \gdef^^fb{\^u} | 9867 | \gdefchar^^fb{\^u} |
| 9917 | \gdef^^fc{\"u} | 9868 | \gdefchar^^fc{\"u} |
| 9918 | \gdef^^fd{\'y} | 9869 | \gdefchar^^fd{\'y} |
| 9919 | \gdef^^fe{\th} | 9870 | \gdefchar^^fe{\th} |
| 9920 | \gdef^^ff{\"y} | 9871 | \gdefchar^^ff{\"y} |
| 9921 | } | 9872 | } |
| 9922 | 9873 | ||
| 9923 | % Latin9 (ISO-8859-15) encoding character definitions. | 9874 | % Latin9 (ISO-8859-15) encoding character definitions. |
| @@ -9925,119 +9876,119 @@ directory should work if nowhere else does.} | |||
| 9925 | % Encoding is almost identical to Latin1. | 9876 | % Encoding is almost identical to Latin1. |
| 9926 | \latonechardefs | 9877 | \latonechardefs |
| 9927 | % | 9878 | % |
| 9928 | \gdef^^a4{\euro} | 9879 | \gdefchar^^a4{\euro} |
| 9929 | \gdef^^a6{\v S} | 9880 | \gdefchar^^a6{\v S} |
| 9930 | \gdef^^a8{\v s} | 9881 | \gdefchar^^a8{\v s} |
| 9931 | \gdef^^b4{\v Z} | 9882 | \gdefchar^^b4{\v Z} |
| 9932 | \gdef^^b8{\v z} | 9883 | \gdefchar^^b8{\v z} |
| 9933 | \gdef^^bc{\OE} | 9884 | \gdefchar^^bc{\OE} |
| 9934 | \gdef^^bd{\oe} | 9885 | \gdefchar^^bd{\oe} |
| 9935 | \gdef^^be{\"Y} | 9886 | \gdefchar^^be{\"Y} |
| 9936 | } | 9887 | } |
| 9937 | 9888 | ||
| 9938 | % Latin2 (ISO-8859-2) character definitions. | 9889 | % Latin2 (ISO-8859-2) character definitions. |
| 9939 | \def\lattwochardefs{% | 9890 | \def\lattwochardefs{% |
| 9940 | \gdef^^a0{\tie} | 9891 | \gdefchar^^a0{\tie} |
| 9941 | \gdef^^a1{\ogonek{A}} | 9892 | \gdefchar^^a1{\ogonek{A}} |
| 9942 | \gdef^^a2{\u{}} | 9893 | \gdefchar^^a2{\u{}} |
| 9943 | \gdef^^a3{\L} | 9894 | \gdefchar^^a3{\L} |
| 9944 | \gdef^^a4{\missingcharmsg{CURRENCY SIGN}} | 9895 | \gdefchar^^a4{\missingcharmsg{CURRENCY SIGN}} |
| 9945 | \gdef^^a5{\v L} | 9896 | \gdefchar^^a5{\v L} |
| 9946 | \gdef^^a6{\'S} | 9897 | \gdefchar^^a6{\'S} |
| 9947 | \gdef^^a7{\S} | 9898 | \gdefchar^^a7{\S} |
| 9948 | \gdef^^a8{\"{}} | 9899 | \gdefchar^^a8{\"{}} |
| 9949 | \gdef^^a9{\v S} | 9900 | \gdefchar^^a9{\v S} |
| 9950 | \gdef^^aa{\cedilla S} | 9901 | \gdefchar^^aa{\cedilla S} |
| 9951 | \gdef^^ab{\v T} | 9902 | \gdefchar^^ab{\v T} |
| 9952 | \gdef^^ac{\'Z} | 9903 | \gdefchar^^ac{\'Z} |
| 9953 | \gdef^^ad{\-} | 9904 | \gdefchar^^ad{\-} |
| 9954 | \gdef^^ae{\v Z} | 9905 | \gdefchar^^ae{\v Z} |
| 9955 | \gdef^^af{\dotaccent Z} | 9906 | \gdefchar^^af{\dotaccent Z} |
| 9956 | % | 9907 | % |
| 9957 | \gdef^^b0{\textdegree} | 9908 | \gdefchar^^b0{\textdegree} |
| 9958 | \gdef^^b1{\ogonek{a}} | 9909 | \gdefchar^^b1{\ogonek{a}} |
| 9959 | \gdef^^b2{\ogonek{ }} | 9910 | \gdefchar^^b2{\ogonek{ }} |
| 9960 | \gdef^^b3{\l} | 9911 | \gdefchar^^b3{\l} |
| 9961 | \gdef^^b4{\'{}} | 9912 | \gdefchar^^b4{\'{}} |
| 9962 | \gdef^^b5{\v l} | 9913 | \gdefchar^^b5{\v l} |
| 9963 | \gdef^^b6{\'s} | 9914 | \gdefchar^^b6{\'s} |
| 9964 | \gdef^^b7{\v{}} | 9915 | \gdefchar^^b7{\v{}} |
| 9965 | \gdef^^b8{\cedilla\ } | 9916 | \gdefchar^^b8{\cedilla\ } |
| 9966 | \gdef^^b9{\v s} | 9917 | \gdefchar^^b9{\v s} |
| 9967 | \gdef^^ba{\cedilla s} | 9918 | \gdefchar^^ba{\cedilla s} |
| 9968 | \gdef^^bb{\v t} | 9919 | \gdefchar^^bb{\v t} |
| 9969 | \gdef^^bc{\'z} | 9920 | \gdefchar^^bc{\'z} |
| 9970 | \gdef^^bd{\H{}} | 9921 | \gdefchar^^bd{\H{}} |
| 9971 | \gdef^^be{\v z} | 9922 | \gdefchar^^be{\v z} |
| 9972 | \gdef^^bf{\dotaccent z} | 9923 | \gdefchar^^bf{\dotaccent z} |
| 9973 | % | 9924 | % |
| 9974 | \gdef^^c0{\'R} | 9925 | \gdefchar^^c0{\'R} |
| 9975 | \gdef^^c1{\'A} | 9926 | \gdefchar^^c1{\'A} |
| 9976 | \gdef^^c2{\^A} | 9927 | \gdefchar^^c2{\^A} |
| 9977 | \gdef^^c3{\u A} | 9928 | \gdefchar^^c3{\u A} |
| 9978 | \gdef^^c4{\"A} | 9929 | \gdefchar^^c4{\"A} |
| 9979 | \gdef^^c5{\'L} | 9930 | \gdefchar^^c5{\'L} |
| 9980 | \gdef^^c6{\'C} | 9931 | \gdefchar^^c6{\'C} |
| 9981 | \gdef^^c7{\cedilla C} | 9932 | \gdefchar^^c7{\cedilla C} |
| 9982 | \gdef^^c8{\v C} | 9933 | \gdefchar^^c8{\v C} |
| 9983 | \gdef^^c9{\'E} | 9934 | \gdefchar^^c9{\'E} |
| 9984 | \gdef^^ca{\ogonek{E}} | 9935 | \gdefchar^^ca{\ogonek{E}} |
| 9985 | \gdef^^cb{\"E} | 9936 | \gdefchar^^cb{\"E} |
| 9986 | \gdef^^cc{\v E} | 9937 | \gdefchar^^cc{\v E} |
| 9987 | \gdef^^cd{\'I} | 9938 | \gdefchar^^cd{\'I} |
| 9988 | \gdef^^ce{\^I} | 9939 | \gdefchar^^ce{\^I} |
| 9989 | \gdef^^cf{\v D} | 9940 | \gdefchar^^cf{\v D} |
| 9990 | % | 9941 | % |
| 9991 | \gdef^^d0{\DH} | 9942 | \gdefchar^^d0{\DH} |
| 9992 | \gdef^^d1{\'N} | 9943 | \gdefchar^^d1{\'N} |
| 9993 | \gdef^^d2{\v N} | 9944 | \gdefchar^^d2{\v N} |
| 9994 | \gdef^^d3{\'O} | 9945 | \gdefchar^^d3{\'O} |
| 9995 | \gdef^^d4{\^O} | 9946 | \gdefchar^^d4{\^O} |
| 9996 | \gdef^^d5{\H O} | 9947 | \gdefchar^^d5{\H O} |
| 9997 | \gdef^^d6{\"O} | 9948 | \gdefchar^^d6{\"O} |
| 9998 | \gdef^^d7{$\times$} | 9949 | \gdefchar^^d7{$\times$} |
| 9999 | \gdef^^d8{\v R} | 9950 | \gdefchar^^d8{\v R} |
| 10000 | \gdef^^d9{\ringaccent U} | 9951 | \gdefchar^^d9{\ringaccent U} |
| 10001 | \gdef^^da{\'U} | 9952 | \gdefchar^^da{\'U} |
| 10002 | \gdef^^db{\H U} | 9953 | \gdefchar^^db{\H U} |
| 10003 | \gdef^^dc{\"U} | 9954 | \gdefchar^^dc{\"U} |
| 10004 | \gdef^^dd{\'Y} | 9955 | \gdefchar^^dd{\'Y} |
| 10005 | \gdef^^de{\cedilla T} | 9956 | \gdefchar^^de{\cedilla T} |
| 10006 | \gdef^^df{\ss} | 9957 | \gdefchar^^df{\ss} |
| 10007 | % | 9958 | % |
| 10008 | \gdef^^e0{\'r} | 9959 | \gdefchar^^e0{\'r} |
| 10009 | \gdef^^e1{\'a} | 9960 | \gdefchar^^e1{\'a} |
| 10010 | \gdef^^e2{\^a} | 9961 | \gdefchar^^e2{\^a} |
| 10011 | \gdef^^e3{\u a} | 9962 | \gdefchar^^e3{\u a} |
| 10012 | \gdef^^e4{\"a} | 9963 | \gdefchar^^e4{\"a} |
| 10013 | \gdef^^e5{\'l} | 9964 | \gdefchar^^e5{\'l} |
| 10014 | \gdef^^e6{\'c} | 9965 | \gdefchar^^e6{\'c} |
| 10015 | \gdef^^e7{\cedilla c} | 9966 | \gdefchar^^e7{\cedilla c} |
| 10016 | \gdef^^e8{\v c} | 9967 | \gdefchar^^e8{\v c} |
| 10017 | \gdef^^e9{\'e} | 9968 | \gdefchar^^e9{\'e} |
| 10018 | \gdef^^ea{\ogonek{e}} | 9969 | \gdefchar^^ea{\ogonek{e}} |
| 10019 | \gdef^^eb{\"e} | 9970 | \gdefchar^^eb{\"e} |
| 10020 | \gdef^^ec{\v e} | 9971 | \gdefchar^^ec{\v e} |
| 10021 | \gdef^^ed{\'{\dotless{i}}} | 9972 | \gdefchar^^ed{\'{\dotless{i}}} |
| 10022 | \gdef^^ee{\^{\dotless{i}}} | 9973 | \gdefchar^^ee{\^{\dotless{i}}} |
| 10023 | \gdef^^ef{\v d} | 9974 | \gdefchar^^ef{\v d} |
| 10024 | % | 9975 | % |
| 10025 | \gdef^^f0{\dh} | 9976 | \gdefchar^^f0{\dh} |
| 10026 | \gdef^^f1{\'n} | 9977 | \gdefchar^^f1{\'n} |
| 10027 | \gdef^^f2{\v n} | 9978 | \gdefchar^^f2{\v n} |
| 10028 | \gdef^^f3{\'o} | 9979 | \gdefchar^^f3{\'o} |
| 10029 | \gdef^^f4{\^o} | 9980 | \gdefchar^^f4{\^o} |
| 10030 | \gdef^^f5{\H o} | 9981 | \gdefchar^^f5{\H o} |
| 10031 | \gdef^^f6{\"o} | 9982 | \gdefchar^^f6{\"o} |
| 10032 | \gdef^^f7{$\div$} | 9983 | \gdefchar^^f7{$\div$} |
| 10033 | \gdef^^f8{\v r} | 9984 | \gdefchar^^f8{\v r} |
| 10034 | \gdef^^f9{\ringaccent u} | 9985 | \gdefchar^^f9{\ringaccent u} |
| 10035 | \gdef^^fa{\'u} | 9986 | \gdefchar^^fa{\'u} |
| 10036 | \gdef^^fb{\H u} | 9987 | \gdefchar^^fb{\H u} |
| 10037 | \gdef^^fc{\"u} | 9988 | \gdefchar^^fc{\"u} |
| 10038 | \gdef^^fd{\'y} | 9989 | \gdefchar^^fd{\'y} |
| 10039 | \gdef^^fe{\cedilla t} | 9990 | \gdefchar^^fe{\cedilla t} |
| 10040 | \gdef^^ff{\dotaccent{}} | 9991 | \gdefchar^^ff{\dotaccent{}} |
| 10041 | } | 9992 | } |
| 10042 | 9993 | ||
| 10043 | % UTF-8 character definitions. | 9994 | % UTF-8 character definitions. |
| @@ -10067,35 +10018,56 @@ directory should work if nowhere else does.} | |||
| 10067 | \fi | 10018 | \fi |
| 10068 | } | 10019 | } |
| 10069 | 10020 | ||
| 10021 | % Give non-ASCII bytes the active definitions for processing UTF-8 sequences | ||
| 10070 | \begingroup | 10022 | \begingroup |
| 10071 | \catcode`\~13 | 10023 | \catcode`\~13 |
| 10024 | \catcode`\$12 | ||
| 10072 | \catcode`\"12 | 10025 | \catcode`\"12 |
| 10073 | 10026 | ||
| 10027 | % Loop from \countUTFx to \countUTFy, performing \UTFviiiTmp | ||
| 10028 | % substituting ~ and $ with a character token of that value. | ||
| 10074 | \def\UTFviiiLoop{% | 10029 | \def\UTFviiiLoop{% |
| 10075 | \global\catcode\countUTFx\active | 10030 | \global\catcode\countUTFx\active |
| 10076 | \uccode`\~\countUTFx | 10031 | \uccode`\~\countUTFx |
| 10032 | \uccode`\$\countUTFx | ||
| 10077 | \uppercase\expandafter{\UTFviiiTmp}% | 10033 | \uppercase\expandafter{\UTFviiiTmp}% |
| 10078 | \advance\countUTFx by 1 | 10034 | \advance\countUTFx by 1 |
| 10079 | \ifnum\countUTFx < \countUTFy | 10035 | \ifnum\countUTFx < \countUTFy |
| 10080 | \expandafter\UTFviiiLoop | 10036 | \expandafter\UTFviiiLoop |
| 10081 | \fi} | 10037 | \fi} |
| 10082 | 10038 | ||
| 10039 | % For bytes other than the first in a UTF-8 sequence. Not expected to | ||
| 10040 | % be expanded except when writing to auxiliary files. | ||
| 10041 | \countUTFx = "80 | ||
| 10042 | \countUTFy = "C2 | ||
| 10043 | \def\UTFviiiTmp{% | ||
| 10044 | \gdef~{ | ||
| 10045 | \ifpassthroughchars $\fi}}% | ||
| 10046 | \UTFviiiLoop | ||
| 10047 | |||
| 10083 | \countUTFx = "C2 | 10048 | \countUTFx = "C2 |
| 10084 | \countUTFy = "E0 | 10049 | \countUTFy = "E0 |
| 10085 | \def\UTFviiiTmp{% | 10050 | \def\UTFviiiTmp{% |
| 10086 | \xdef~{\noexpand\UTFviiiTwoOctets\string~}} | 10051 | \gdef~{% |
| 10052 | \ifpassthroughchars $% | ||
| 10053 | \else\expandafter\UTFviiiTwoOctets\expandafter$\fi}}% | ||
| 10087 | \UTFviiiLoop | 10054 | \UTFviiiLoop |
| 10088 | 10055 | ||
| 10089 | \countUTFx = "E0 | 10056 | \countUTFx = "E0 |
| 10090 | \countUTFy = "F0 | 10057 | \countUTFy = "F0 |
| 10091 | \def\UTFviiiTmp{% | 10058 | \def\UTFviiiTmp{% |
| 10092 | \xdef~{\noexpand\UTFviiiThreeOctets\string~}} | 10059 | \gdef~{% |
| 10060 | \ifpassthroughchars $% | ||
| 10061 | \else\expandafter\UTFviiiThreeOctets\expandafter$\fi}}% | ||
| 10093 | \UTFviiiLoop | 10062 | \UTFviiiLoop |
| 10094 | 10063 | ||
| 10095 | \countUTFx = "F0 | 10064 | \countUTFx = "F0 |
| 10096 | \countUTFy = "F4 | 10065 | \countUTFy = "F4 |
| 10097 | \def\UTFviiiTmp{% | 10066 | \def\UTFviiiTmp{% |
| 10098 | \xdef~{\noexpand\UTFviiiFourOctets\string~}} | 10067 | \gdef~{% |
| 10068 | \ifpassthroughchars $% | ||
| 10069 | \else\expandafter\UTFviiiFourOctets\expandafter$\fi | ||
| 10070 | }}% | ||
| 10099 | \UTFviiiLoop | 10071 | \UTFviiiLoop |
| 10100 | \endgroup | 10072 | \endgroup |
| 10101 | 10073 | ||
| @@ -10134,9 +10106,10 @@ directory should work if nowhere else does.} | |||
| 10134 | \catcode`\~=13 | 10106 | \catcode`\~=13 |
| 10135 | \gdef\DeclareUnicodeCharacterUTFviii#1#2{% | 10107 | \gdef\DeclareUnicodeCharacterUTFviii#1#2{% |
| 10136 | \countUTFz = "#1\relax | 10108 | \countUTFz = "#1\relax |
| 10137 | %\wlog{\space\space defining Unicode char U+#1 (decimal \the\countUTFz)}% | ||
| 10138 | \begingroup | 10109 | \begingroup |
| 10139 | \parseXMLCharref | 10110 | \parseXMLCharref |
| 10111 | % | ||
| 10112 | % Access definitions of characters given UTF-8 sequences | ||
| 10140 | \def\UTFviiiTwoOctets##1##2{% | 10113 | \def\UTFviiiTwoOctets##1##2{% |
| 10141 | \csname u8:##1\string ##2\endcsname}% | 10114 | \csname u8:##1\string ##2\endcsname}% |
| 10142 | \def\UTFviiiThreeOctets##1##2##3{% | 10115 | \def\UTFviiiThreeOctets##1##2##3{% |
| @@ -10154,7 +10127,8 @@ directory should work if nowhere else does.} | |||
| 10154 | % define an additional control sequence for this code point. | 10127 | % define an additional control sequence for this code point. |
| 10155 | \expandafter\globallet\csname uni:#1\endcsname \UTFviiiTmp | 10128 | \expandafter\globallet\csname uni:#1\endcsname \UTFviiiTmp |
| 10156 | \endgroup} | 10129 | \endgroup} |
| 10157 | 10130 | % | |
| 10131 | % Given the value in \countUTFz as a Unicode code point, set \UTFviiiTmp. | ||
| 10158 | \gdef\parseXMLCharref{% | 10132 | \gdef\parseXMLCharref{% |
| 10159 | \ifnum\countUTFz < "A0\relax | 10133 | \ifnum\countUTFz < "A0\relax |
| 10160 | \errhelp = \EMsimple | 10134 | \errhelp = \EMsimple |
| @@ -10184,6 +10158,7 @@ directory should work if nowhere else does.} | |||
| 10184 | \uccode `#1\countUTFx | 10158 | \uccode `#1\countUTFx |
| 10185 | \countUTFz = \countUTFy} | 10159 | \countUTFz = \countUTFy} |
| 10186 | 10160 | ||
| 10161 | % Used to set \UTFviiiTmp to a UTF-8 byte sequence | ||
| 10187 | \gdef\parseUTFviiiB#1#2#3#4{% | 10162 | \gdef\parseUTFviiiB#1#2#3#4{% |
| 10188 | \advance\countUTFz by "#10\relax | 10163 | \advance\countUTFz by "#10\relax |
| 10189 | \uccode `#3\countUTFz | 10164 | \uccode `#3\countUTFz |
| @@ -10937,84 +10912,17 @@ directory should work if nowhere else does.} | |||
| 10937 | \unicodechardefs | 10912 | \unicodechardefs |
| 10938 | } | 10913 | } |
| 10939 | 10914 | ||
| 10940 | % Native Unicode (XeTeX and LuaTeX) catcode other non global definitions | ||
| 10941 | \def\nativeunicodecharscatcodeothernonglobal{% | ||
| 10942 | \let\DeclareUnicodeCharacter\DeclareUnicodeCharacterNativeOther | ||
| 10943 | \unicodechardefs | ||
| 10944 | } | ||
| 10945 | |||
| 10946 | % Catcode (non-ASCII or native Unicode) are set to \other (non-global | ||
| 10947 | % assignments). | ||
| 10948 | \def\setcharscatcodeothernonglobal{% | ||
| 10949 | \iftxiusebytewiseio | ||
| 10950 | \setnonasciicharscatcodenonglobal\other | ||
| 10951 | \else | ||
| 10952 | \nativeunicodecharscatcodeothernonglobal | ||
| 10953 | \fi | ||
| 10954 | } | ||
| 10955 | |||
| 10956 | % US-ASCII character definitions. | 10915 | % US-ASCII character definitions. |
| 10957 | \def\asciichardefs{% nothing need be done | 10916 | \def\asciichardefs{% nothing need be done |
| 10958 | \relax | 10917 | \relax |
| 10959 | } | 10918 | } |
| 10960 | 10919 | ||
| 10961 | % Redefine the active definitions of non-ASCII characters to expand to | 10920 | % Whether the active definitions of non-ASCII characters expand to |
| 10962 | % non-active tokens with the same character code. | 10921 | % non-active tokens with the same character code. This is used to |
| 10963 | \def\nonasciistringdefs{% | 10922 | % write characters literally, instead of using active definitions for |
| 10964 | \setnonasciicharscatcode\active | ||
| 10965 | \def\defstringchar##1{\def##1{\string##1}}% | ||
| 10966 | % | ||
| 10967 | \defstringchar^^80\defstringchar^^81\defstringchar^^82\defstringchar^^83% | ||
| 10968 | \defstringchar^^84\defstringchar^^85\defstringchar^^86\defstringchar^^87% | ||
| 10969 | \defstringchar^^88\defstringchar^^89\defstringchar^^8a\defstringchar^^8b% | ||
| 10970 | \defstringchar^^8c\defstringchar^^8d\defstringchar^^8e\defstringchar^^8f% | ||
| 10971 | % | ||
| 10972 | \defstringchar^^90\defstringchar^^91\defstringchar^^92\defstringchar^^93% | ||
| 10973 | \defstringchar^^94\defstringchar^^95\defstringchar^^96\defstringchar^^97% | ||
| 10974 | \defstringchar^^98\defstringchar^^99\defstringchar^^9a\defstringchar^^9b% | ||
| 10975 | \defstringchar^^9c\defstringchar^^9d\defstringchar^^9e\defstringchar^^9f% | ||
| 10976 | % | ||
| 10977 | \defstringchar^^a0\defstringchar^^a1\defstringchar^^a2\defstringchar^^a3% | ||
| 10978 | \defstringchar^^a4\defstringchar^^a5\defstringchar^^a6\defstringchar^^a7% | ||
| 10979 | \defstringchar^^a8\defstringchar^^a9\defstringchar^^aa\defstringchar^^ab% | ||
| 10980 | \defstringchar^^ac\defstringchar^^ad\defstringchar^^ae\defstringchar^^af% | ||
| 10981 | % | ||
| 10982 | \defstringchar^^b0\defstringchar^^b1\defstringchar^^b2\defstringchar^^b3% | ||
| 10983 | \defstringchar^^b4\defstringchar^^b5\defstringchar^^b6\defstringchar^^b7% | ||
| 10984 | \defstringchar^^b8\defstringchar^^b9\defstringchar^^ba\defstringchar^^bb% | ||
| 10985 | \defstringchar^^bc\defstringchar^^bd\defstringchar^^be\defstringchar^^bf% | ||
| 10986 | % | ||
| 10987 | \defstringchar^^c0\defstringchar^^c1\defstringchar^^c2\defstringchar^^c3% | ||
| 10988 | \defstringchar^^c4\defstringchar^^c5\defstringchar^^c6\defstringchar^^c7% | ||
| 10989 | \defstringchar^^c8\defstringchar^^c9\defstringchar^^ca\defstringchar^^cb% | ||
| 10990 | \defstringchar^^cc\defstringchar^^cd\defstringchar^^ce\defstringchar^^cf% | ||
| 10991 | % | ||
| 10992 | \defstringchar^^d0\defstringchar^^d1\defstringchar^^d2\defstringchar^^d3% | ||
| 10993 | \defstringchar^^d4\defstringchar^^d5\defstringchar^^d6\defstringchar^^d7% | ||
| 10994 | \defstringchar^^d8\defstringchar^^d9\defstringchar^^da\defstringchar^^db% | ||
| 10995 | \defstringchar^^dc\defstringchar^^dd\defstringchar^^de\defstringchar^^df% | ||
| 10996 | % | ||
| 10997 | \defstringchar^^e0\defstringchar^^e1\defstringchar^^e2\defstringchar^^e3% | ||
| 10998 | \defstringchar^^e4\defstringchar^^e5\defstringchar^^e6\defstringchar^^e7% | ||
| 10999 | \defstringchar^^e8\defstringchar^^e9\defstringchar^^ea\defstringchar^^eb% | ||
| 11000 | \defstringchar^^ec\defstringchar^^ed\defstringchar^^ee\defstringchar^^ef% | ||
| 11001 | % | ||
| 11002 | \defstringchar^^f0\defstringchar^^f1\defstringchar^^f2\defstringchar^^f3% | ||
| 11003 | \defstringchar^^f4\defstringchar^^f5\defstringchar^^f6\defstringchar^^f7% | ||
| 11004 | \defstringchar^^f8\defstringchar^^f9\defstringchar^^fa\defstringchar^^fb% | ||
| 11005 | \defstringchar^^fc\defstringchar^^fd\defstringchar^^fe\defstringchar^^ff% | ||
| 11006 | } | ||
| 11007 | |||
| 11008 | % Write characters literally, instead of using active definitions for | ||
| 11009 | % printing the correct glyphs. | 10923 | % printing the correct glyphs. |
| 11010 | \def\passthroughcharacters{% | 10924 | \newif\ifpassthroughchars |
| 11011 | \iftxiusebytewiseio | 10925 | \passthroughcharsfalse |
| 11012 | \nonasciistringdefs | ||
| 11013 | \else | ||
| 11014 | \passthroughcharstrue | ||
| 11015 | \fi | ||
| 11016 | } | ||
| 11017 | |||
| 11018 | 10926 | ||
| 11019 | % define all the unicode characters we know about, for the sake of @U. | 10927 | % define all the unicode characters we know about, for the sake of @U. |
| 11020 | \iftxinativeunicodecapable | 10928 | \iftxinativeunicodecapable |
| @@ -11370,7 +11278,7 @@ directory should work if nowhere else does.} | |||
| 11370 | % | 11278 | % |
| 11371 | {@catcode`- = @active | 11279 | {@catcode`- = @active |
| 11372 | @gdef@normalturnoffactive{% | 11280 | @gdef@normalturnoffactive{% |
| 11373 | @passthroughcharacters | 11281 | @passthroughcharstrue |
| 11374 | @let-=@normaldash | 11282 | @let-=@normaldash |
| 11375 | @let"=@normaldoublequote | 11283 | @let"=@normaldoublequote |
| 11376 | @let$=@normaldollar %$ font-lock fix | 11284 | @let$=@normaldollar %$ font-lock fix |
| @@ -72,7 +72,7 @@ prompt, to unconditionally load the GDB init file. | |||
| 72 | *** Use the Emacs GDB UI front-end | 72 | *** Use the Emacs GDB UI front-end |
| 73 | 73 | ||
| 74 | We recommend using the GUI front-end for GDB provided by Emacs. With | 74 | We recommend using the GUI front-end for GDB provided by Emacs. With |
| 75 | it, you can start GDB by typing "M-x GDB RET". This will suggest the | 75 | it, you can start GDB by typing "M-x gdb RET". This will suggest the |
| 76 | default binary to debug; if you are going to start a new Emacs | 76 | default binary to debug; if you are going to start a new Emacs |
| 77 | process, change it as needed to point to the correct binary. | 77 | process, change it as needed to point to the correct binary. |
| 78 | Alternatively, if you want to attach the debugger to an already | 78 | Alternatively, if you want to attach the debugger to an already |
| @@ -804,30 +804,30 @@ item as before. | |||
| 804 | 804 | ||
| 805 | +++ | 805 | +++ |
| 806 | *** `isearch' and `query-replace' can now perform character folding in matches. | 806 | *** `isearch' and `query-replace' can now perform character folding in matches. |
| 807 | Isearch does that by default, while `query-replace' will do that if | 807 | This is analogous to case folding, but instead of disregarding case |
| 808 | the new variable `replace-character-fold' is customized to a non-nil | 808 | variants, it disregards wider classes of distinctions between similar |
| 809 | value. This is analogous to case folding, but instead of disregarding | 809 | characters. (Case folding is a special case of character folding.) |
| 810 | case variants, it disregards wider classes of distinctions between | 810 | This means many characters in the search string will match entire |
| 811 | similar characters. (Case folding is a special case of character | 811 | groups of characters instead of just themselves. |
| 812 | folding.) This means many characters in the search string will match | 812 | |
| 813 | entire groups of characters instead of just themselves. | 813 | For instance, the ASCII double quote character " will match all |
| 814 | 814 | variants of double quotes (like “ and ”), and the letter a will match | |
| 815 | For instance, the " will match all variants of double quotes (like “ | 815 | all of its accented cousins, even those composed of multiple |
| 816 | and ”), and the letter a will match all of its accented cousins, even | 816 | characters, as well as many other symbols like ℀, ℁, ⒜, and ⓐ. |
| 817 | those composed of multiple characters, as well as many other symbols | ||
| 818 | like ℀, ℁, ⒜, and ⓐ. | ||
| 819 | 817 | ||
| 820 | Character folding is enabled by customizing `search-default-mode' to | 818 | Character folding is enabled by customizing `search-default-mode' to |
| 821 | the value `character-fold-to-regexp'. If you want to turn character | 819 | the value `character-fold-to-regexp'. You can also toggle character |
| 822 | folding off, customize the value of `search-default-mode' to the `nil' | 820 | folding in the middle of a search by typing `M-s ''. |
| 823 | value. You can also toggle character folding in the middle of a | 821 | |
| 824 | search by typing `M-s ''. | 822 | `query-replace' honors character folding if the new variable |
| 823 | `replace-character-fold' is customized to a non-nil value. | ||
| 825 | 824 | ||
| 826 | +++ | 825 | +++ |
| 827 | *** New user option `search-default-mode'. | 826 | *** New user option `search-default-mode'. |
| 828 | This option specifies the default mode for Isearch. The default | 827 | This option specifies the default mode for Isearch. The default |
| 829 | value, `character-fold-to-regexp' specifies that Isearch should fold | 828 | value, nil specifies that Isearch does literal searches (however, |
| 830 | characters when searching. | 829 | `case-fold-search' and `isearch-lax-whitespace' may still be applied, |
| 830 | as in previous Emacs versions). | ||
| 831 | 831 | ||
| 832 | +++ | 832 | +++ |
| 833 | *** New function `character-fold-to-regexp' can be used | 833 | *** New function `character-fold-to-regexp' can be used |
| @@ -2196,7 +2196,7 @@ Those features have been deprecated in Gtk+ for a long time. | |||
| 2196 | +++ | 2196 | +++ |
| 2197 | *** etags no longer qualifies class members by default. | 2197 | *** etags no longer qualifies class members by default. |
| 2198 | 2198 | ||
| 2199 | By default, `etags' will not qualify class members for C-like | 2199 | By default, `etags' will not qualify class members for Perl and C-like |
| 2200 | object-oriented languages with their class names and namespaces, and | 2200 | object-oriented languages with their class names and namespaces, and |
| 2201 | will remove qualifications used explicitly in the code from the tag | 2201 | will remove qualifications used explicitly in the code from the tag |
| 2202 | names it puts in TAGS files. This is so the etags.el back-end for | 2202 | names it puts in TAGS files. This is so the etags.el back-end for |
| @@ -2204,8 +2204,8 @@ names it puts in TAGS files. This is so the etags.el back-end for | |||
| 2204 | positives. | 2204 | positives. |
| 2205 | 2205 | ||
| 2206 | Use --class-qualify (-Q) if you want the old default behavior of | 2206 | Use --class-qualify (-Q) if you want the old default behavior of |
| 2207 | qualifying class members in C++, Java, and Objective C. Note that | 2207 | qualifying class members in C++, Java, Objective C, and Perl. Note |
| 2208 | using -Q might make some class members become "unknown" to `M-.' | 2208 | that using -Q might make some class members become "unknown" to `M-.' |
| 2209 | (`xref-find-definitions'); if so, you can use `C-u M-.' to specify the | 2209 | (`xref-find-definitions'); if so, you can use `C-u M-.' to specify the |
| 2210 | qualified names by hand. | 2210 | qualified names by hand. |
| 2211 | 2211 | ||
diff --git a/lib-src/ebrowse.c b/lib-src/ebrowse.c index cb09ab80879..c59181f9464 100644 --- a/lib-src/ebrowse.c +++ b/lib-src/ebrowse.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib-src/emacsclient.c b/lib-src/emacsclient.c index c7cef8a2b20..dd66d34da70 100644 --- a/lib-src/emacsclient.c +++ b/lib-src/emacsclient.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib-src/etags.c b/lib-src/etags.c index 796adaa5d05..a8221497393 100644 --- a/lib-src/etags.c +++ b/lib-src/etags.c | |||
| @@ -35,8 +35,8 @@ This file is not considered part of GNU Emacs. | |||
| 35 | 35 | ||
| 36 | This program is free software: you can redistribute it and/or modify | 36 | This program is free software: you can redistribute it and/or modify |
| 37 | it under the terms of the GNU General Public License as published by | 37 | it under the terms of the GNU General Public License as published by |
| 38 | the Free Software Foundation, either version 3 of the License, or | 38 | the Free Software Foundation, either version 3 of the License, or (at |
| 39 | (at your option) any later version. | 39 | your option) any later version. |
| 40 | 40 | ||
| 41 | This program is distributed in the hope that it will be useful, | 41 | This program is distributed in the hope that it will be useful, |
| 42 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 42 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -680,8 +680,8 @@ static const char *Objc_suffixes [] = | |||
| 680 | static const char Objc_help [] = | 680 | static const char Objc_help [] = |
| 681 | "In Objective C code, tags include Objective C definitions for classes,\n\ | 681 | "In Objective C code, tags include Objective C definitions for classes,\n\ |
| 682 | class categories, methods and protocols. Tags for variables and\n\ | 682 | class categories, methods and protocols. Tags for variables and\n\ |
| 683 | functions in classes are named 'CLASS::VARIABLE' and 'CLASS::FUNCTION'.\n\ | 683 | functions in classes are named 'CLASS::VARIABLE' and 'CLASS::FUNCTION'.\ |
| 684 | (Use --help --lang=c --lang=objc --lang=java for full help.)"; | 684 | \n(Use --help --lang=c --lang=objc --lang=java for full help.)"; |
| 685 | 685 | ||
| 686 | static const char *Pascal_suffixes [] = | 686 | static const char *Pascal_suffixes [] = |
| 687 | { "p", "pas", NULL }; | 687 | { "p", "pas", NULL }; |
| @@ -972,11 +972,12 @@ Relative ones are stored relative to the output file's directory.\n"); | |||
| 972 | in some languages."); | 972 | in some languages."); |
| 973 | 973 | ||
| 974 | puts ("-Q, --class-qualify\n\ | 974 | puts ("-Q, --class-qualify\n\ |
| 975 | Qualify tag names with their class name in C++, ObjC, and Java.\n\ | 975 | Qualify tag names with their class name in C++, ObjC, Java, and Perl.\n\ |
| 976 | This produces tag names of the form \"class::member\" for C++,\n\ | 976 | This produces tag names of the form \"class::member\" for C++,\n\ |
| 977 | \"class(category)\" for Objective C, and \"class.member\" for Java.\n\ | 977 | \"class(category)\" for Objective C, and \"class.member\" for Java.\n\ |
| 978 | For Objective C, this also produces class methods qualified with\n\ | 978 | For Objective C, this also produces class methods qualified with\n\ |
| 979 | their arguments, as in \"foo:bar:baz:more\"."); | 979 | their arguments, as in \"foo:bar:baz:more\".\n\ |
| 980 | For Perl, this produces \"package::member\"."); | ||
| 980 | puts ("-r REGEXP, --regex=REGEXP or --regex=@regexfile\n\ | 981 | puts ("-r REGEXP, --regex=REGEXP or --regex=@regexfile\n\ |
| 981 | Make a tag for each line matching a regular expression pattern\n\ | 982 | Make a tag for each line matching a regular expression pattern\n\ |
| 982 | in the following files. {LANGUAGE}REGEXP uses REGEXP for LANGUAGE\n\ | 983 | in the following files. {LANGUAGE}REGEXP uses REGEXP for LANGUAGE\n\ |
| @@ -4535,10 +4536,21 @@ Perl_functions (FILE *inf) | |||
| 4535 | continue; /* nothing found */ | 4536 | continue; /* nothing found */ |
| 4536 | pos = strchr (sp, ':'); | 4537 | pos = strchr (sp, ':'); |
| 4537 | if (pos && pos < cp && pos[1] == ':') | 4538 | if (pos && pos < cp && pos[1] == ':') |
| 4538 | /* The name is already qualified. */ | 4539 | { |
| 4539 | make_tag (sp, cp - sp, true, | 4540 | /* The name is already qualified. */ |
| 4540 | lb.buffer, cp - lb.buffer + 1, lineno, linecharno); | 4541 | if (!class_qualify) |
| 4541 | else | 4542 | { |
| 4543 | char *q = pos + 2, *qpos; | ||
| 4544 | while ((qpos = strchr (q, ':')) != NULL | ||
| 4545 | && qpos < cp | ||
| 4546 | && qpos[1] == ':') | ||
| 4547 | q = qpos + 2; | ||
| 4548 | sp = q; | ||
| 4549 | } | ||
| 4550 | make_tag (sp, cp - sp, true, | ||
| 4551 | lb.buffer, cp - lb.buffer + 1, lineno, linecharno); | ||
| 4552 | } | ||
| 4553 | else if (class_qualify) | ||
| 4542 | /* Qualify it. */ | 4554 | /* Qualify it. */ |
| 4543 | { | 4555 | { |
| 4544 | char savechar, *name; | 4556 | char savechar, *name; |
| @@ -4551,6 +4563,9 @@ Perl_functions (FILE *inf) | |||
| 4551 | lb.buffer, cp - lb.buffer + 1, lineno, linecharno); | 4563 | lb.buffer, cp - lb.buffer + 1, lineno, linecharno); |
| 4552 | free (name); | 4564 | free (name); |
| 4553 | } | 4565 | } |
| 4566 | else | ||
| 4567 | make_tag (sp, cp - sp, true, | ||
| 4568 | lb.buffer, cp - lb.buffer + 1, lineno, linecharno); | ||
| 4554 | } | 4569 | } |
| 4555 | else if (LOOKING_AT (cp, "use constant") | 4570 | else if (LOOKING_AT (cp, "use constant") |
| 4556 | || LOOKING_AT (cp, "use constant::defer")) | 4571 | || LOOKING_AT (cp, "use constant::defer")) |
diff --git a/lib-src/hexl.c b/lib-src/hexl.c index 833ea50b480..9a5ca7e1543 100644 --- a/lib-src/hexl.c +++ b/lib-src/hexl.c | |||
| @@ -1,15 +1,14 @@ | |||
| 1 | /* Convert files for Emacs Hexl mode. | 1 | /* Convert files for Emacs Hexl mode. |
| 2 | Copyright (C) 1989, 2001-2016 Free Software Foundation, Inc. | 2 | Copyright (C) 1989, 2001-2016 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | Author: Keith Gabryelski | 4 | Author: Keith Gabryelski (according to authors.el) |
| 5 | (according to authors.el) | ||
| 6 | 5 | ||
| 7 | This file is not considered part of GNU Emacs. | 6 | This file is not considered part of GNU Emacs. |
| 8 | 7 | ||
| 9 | This program is free software: you can redistribute it and/or modify | 8 | This program is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 11 | your option) any later version. |
| 13 | 12 | ||
| 14 | This program is distributed in the hope that it will be useful, | 13 | This program is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c index e266207ee9e..32e3817a465 100644 --- a/lib-src/make-docfile.c +++ b/lib-src/make-docfile.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib-src/movemail.c b/lib-src/movemail.c index eb1962a8f6b..90e683ed855 100644 --- a/lib-src/movemail.c +++ b/lib-src/movemail.c | |||
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -799,6 +799,51 @@ mbx_write (char *line, int len, FILE *mbf) | |||
| 799 | return fwrite (line, 1, len, mbf) == len && 0 <= fputc ('\n', mbf); | 799 | return fwrite (line, 1, len, mbf) == len && 0 <= fputc ('\n', mbf); |
| 800 | } | 800 | } |
| 801 | 801 | ||
| 802 | #ifdef WINDOWSNT | ||
| 803 | /* Work around MS-Windows lack of support for %e or %T with a | ||
| 804 | special-purpose strftime that assumes the exact format that | ||
| 805 | movemail uses. */ | ||
| 806 | static size_t | ||
| 807 | movemail_strftime (char *s, size_t size, char const *format, | ||
| 808 | struct tm const *tm) | ||
| 809 | { | ||
| 810 | char fmt[size + 6], *q; | ||
| 811 | const char *p; | ||
| 812 | |||
| 813 | for (p = format, q = &fmt[0]; *p; ) | ||
| 814 | { | ||
| 815 | if (*p == '%' && p[1] == 'e') | ||
| 816 | { | ||
| 817 | memcpy (q, "%d", 2); | ||
| 818 | q += 2; | ||
| 819 | p += 2; | ||
| 820 | } | ||
| 821 | else if (*p == '%' && p[1] == 'T') | ||
| 822 | { | ||
| 823 | memcpy (q, "%H:%M:%S", 8); | ||
| 824 | q += 8; | ||
| 825 | p += 2; | ||
| 826 | } | ||
| 827 | else if (*p == '%' && p[1] == '%') | ||
| 828 | { | ||
| 829 | memcpy (q, p, 2); | ||
| 830 | q += 2; | ||
| 831 | p += 2; | ||
| 832 | } | ||
| 833 | else | ||
| 834 | *q++ = *p++; | ||
| 835 | } | ||
| 836 | |||
| 837 | size_t n = strftime (s, size, fmt, tm); | ||
| 838 | char *mday = s + sizeof "From movemail Sun Jan " - 1; | ||
| 839 | if (*mday == '0') | ||
| 840 | *mday = ' '; | ||
| 841 | return n; | ||
| 842 | } | ||
| 843 | # undef strftime | ||
| 844 | # define strftime movemail_strftime | ||
| 845 | #endif | ||
| 846 | |||
| 802 | static bool | 847 | static bool |
| 803 | mbx_delimit_begin (FILE *mbf) | 848 | mbx_delimit_begin (FILE *mbf) |
| 804 | { | 849 | { |
diff --git a/lib-src/ntlib.c b/lib-src/ntlib.c index 931a3abdf93..4b25796830e 100644 --- a/lib-src/ntlib.c +++ b/lib-src/ntlib.c | |||
| @@ -9,8 +9,8 @@ This file is part of GNU Emacs. | |||
| 9 | 9 | ||
| 10 | GNU Emacs is free software: you can redistribute it and/or modify | 10 | GNU Emacs is free software: you can redistribute it and/or modify |
| 11 | it under the terms of the GNU General Public License as published by | 11 | it under the terms of the GNU General Public License as published by |
| 12 | the Free Software Foundation, either version 3 of the License, or | 12 | the Free Software Foundation, either version 3 of the License, or (at |
| 13 | (at your option) any later version. | 13 | your option) any later version. |
| 14 | 14 | ||
| 15 | GNU Emacs is distributed in the hope that it will be useful, | 15 | GNU Emacs is distributed in the hope that it will be useful, |
| 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib-src/ntlib.h b/lib-src/ntlib.h index a0c0d43bdc6..b49da79f328 100644 --- a/lib-src/ntlib.h +++ b/lib-src/ntlib.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -102,4 +102,3 @@ int mkostemp (char * template, int flags); | |||
| 102 | #undef _WINSOCK_H | 102 | #undef _WINSOCK_H |
| 103 | 103 | ||
| 104 | /* end of ntlib.h */ | 104 | /* end of ntlib.h */ |
| 105 | |||
diff --git a/lib-src/pop.c b/lib-src/pop.c index 983993461b5..74a6fc151aa 100644 --- a/lib-src/pop.c +++ b/lib-src/pop.c | |||
| @@ -9,8 +9,8 @@ This file is part of GNU Emacs. | |||
| 9 | 9 | ||
| 10 | GNU Emacs is free software: you can redistribute it and/or modify | 10 | GNU Emacs is free software: you can redistribute it and/or modify |
| 11 | it under the terms of the GNU General Public License as published by | 11 | it under the terms of the GNU General Public License as published by |
| 12 | the Free Software Foundation, either version 3 of the License, or | 12 | the Free Software Foundation, either version 3 of the License, or (at |
| 13 | (at your option) any later version. | 13 | your option) any later version. |
| 14 | 14 | ||
| 15 | GNU Emacs is distributed in the hope that it will be useful, | 15 | GNU Emacs is distributed in the hope that it will be useful, |
| 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib-src/pop.h b/lib-src/pop.h index 4c67bdcb015..b8c21fcedb6 100644 --- a/lib-src/pop.h +++ b/lib-src/pop.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib-src/profile.c b/lib-src/profile.c index da6232afbca..0e603776049 100644 --- a/lib-src/profile.c +++ b/lib-src/profile.c | |||
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib-src/update-game-score.c b/lib-src/update-game-score.c index 3803a31c817..7675e9bdd4c 100644 --- a/lib-src/update-game-score.c +++ b/lib-src/update-game-score.c | |||
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/lib/intprops.h b/lib/intprops.h index e1a6107b9c2..a278497b744 100644 --- a/lib/intprops.h +++ b/lib/intprops.h | |||
| @@ -1,10 +1,10 @@ | |||
| 1 | /* intprops.h -- properties of integer types | 1 | /* intprops.h -- properties of integer types |
| 2 | 2 | ||
| 3 | Copyright (C) 2001-2005, 2009-2016 Free Software Foundation, Inc. | 3 | Copyright (C) 2001-2016 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | This program is free software: you can redistribute it and/or modify | 5 | This program is free software: you can redistribute it and/or modify it |
| 6 | it under the terms of the GNU General Public License as published by | 6 | under the terms of the GNU General Public License as published |
| 7 | the Free Software Foundation; either version 3 of the License, or | 7 | by the Free Software Foundation; either version 3 of the License, or |
| 8 | (at your option) any later version. | 8 | (at your option) any later version. |
| 9 | 9 | ||
| 10 | This program is distributed in the hope that it will be useful, | 10 | This program is distributed in the hope that it will be useful, |
diff --git a/lib/set-permissions.c b/lib/set-permissions.c index 073075434d6..2c773567cd6 100644 --- a/lib/set-permissions.c +++ b/lib/set-permissions.c | |||
| @@ -269,6 +269,7 @@ set_acls_from_mode (const char *name, int desc, mode_t mode, bool *must_chmod) | |||
| 269 | } | 269 | } |
| 270 | return -1; | 270 | return -1; |
| 271 | } | 271 | } |
| 272 | return 0; | ||
| 272 | } | 273 | } |
| 273 | } | 274 | } |
| 274 | 275 | ||
diff --git a/lisp/cedet/semantic/symref/grep.el b/lisp/cedet/semantic/symref/grep.el index 3b544d9f912..5d1fea8c829 100644 --- a/lisp/cedet/semantic/symref/grep.el +++ b/lisp/cedet/semantic/symref/grep.el | |||
| @@ -48,6 +48,8 @@ and those hits returned.") | |||
| 48 | (html-mode "*.s?html" "*.php") | 48 | (html-mode "*.s?html" "*.php") |
| 49 | (ruby-mode "*.r[bu]" "*.rake" "*.gemspec" "*.erb" "*.haml" | 49 | (ruby-mode "*.r[bu]" "*.rake" "*.gemspec" "*.erb" "*.haml" |
| 50 | "Rakefile" "Thorfile" "Capfile" "Guardfile" "Vagrantfile") | 50 | "Rakefile" "Thorfile" "Capfile" "Guardfile" "Vagrantfile") |
| 51 | (perl-mode "*.pl" "*.PL") | ||
| 52 | (cperl-mode "*.pl" "*.PL") | ||
| 51 | ) | 53 | ) |
| 52 | "List of major modes and file extension pattern. | 54 | "List of major modes and file extension pattern. |
| 53 | See find -name man page for format.") | 55 | See find -name man page for format.") |
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 8d57c193f4e..b4bb3b0acce 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el | |||
| @@ -411,8 +411,8 @@ This will generate compile-time constants from BINDINGS." | |||
| 411 | ;; Words inside \\[] tend to be for `substitute-command-keys'. | 411 | ;; Words inside \\[] tend to be for `substitute-command-keys'. |
| 412 | (,(concat "\\\\\\\\\\[\\(" lisp-mode-symbol-regexp "\\)\\]") | 412 | (,(concat "\\\\\\\\\\[\\(" lisp-mode-symbol-regexp "\\)\\]") |
| 413 | (1 font-lock-constant-face prepend)) | 413 | (1 font-lock-constant-face prepend)) |
| 414 | ;; Words inside ‘’ and '' and `' tend to be symbol names. | 414 | ;; Words inside ‘’ and `' tend to be symbol names. |
| 415 | (,(concat "['`‘]\\(\\(?:\\sw\\|\\s_\\|\\\\.\\)" | 415 | (,(concat "[`‘]\\(\\(?:\\sw\\|\\s_\\|\\\\.\\)" |
| 416 | lisp-mode-symbol-regexp "\\)['’]") | 416 | lisp-mode-symbol-regexp "\\)['’]") |
| 417 | (1 font-lock-constant-face prepend)) | 417 | (1 font-lock-constant-face prepend)) |
| 418 | ;; Constant values. | 418 | ;; Constant values. |
| @@ -463,8 +463,8 @@ This will generate compile-time constants from BINDINGS." | |||
| 463 | ;; Erroneous structures. | 463 | ;; Erroneous structures. |
| 464 | (,(concat "(" cl-errs-re "\\_>") | 464 | (,(concat "(" cl-errs-re "\\_>") |
| 465 | (1 font-lock-warning-face)) | 465 | (1 font-lock-warning-face)) |
| 466 | ;; Words inside ‘’ and '' and `' tend to be symbol names. | 466 | ;; Words inside ‘’ and `' tend to be symbol names. |
| 467 | (,(concat "['`‘]\\(\\(?:\\sw\\|\\s_\\|\\\\.\\)" | 467 | (,(concat "[`‘]\\(\\(?:\\sw\\|\\s_\\|\\\\.\\)" |
| 468 | lisp-mode-symbol-regexp "\\)['’]") | 468 | lisp-mode-symbol-regexp "\\)['’]") |
| 469 | (1 font-lock-constant-face prepend)) | 469 | (1 font-lock-constant-face prepend)) |
| 470 | ;; Constant values. | 470 | ;; Constant values. |
diff --git a/lisp/files.el b/lisp/files.el index 9b045a8b6e8..bd9792a51a2 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -6843,8 +6843,8 @@ If CHAR is in [Xugo], the value is taken from FROM (or 0 if omitted)." | |||
| 6843 | (cond ((= char ?r) #o0444) | 6843 | (cond ((= char ?r) #o0444) |
| 6844 | ((= char ?w) #o0222) | 6844 | ((= char ?w) #o0222) |
| 6845 | ((= char ?x) #o0111) | 6845 | ((= char ?x) #o0111) |
| 6846 | ((= char ?s) #o1000) | 6846 | ((= char ?s) #o6000) |
| 6847 | ((= char ?t) #o6000) | 6847 | ((= char ?t) #o1000) |
| 6848 | ;; Rights relative to the previous file modes. | 6848 | ;; Rights relative to the previous file modes. |
| 6849 | ((= char ?X) (if (= (logand from #o111) 0) 0 #o0111)) | 6849 | ((= char ?X) (if (= (logand from #o111) 0) 0 #o0111)) |
| 6850 | ((= char ?u) (let ((uright (logand #o4700 from))) | 6850 | ((= char ?u) (let ((uright (logand #o4700 from))) |
| @@ -6900,7 +6900,7 @@ as in \"og+rX-w\"." | |||
| 6900 | (mapcar 'file-modes-char-to-who | 6900 | (mapcar 'file-modes-char-to-who |
| 6901 | (match-string 1 modes))))) | 6901 | (match-string 1 modes))))) |
| 6902 | (when (= num-who 0) | 6902 | (when (= num-who 0) |
| 6903 | (setq num-who (default-file-modes))) | 6903 | (setq num-who (logior #o7000 (default-file-modes)))) |
| 6904 | (setq num-modes | 6904 | (setq num-modes |
| 6905 | (file-modes-rights-to-number (substring modes (match-end 1)) | 6905 | (file-modes-rights-to-number (substring modes (match-end 1)) |
| 6906 | num-who num-modes) | 6906 | num-who num-modes) |
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 2df847acc25..dc9699099e8 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -2935,11 +2935,15 @@ on encoding." | |||
| 2935 | (#xA000 . #xD7FF) | 2935 | (#xA000 . #xD7FF) |
| 2936 | ;; (#xD800 . #xFAFF) Surrogate/Private | 2936 | ;; (#xD800 . #xFAFF) Surrogate/Private |
| 2937 | (#xFB00 . #x134FF) | 2937 | (#xFB00 . #x134FF) |
| 2938 | ;; (#x13500 . #x167FF) unused | 2938 | ;; (#x13500 . #x143FF) unused |
| 2939 | (#x16800 . #x16A3F) | 2939 | (#x14400 . #x14646) |
| 2940 | ;; (#x16A40 . #x1AFFF) unused | 2940 | ;; (#x14647 . #x167FF) unused |
| 2941 | (#x16800 . #x16F9F) | ||
| 2942 | ;; (#x16FA0 . #x1AFFF) unused | ||
| 2941 | (#x1B000 . #x1B0FF) | 2943 | (#x1B000 . #x1B0FF) |
| 2942 | ;; (#x1B100 . #x1CFFF) unused | 2944 | ;; (#x1B100 . #x1BBFF) unused |
| 2945 | (#x1BC00 . #x1BCAF) | ||
| 2946 | ;; (#x1BCB0 . #x1CFFF) unused | ||
| 2943 | (#x1D000 . #x1FFFF) | 2947 | (#x1D000 . #x1FFFF) |
| 2944 | ;; (#x20000 . #xDFFFF) CJK Ideograph Extension A, B, etc, unused | 2948 | ;; (#x20000 . #xDFFFF) CJK Ideograph Extension A, B, etc, unused |
| 2945 | (#xE0000 . #xE01FF))) | 2949 | (#xE0000 . #xE01FF))) |
diff --git a/lisp/isearch.el b/lisp/isearch.el index c91ccfad27d..b8ada2c766a 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -224,7 +224,7 @@ Default value, nil, means edit the string instead." | |||
| 224 | 224 | ||
| 225 | (autoload 'character-fold-to-regexp "character-fold") | 225 | (autoload 'character-fold-to-regexp "character-fold") |
| 226 | 226 | ||
| 227 | (defcustom search-default-mode #'character-fold-to-regexp | 227 | (defcustom search-default-mode nil |
| 228 | "Default mode to use when starting isearch. | 228 | "Default mode to use when starting isearch. |
| 229 | Value is nil, t, or a function. | 229 | Value is nil, t, or a function. |
| 230 | 230 | ||
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 68b3cfdf501..29926108c15 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el | |||
| @@ -2800,7 +2800,12 @@ The current mail message becomes the message displayed." | |||
| 2800 | ;; rmail-header-style based on the binding in effect when | 2800 | ;; rmail-header-style based on the binding in effect when |
| 2801 | ;; this function is called; `rmail-toggle-headers' can | 2801 | ;; this function is called; `rmail-toggle-headers' can |
| 2802 | ;; inspect this value to determine how to toggle. | 2802 | ;; inspect this value to determine how to toggle. |
| 2803 | (set (make-local-variable 'rmail-header-style) header-style)) | 2803 | (set (make-local-variable 'rmail-header-style) header-style) |
| 2804 | ;; In case viewing the previous message sets the paragraph | ||
| 2805 | ;; direction non-nil, we reset it here to allow independent | ||
| 2806 | ;; dynamic determination of paragraph direction in every | ||
| 2807 | ;; message. | ||
| 2808 | (setq bidi-paragraph-direction nil)) | ||
| 2804 | (if (and rmail-enable-mime | 2809 | (if (and rmail-enable-mime |
| 2805 | rmail-show-mime-function | 2810 | rmail-show-mime-function |
| 2806 | (re-search-forward "mime-version: 1.0" nil t)) | 2811 | (re-search-forward "mime-version: 1.0" nil t)) |
diff --git a/lisp/progmodes/js.el b/lisp/progmodes/js.el index 07849484b78..1e5cc60ee51 100644 --- a/lisp/progmodes/js.el +++ b/lisp/progmodes/js.el | |||
| @@ -1758,12 +1758,13 @@ This performs fontification according to `js--class-styles'." | |||
| 1758 | (eq (char-after) ??)))) | 1758 | (eq (char-after) ??)))) |
| 1759 | (not (and | 1759 | (not (and |
| 1760 | (eq (char-after) ?*) | 1760 | (eq (char-after) ?*) |
| 1761 | (looking-at (concat "\\* *" js--name-re " *(")) | 1761 | ;; Generator method (possibly using computed property). |
| 1762 | (looking-at (concat "\\* *\\(?:\\[\\|" js--name-re " *(\\)")) | ||
| 1762 | (save-excursion | 1763 | (save-excursion |
| 1763 | (goto-char (1- (match-end 0))) | 1764 | (js--backward-syntactic-ws) |
| 1764 | (let (forward-sexp-function) (forward-sexp)) | 1765 | ;; We might misindent some expressions that would |
| 1765 | (js--forward-syntactic-ws) | 1766 | ;; return NaN anyway. Shouldn't be a problem. |
| 1766 | (eq (char-after) ?{))))))) | 1767 | (memq (char-before) '(?, ?} ?{)))))))) |
| 1767 | 1768 | ||
| 1768 | (defun js--continued-expression-p () | 1769 | (defun js--continued-expression-p () |
| 1769 | "Return non-nil if the current line continues an expression." | 1770 | "Return non-nil if the current line continues an expression." |
diff --git a/lisp/progmodes/ruby-mode.el b/lisp/progmodes/ruby-mode.el index fb942b34ddc..d2370741972 100644 --- a/lisp/progmodes/ruby-mode.el +++ b/lisp/progmodes/ruby-mode.el | |||
| @@ -420,7 +420,10 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 420 | 420 | ||
| 421 | (defun ruby-smie--bosp () | 421 | (defun ruby-smie--bosp () |
| 422 | (save-excursion (skip-chars-backward " \t") | 422 | (save-excursion (skip-chars-backward " \t") |
| 423 | (or (bolp) (memq (char-before) '(?\; ?=))))) | 423 | (or (and (bolp) |
| 424 | ;; Newline is escaped. | ||
| 425 | (not (eq (char-before (1- (point))) ?\\))) | ||
| 426 | (memq (char-before) '(?\; ?=))))) | ||
| 424 | 427 | ||
| 425 | (defun ruby-smie--implicit-semi-p () | 428 | (defun ruby-smie--implicit-semi-p () |
| 426 | (save-excursion | 429 | (save-excursion |
| @@ -428,17 +431,11 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 428 | (not (or (bolp) | 431 | (not (or (bolp) |
| 429 | (memq (char-before) '(?\[ ?\()) | 432 | (memq (char-before) '(?\[ ?\()) |
| 430 | (and (memq (char-before) | 433 | (and (memq (char-before) |
| 431 | '(?\; ?- ?+ ?* ?/ ?: ?. ?, ?\\ ?& ?> ?< ?% ?~ ?^)) | 434 | '(?\; ?- ?+ ?* ?/ ?: ?. ?, ?\\ ?& ?> ?< ?% ?~ ?^ ?= ??)) |
| 432 | ;; Not a binary operator symbol. | 435 | ;; Not a binary operator symbol like :+ or :[]=. |
| 433 | (not (eq (char-before (1- (point))) ?:)) | 436 | ;; Or a (method or symbol) name ending with ?. |
| 434 | ;; Not the end of a regexp or a percent literal. | 437 | ;; Or the end of a regexp or a percent literal. |
| 435 | (not (memq (car (syntax-after (1- (point)))) '(7 15)))) | 438 | (not (memq (car (syntax-after (1- (point)))) '(3 7 15)))) |
| 436 | (and (eq (char-before) ?\?) | ||
| 437 | (equal (save-excursion (ruby-smie--backward-token)) "?")) | ||
| 438 | (and (eq (char-before) ?=) | ||
| 439 | ;; Not a symbol :==, :!=, or a foo= method. | ||
| 440 | (string-match "\\`\\s." (save-excursion | ||
| 441 | (ruby-smie--backward-token)))) | ||
| 442 | (and (eq (char-before) ?|) | 439 | (and (eq (char-before) ?|) |
| 443 | (member (save-excursion (ruby-smie--backward-token)) | 440 | (member (save-excursion (ruby-smie--backward-token)) |
| 444 | '("|" "||"))) | 441 | '("|" "||"))) |
| @@ -482,12 +479,16 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 482 | "else" "elsif" "do" "end" "and") | 479 | "else" "elsif" "do" "end" "and") |
| 483 | 'symbols)))) | 480 | 'symbols)))) |
| 484 | (memq (car (syntax-after pos)) '(7 15)) | 481 | (memq (car (syntax-after pos)) '(7 15)) |
| 485 | (looking-at "[([]\\|[-+!~]\\sw\\|:\\(?:\\sw\\|\\s.\\)"))))) | 482 | (looking-at "[([]\\|[-+!~:]\\(?:\\sw\\|\\s_\\)"))))) |
| 486 | 483 | ||
| 487 | (defun ruby-smie--at-dot-call () | 484 | (defun ruby-smie--before-method-name () |
| 485 | ;; Only need to be accurate when method has keyword name. | ||
| 488 | (and (eq ?w (char-syntax (following-char))) | 486 | (and (eq ?w (char-syntax (following-char))) |
| 489 | (eq (char-before) ?.) | 487 | (or |
| 490 | (not (eq (char-before (1- (point))) ?.)))) | 488 | (and |
| 489 | (eq (char-before) ?.) | ||
| 490 | (not (eq (char-before (1- (point))) ?.))) | ||
| 491 | (looking-back "^\\s *def\\s +\\=" (line-beginning-position))))) | ||
| 491 | 492 | ||
| 492 | (defun ruby-smie--forward-token () | 493 | (defun ruby-smie--forward-token () |
| 493 | (let ((pos (point))) | 494 | (let ((pos (point))) |
| @@ -508,11 +509,9 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 508 | (save-excursion | 509 | (save-excursion |
| 509 | (ruby-smie--args-separator-p (prog1 (point) (goto-char pos))))) | 510 | (ruby-smie--args-separator-p (prog1 (point) (goto-char pos))))) |
| 510 | " @ ") | 511 | " @ ") |
| 511 | ((looking-at ":\\s.+") | ||
| 512 | (goto-char (match-end 0)) (match-string 0)) ;bug#15208. | ||
| 513 | ((looking-at "\\s\"") "") ;A string. | 512 | ((looking-at "\\s\"") "") ;A string. |
| 514 | (t | 513 | (t |
| 515 | (let ((dot (ruby-smie--at-dot-call)) | 514 | (let ((dot (ruby-smie--before-method-name)) |
| 516 | (tok (smie-default-forward-token))) | 515 | (tok (smie-default-forward-token))) |
| 517 | (when dot | 516 | (when dot |
| 518 | (setq tok (concat "." tok))) | 517 | (setq tok (concat "." tok))) |
| @@ -556,11 +555,9 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 556 | " @ ") | 555 | " @ ") |
| 557 | (t | 556 | (t |
| 558 | (let ((tok (smie-default-backward-token)) | 557 | (let ((tok (smie-default-backward-token)) |
| 559 | (dot (ruby-smie--at-dot-call))) | 558 | (dot (ruby-smie--before-method-name))) |
| 560 | (when dot | 559 | (when dot |
| 561 | (setq tok (concat "." tok))) | 560 | (setq tok (concat "." tok))) |
| 562 | (when (and (eq ?: (char-before)) (string-match "\\`\\s." tok)) | ||
| 563 | (forward-char -1) (setq tok (concat ":" tok))) ;; bug#15208. | ||
| 564 | (cond | 561 | (cond |
| 565 | ((member tok '("unless" "if" "while" "until")) | 562 | ((member tok '("unless" "if" "while" "until")) |
| 566 | (if (ruby-smie--bosp) | 563 | (if (ruby-smie--bosp) |
| @@ -669,7 +666,7 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 669 | ;; Align to the previous `when', but look up the virtual | 666 | ;; Align to the previous `when', but look up the virtual |
| 670 | ;; indentation of `case'. | 667 | ;; indentation of `case'. |
| 671 | (if (smie-rule-sibling-p) 0 (smie-rule-parent))) | 668 | (if (smie-rule-sibling-p) 0 (smie-rule-parent))) |
| 672 | (`(:after . ,(or "=" "iuwu-mod" "+" "-" "*" "/" "&&" "||" "%" "**" "^" "&" | 669 | (`(:after . ,(or "=" "+" "-" "*" "/" "&&" "||" "%" "**" "^" "&" |
| 673 | "<=>" ">" "<" ">=" "<=" "==" "===" "!=" "<<" ">>" | 670 | "<=>" ">" "<" ">=" "<=" "==" "===" "!=" "<<" ">>" |
| 674 | "+=" "-=" "*=" "/=" "%=" "**=" "&=" "|=" "^=" "|" | 671 | "+=" "-=" "*=" "/=" "%=" "**=" "&=" "|=" "^=" "|" |
| 675 | "<<=" ">>=" "&&=" "||=" "and" "or")) | 672 | "<<=" ">>=" "&&=" "||=" "and" "or")) |
| @@ -682,6 +679,8 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 682 | (if (ruby-smie--indent-to-stmt-p token) | 679 | (if (ruby-smie--indent-to-stmt-p token) |
| 683 | (ruby-smie--indent-to-stmt) | 680 | (ruby-smie--indent-to-stmt) |
| 684 | (cons 'column (current-column))))) | 681 | (cons 'column (current-column))))) |
| 682 | (`(:before . "iuwu-mod") | ||
| 683 | (smie-rule-parent ruby-indent-level)) | ||
| 685 | )) | 684 | )) |
| 686 | 685 | ||
| 687 | (defun ruby--at-indentation-p (&optional point) | 686 | (defun ruby--at-indentation-p (&optional point) |
| @@ -889,12 +888,18 @@ and `\\' when preceded by `?'." | |||
| 889 | ((and (eq c ?:) (or (not b) (eq (char-syntax b) ? )))) | 888 | ((and (eq c ?:) (or (not b) (eq (char-syntax b) ? )))) |
| 890 | ((eq c ?\\) (eq b ??))))) | 889 | ((eq c ?\\) (eq b ??))))) |
| 891 | 890 | ||
| 892 | (defun ruby-singleton-class-p (&optional pos) | 891 | (defun ruby-verify-heredoc (&optional pos) |
| 893 | (save-excursion | 892 | (save-excursion |
| 894 | (when pos (goto-char pos)) | 893 | (when pos (goto-char pos)) |
| 895 | (forward-word -1) | 894 | ;; Not right after a symbol or prefix character. |
| 896 | (and (or (bolp) (not (eq (char-before (point)) ?_))) | 895 | ;; Method names are only allowed when separated by |
| 897 | (looking-at ruby-singleton-class-re)))) | 896 | ;; whitespace. Not a limitation in Ruby, but it's hard for |
| 897 | ;; us to do better. | ||
| 898 | (when (not (memq (car (syntax-after (1- (point)))) '(2 3 6 10))) | ||
| 899 | (or (not (memq (char-before) '(?\s ?\t))) | ||
| 900 | (ignore (forward-word -1)) | ||
| 901 | (eq (char-before) ?_) | ||
| 902 | (not (looking-at ruby-singleton-class-re)))))) | ||
| 898 | 903 | ||
| 899 | (defun ruby-expr-beg (&optional option) | 904 | (defun ruby-expr-beg (&optional option) |
| 900 | "Check if point is possibly at the beginning of an expression. | 905 | "Check if point is possibly at the beginning of an expression. |
| @@ -914,7 +919,7 @@ Can be one of `heredoc', `modifier', `expr-qstr', `expr-re'." | |||
| 914 | nil) | 919 | nil) |
| 915 | ((looking-at ruby-operator-re)) | 920 | ((looking-at ruby-operator-re)) |
| 916 | ((eq option 'heredoc) | 921 | ((eq option 'heredoc) |
| 917 | (and (< space 0) (not (ruby-singleton-class-p start)))) | 922 | (and (< space 0) (ruby-verify-heredoc start))) |
| 918 | ((or (looking-at "[\\[({,;]") | 923 | ((or (looking-at "[\\[({,;]") |
| 919 | (and (looking-at "[!?]") | 924 | (and (looking-at "[!?]") |
| 920 | (or (not (eq option 'modifier)) | 925 | (or (not (eq option 'modifier)) |
| @@ -1842,17 +1847,22 @@ It will be properly highlighted even when the call omits parens.") | |||
| 1842 | (syntax-propertize-rules | 1847 | (syntax-propertize-rules |
| 1843 | ;; $' $" $` .... are variables. | 1848 | ;; $' $" $` .... are variables. |
| 1844 | ;; ?' ?" ?` are character literals (one-char strings in 1.9+). | 1849 | ;; ?' ?" ?` are character literals (one-char strings in 1.9+). |
| 1845 | ("\\([?$]\\)[#\"'`]" | 1850 | ("\\([?$]\\)[#\"'`:?]" |
| 1846 | (1 (if (save-excursion | 1851 | (1 (if (save-excursion |
| 1847 | (nth 3 (syntax-ppss (match-beginning 0)))) | 1852 | (nth 3 (syntax-ppss (match-beginning 0)))) |
| 1848 | ;; Within a string, skip. | 1853 | ;; Within a string, skip. |
| 1849 | (goto-char (match-end 1)) | 1854 | (ignore |
| 1850 | (string-to-syntax "\\")))) | 1855 | (goto-char (match-end 1))) |
| 1851 | ;; Part of symbol when at the end of a method name. | 1856 | (put-text-property (match-end 1) (match-end 0) |
| 1857 | 'syntax-table (string-to-syntax "_")) | ||
| 1858 | (string-to-syntax "'")))) | ||
| 1859 | ;; Symbols with special characters. | ||
| 1860 | ("\\(^\\|[^:]\\)\\(:\\([-+~]@?\\|[/%&|^`]\\|\\*\\*?\\|<\\(<\\|=>?\\)?\\|>[>=]?\\|===?\\|=~\\|![~=]?\\|\\[\\]=?\\)\\)" | ||
| 1861 | (3 (string-to-syntax "_"))) | ||
| 1862 | ;; Part of method name when at the end of it. | ||
| 1852 | ("[!?]" | 1863 | ("[!?]" |
| 1853 | (0 (unless (save-excursion | 1864 | (0 (unless (save-excursion |
| 1854 | (or (nth 8 (syntax-ppss (match-beginning 0))) | 1865 | (or (nth 8 (syntax-ppss (match-beginning 0))) |
| 1855 | (eq (char-before) ?:) | ||
| 1856 | (let (parse-sexp-lookup-properties) | 1866 | (let (parse-sexp-lookup-properties) |
| 1857 | (zerop (skip-syntax-backward "w_"))) | 1867 | (zerop (skip-syntax-backward "w_"))) |
| 1858 | (memq (preceding-char) '(?@ ?$)))) | 1868 | (memq (preceding-char) '(?@ ?$)))) |
| @@ -1887,15 +1897,18 @@ It will be properly highlighted even when the call omits parens.") | |||
| 1887 | ("^\\(=\\)begin\\_>" (1 "!")) | 1897 | ("^\\(=\\)begin\\_>" (1 "!")) |
| 1888 | ;; Handle here documents. | 1898 | ;; Handle here documents. |
| 1889 | ((concat ruby-here-doc-beg-re ".*\\(\n\\)") | 1899 | ((concat ruby-here-doc-beg-re ".*\\(\n\\)") |
| 1890 | (7 (unless (or (nth 8 (save-excursion | 1900 | (7 (when (and (not (nth 8 (save-excursion |
| 1891 | (syntax-ppss (match-beginning 0)))) | 1901 | (syntax-ppss (match-beginning 0))))) |
| 1892 | (ruby-singleton-class-p (match-beginning 0))) | 1902 | (ruby-verify-heredoc (match-beginning 0))) |
| 1893 | (put-text-property (match-beginning 7) (match-end 7) | 1903 | (put-text-property (match-beginning 7) (match-end 7) |
| 1894 | 'syntax-table (string-to-syntax "\"")) | 1904 | 'syntax-table (string-to-syntax "\"")) |
| 1895 | (ruby-syntax-propertize-heredoc end)))) | 1905 | (ruby-syntax-propertize-heredoc end)))) |
| 1896 | ;; Handle percent literals: %w(), %q{}, etc. | 1906 | ;; Handle percent literals: %w(), %q{}, etc. |
| 1897 | ((concat "\\(?:^\\|[[ \t\n<+(,=]\\)" ruby-percent-literal-beg-re) | 1907 | ((concat "\\(?:^\\|[[ \t\n<+(,=*]\\)" ruby-percent-literal-beg-re) |
| 1898 | (1 (prog1 "|" (ruby-syntax-propertize-percent-literal end))))) | 1908 | (1 (unless (nth 8 (save-excursion (syntax-ppss (match-beginning 1)))) |
| 1909 | ;; Not inside a string, a comment, or a percent literal. | ||
| 1910 | (ruby-syntax-propertize-percent-literal end) | ||
| 1911 | (string-to-syntax "|"))))) | ||
| 1899 | (point) end))) | 1912 | (point) end))) |
| 1900 | 1913 | ||
| 1901 | (define-obsolete-function-alias | 1914 | (define-obsolete-function-alias |
| @@ -1910,7 +1923,7 @@ It will be properly highlighted even when the call omits parens.") | |||
| 1910 | (beginning-of-line) | 1923 | (beginning-of-line) |
| 1911 | (while (re-search-forward ruby-here-doc-beg-re | 1924 | (while (re-search-forward ruby-here-doc-beg-re |
| 1912 | (line-end-position) t) | 1925 | (line-end-position) t) |
| 1913 | (unless (ruby-singleton-class-p (match-beginning 0)) | 1926 | (when (ruby-verify-heredoc (match-beginning 0)) |
| 1914 | (push (concat (ruby-here-doc-end-match) "\n") res)))) | 1927 | (push (concat (ruby-here-doc-end-match) "\n") res)))) |
| 1915 | (save-excursion | 1928 | (save-excursion |
| 1916 | ;; With multiple openers on the same line, we don't know in which | 1929 | ;; With multiple openers on the same line, we don't know in which |
| @@ -1938,35 +1951,33 @@ It will be properly highlighted even when the call omits parens.") | |||
| 1938 | 1951 | ||
| 1939 | (defun ruby-syntax-propertize-percent-literal (limit) | 1952 | (defun ruby-syntax-propertize-percent-literal (limit) |
| 1940 | (goto-char (match-beginning 2)) | 1953 | (goto-char (match-beginning 2)) |
| 1941 | ;; Not inside a simple string or comment. | 1954 | (let* ((op (char-after)) |
| 1942 | (when (eq t (nth 3 (syntax-ppss))) | 1955 | (ops (char-to-string op)) |
| 1943 | (let* ((op (char-after)) | 1956 | (cl (or (cdr (aref (syntax-table) op)) |
| 1944 | (ops (char-to-string op)) | 1957 | (cdr (assoc op '((?< . ?>)))))) |
| 1945 | (cl (or (cdr (aref (syntax-table) op)) | 1958 | parse-sexp-lookup-properties) |
| 1946 | (cdr (assoc op '((?< . ?>)))))) | 1959 | (save-excursion |
| 1947 | parse-sexp-lookup-properties) | 1960 | (condition-case nil |
| 1948 | (save-excursion | 1961 | (progn |
| 1949 | (condition-case nil | 1962 | (if cl ; Paired delimiters. |
| 1950 | (progn | 1963 | ;; Delimiter pairs of the same kind can be nested |
| 1951 | (if cl ; Paired delimiters. | 1964 | ;; inside the literal, as long as they are balanced. |
| 1952 | ;; Delimiter pairs of the same kind can be nested | 1965 | ;; Create syntax table that ignores other characters. |
| 1953 | ;; inside the literal, as long as they are balanced. | 1966 | (with-syntax-table (make-char-table 'syntax-table nil) |
| 1954 | ;; Create syntax table that ignores other characters. | 1967 | (modify-syntax-entry op (concat "(" (char-to-string cl))) |
| 1955 | (with-syntax-table (make-char-table 'syntax-table nil) | 1968 | (modify-syntax-entry cl (concat ")" ops)) |
| 1956 | (modify-syntax-entry op (concat "(" (char-to-string cl))) | 1969 | (modify-syntax-entry ?\\ "\\") |
| 1957 | (modify-syntax-entry cl (concat ")" ops)) | 1970 | (save-restriction |
| 1958 | (modify-syntax-entry ?\\ "\\") | 1971 | (narrow-to-region (point) limit) |
| 1959 | (save-restriction | 1972 | (forward-list))) ; skip to the paired character |
| 1960 | (narrow-to-region (point) limit) | 1973 | ;; Single character delimiter. |
| 1961 | (forward-list))) ; skip to the paired character | 1974 | (re-search-forward (concat "[^\\]\\(?:\\\\\\\\\\)*" |
| 1962 | ;; Single character delimiter. | 1975 | (regexp-quote ops)) limit nil)) |
| 1963 | (re-search-forward (concat "[^\\]\\(?:\\\\\\\\\\)*" | 1976 | ;; Found the closing delimiter. |
| 1964 | (regexp-quote ops)) limit nil)) | 1977 | (put-text-property (1- (point)) (point) 'syntax-table |
| 1965 | ;; Found the closing delimiter. | 1978 | (string-to-syntax "|"))) |
| 1966 | (put-text-property (1- (point)) (point) 'syntax-table | 1979 | ;; Unclosed literal, do nothing. |
| 1967 | (string-to-syntax "|"))) | 1980 | ((scan-error search-failed)))))) |
| 1968 | ;; Unclosed literal, do nothing. | ||
| 1969 | ((scan-error search-failed))))))) | ||
| 1970 | 1981 | ||
| 1971 | (defun ruby-syntax-propertize-expansion () | 1982 | (defun ruby-syntax-propertize-expansion () |
| 1972 | ;; Save the match data to a text property, for font-locking later. | 1983 | ;; Save the match data to a text property, for font-locking later. |
| @@ -2158,7 +2169,7 @@ See `font-lock-syntax-table'.") | |||
| 2158 | (1 font-lock-builtin-face)) | 2169 | (1 font-lock-builtin-face)) |
| 2159 | ;; Here-doc beginnings. | 2170 | ;; Here-doc beginnings. |
| 2160 | (,ruby-here-doc-beg-re | 2171 | (,ruby-here-doc-beg-re |
| 2161 | (0 (unless (ruby-singleton-class-p (match-beginning 0)) | 2172 | (0 (when (ruby-verify-heredoc (match-beginning 0)) |
| 2162 | 'font-lock-string-face))) | 2173 | 'font-lock-string-face))) |
| 2163 | ;; Perl-ish keywords. | 2174 | ;; Perl-ish keywords. |
| 2164 | "\\_<\\(?:BEGIN\\|END\\)\\_>\\|^__END__$" | 2175 | "\\_<\\(?:BEGIN\\|END\\)\\_>\\|^__END__$" |
| @@ -2169,17 +2180,14 @@ See `font-lock-syntax-table'.") | |||
| 2169 | ;; Keywords that evaluate to certain values. | 2180 | ;; Keywords that evaluate to certain values. |
| 2170 | ("\\_<__\\(?:LINE\\|ENCODING\\|FILE\\)__\\_>" | 2181 | ("\\_<__\\(?:LINE\\|ENCODING\\|FILE\\)__\\_>" |
| 2171 | (0 font-lock-builtin-face)) | 2182 | (0 font-lock-builtin-face)) |
| 2172 | ;; Symbols with symbol characters. | 2183 | ;; Symbols. |
| 2173 | ("\\(^\\|[^:]\\)\\(:@?\\(?:\\w\\|_\\)+\\)\\([!?=]\\)?" | 2184 | ("\\(^\\|[^:]\\)\\(:@?\\(?:\\w\\|_\\)+\\)\\([!?=]\\)?" |
| 2174 | (2 font-lock-constant-face) | 2185 | (2 font-lock-constant-face) |
| 2175 | (3 (unless (and (eq (char-before (match-end 3)) ?=) | 2186 | (3 (unless (and (eq (char-before (match-end 3)) ?=) |
| 2176 | (eq (char-after (match-end 3)) ?>)) | 2187 | (eq (char-after (match-end 3)) ?>)) |
| 2177 | ;; bug#18466 | 2188 | ;; bug#18644 |
| 2178 | font-lock-constant-face) | 2189 | font-lock-constant-face) |
| 2179 | nil t)) | 2190 | nil t)) |
| 2180 | ;; Symbols with special characters. | ||
| 2181 | ("\\(^\\|[^:]\\)\\(:\\([-+~]@?\\|[/%&|^`]\\|\\*\\*?\\|<\\(<\\|=>?\\)?\\|>[>=]?\\|===?\\|=~\\|![~=]?\\|\\[\\]=?\\|#{[^}\n\\\\]*\\(\\\\.[^}\n\\\\]*\\)*}\\)\\)" | ||
| 2182 | 2 font-lock-constant-face) | ||
| 2183 | ;; Special globals. | 2191 | ;; Special globals. |
| 2184 | (,(concat "\\$\\(?:[:\"!@;,/\\._><\\$?~=*&`'+0-9]\\|-[0adFiIlpvw]\\|" | 2192 | (,(concat "\\$\\(?:[:\"!@;,/\\._><\\$?~=*&`'+0-9]\\|-[0adFiIlpvw]\\|" |
| 2185 | (regexp-opt '("LOAD_PATH" "LOADED_FEATURES" "PROGRAM_NAME" | 2193 | (regexp-opt '("LOAD_PATH" "LOADED_FEATURES" "PROGRAM_NAME" |
| @@ -2219,7 +2227,7 @@ See `font-lock-syntax-table'.") | |||
| 2219 | 1 font-lock-negation-char-face) | 2227 | 1 font-lock-negation-char-face) |
| 2220 | ;; Character literals. | 2228 | ;; Character literals. |
| 2221 | ;; FIXME: Support longer escape sequences. | 2229 | ;; FIXME: Support longer escape sequences. |
| 2222 | ("\\_<\\?\\\\?\\S " 0 font-lock-string-face) | 2230 | ("\\?\\\\?\\_<.\\_>" 0 font-lock-string-face) |
| 2223 | ;; Regexp options. | 2231 | ;; Regexp options. |
| 2224 | ("\\(?:\\s|\\|/\\)\\([imxo]+\\)" | 2232 | ("\\(?:\\s|\\|/\\)\\([imxo]+\\)" |
| 2225 | 1 (when (save-excursion | 2233 | 1 (when (save-excursion |
diff --git a/lisp/simple.el b/lisp/simple.el index 8c9d546bb72..e5fb5f031dd 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -3195,6 +3195,8 @@ shell (with its need to quote arguments)." | |||
| 3195 | "Execute string COMMAND in inferior shell; display output, if any. | 3195 | "Execute string COMMAND in inferior shell; display output, if any. |
| 3196 | With prefix argument, insert the COMMAND's output at point. | 3196 | With prefix argument, insert the COMMAND's output at point. |
| 3197 | 3197 | ||
| 3198 | Interactively, prompt for COMMAND in the minibuffer. | ||
| 3199 | |||
| 3198 | If COMMAND ends in `&', execute it asynchronously. | 3200 | If COMMAND ends in `&', execute it asynchronously. |
| 3199 | The output appears in the buffer `*Async Shell Command*'. | 3201 | The output appears in the buffer `*Async Shell Command*'. |
| 3200 | That buffer is in shell mode. You can also use | 3202 | That buffer is in shell mode. You can also use |
diff --git a/lisp/wdired.el b/lisp/wdired.el index d943dada030..91093032125 100644 --- a/lisp/wdired.el +++ b/lisp/wdired.el | |||
| @@ -304,14 +304,15 @@ or \\[wdired-abort-changes] to abort changes"))) | |||
| 304 | (put-text-property b-protection (point-max) 'read-only t)))) | 304 | (put-text-property b-protection (point-max) 'read-only t)))) |
| 305 | 305 | ||
| 306 | ;; This code is a copy of some dired-get-filename lines. | 306 | ;; This code is a copy of some dired-get-filename lines. |
| 307 | (defsubst wdired-normalize-filename (file) | 307 | (defsubst wdired-normalize-filename (file unquotep) |
| 308 | (setq file | 308 | (when unquotep |
| 309 | ;; FIXME: shouldn't we check for a `b' argument or somesuch before | 309 | (setq file |
| 310 | ;; doing such unquoting? --Stef | 310 | ;; FIXME: shouldn't we check for a `b' argument or somesuch before |
| 311 | (read (concat | 311 | ;; doing such unquoting? --Stef |
| 312 | "\"" (replace-regexp-in-string | 312 | (read (concat |
| 313 | "\\([^\\]\\|\\`\\)\"" "\\1\\\\\"" file) | 313 | "\"" (replace-regexp-in-string |
| 314 | "\""))) | 314 | "\\([^\\]\\|\\`\\)\"" "\\1\\\\\"" file) |
| 315 | "\"")))) | ||
| 315 | (and file buffer-file-coding-system | 316 | (and file buffer-file-coding-system |
| 316 | (not file-name-coding-system) | 317 | (not file-name-coding-system) |
| 317 | (not default-file-name-coding-system) | 318 | (not default-file-name-coding-system) |
| @@ -339,7 +340,8 @@ non-nil means return old filename." | |||
| 339 | ;; deletion. | 340 | ;; deletion. |
| 340 | (setq end (next-single-property-change beg 'end-name)) | 341 | (setq end (next-single-property-change beg 'end-name)) |
| 341 | (setq file (buffer-substring-no-properties (1+ beg) end))) | 342 | (setq file (buffer-substring-no-properties (1+ beg) end))) |
| 342 | (and file (setq file (wdired-normalize-filename file)))) | 343 | ;; Don't unquote the old name, it wasn't quoted in the first place |
| 344 | (and file (setq file (wdired-normalize-filename file (not old))))) | ||
| 343 | (if (or no-dir old) | 345 | (if (or no-dir old) |
| 344 | file | 346 | file |
| 345 | (and file (> (length file) 0) | 347 | (and file (> (length file) 0) |
| @@ -644,7 +646,7 @@ If OLD, return the old target. If MOVE, move point before it." | |||
| 644 | (setq end (next-single-property-change beg 'end-link)) | 646 | (setq end (next-single-property-change beg 'end-link)) |
| 645 | (setq target (buffer-substring-no-properties (1+ beg) end))) | 647 | (setq target (buffer-substring-no-properties (1+ beg) end))) |
| 646 | (if move (goto-char (1- beg))))) | 648 | (if move (goto-char (1- beg))))) |
| 647 | (and target (wdired-normalize-filename target)))) | 649 | (and target (wdired-normalize-filename target t)))) |
| 648 | 650 | ||
| 649 | (declare-function make-symbolic-link "fileio.c") | 651 | (declare-function make-symbolic-link "fileio.c") |
| 650 | 652 | ||
diff --git a/m4/extern-inline.m4 b/m4/extern-inline.m4 index fe282a56ca6..1e578f3deb4 100644 --- a/m4/extern-inline.m4 +++ b/m4/extern-inline.m4 | |||
| @@ -54,6 +54,7 @@ AC_DEFUN([gl_EXTERN_INLINE], | |||
| 54 | ? defined __GNUC_STDC_INLINE__ && __GNUC_STDC_INLINE__ \ | 54 | ? defined __GNUC_STDC_INLINE__ && __GNUC_STDC_INLINE__ \ |
| 55 | : (199901L <= __STDC_VERSION__ \ | 55 | : (199901L <= __STDC_VERSION__ \ |
| 56 | && !defined __HP_cc \ | 56 | && !defined __HP_cc \ |
| 57 | && !defined __PGI \ | ||
| 57 | && !(defined __SUNPRO_C && __STDC__))) \ | 58 | && !(defined __SUNPRO_C && __STDC__))) \ |
| 58 | && !defined _GL_EXTERN_INLINE_STDHEADER_BUG) | 59 | && !defined _GL_EXTERN_INLINE_STDHEADER_BUG) |
| 59 | # define _GL_INLINE inline | 60 | # define _GL_INLINE inline |
diff --git a/modules/mod-test/mod-test.c b/modules/mod-test/mod-test.c index bb9c8a503d4..3c8ab0fc001 100644 --- a/modules/mod-test/mod-test.c +++ b/modules/mod-test/mod-test.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/msdos/inttypes.h b/msdos/inttypes.h index da61b117f45..550ef36e80b 100644 --- a/msdos/inttypes.h +++ b/msdos/inttypes.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/addpm.c b/nt/addpm.c index ed5014f44af..2161ea786bd 100644 --- a/nt/addpm.c +++ b/nt/addpm.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/cmdproxy.c b/nt/cmdproxy.c index 4ca533b7ef9..411a409baca 100644 --- a/nt/cmdproxy.c +++ b/nt/cmdproxy.c | |||
| @@ -16,8 +16,8 @@ This file is part of GNU Emacs. | |||
| 16 | 16 | ||
| 17 | GNU Emacs is free software: you can redistribute it and/or modify | 17 | GNU Emacs is free software: you can redistribute it and/or modify |
| 18 | it under the terms of the GNU General Public License as published by | 18 | it under the terms of the GNU General Public License as published by |
| 19 | the Free Software Foundation, either version 3 of the License, or | 19 | the Free Software Foundation, either version 3 of the License, or (at |
| 20 | (at your option) any later version. | 20 | your option) any later version. |
| 21 | 21 | ||
| 22 | GNU Emacs is distributed in the hope that it will be useful, | 22 | GNU Emacs is distributed in the hope that it will be useful, |
| 23 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 23 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/ddeclient.c b/nt/ddeclient.c index f15c18855ca..7bbbdb0f48b 100644 --- a/nt/ddeclient.c +++ b/nt/ddeclient.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -70,4 +70,3 @@ main (int argc, char *argv[]) | |||
| 70 | 70 | ||
| 71 | return (0); | 71 | return (0); |
| 72 | } | 72 | } |
| 73 | |||
diff --git a/nt/inc/grp.h b/nt/inc/grp.h index c4413961d5a..903fda9b3e5 100644 --- a/nt/inc/grp.h +++ b/nt/inc/grp.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -34,4 +34,3 @@ extern unsigned getegid (void); | |||
| 34 | extern struct group *getgrgid(gid_t); | 34 | extern struct group *getgrgid(gid_t); |
| 35 | 35 | ||
| 36 | #endif /* _GRP_H */ | 36 | #endif /* _GRP_H */ |
| 37 | |||
diff --git a/nt/inc/inttypes.h b/nt/inc/inttypes.h index 9abd55daeca..34d026c3e37 100644 --- a/nt/inc/inttypes.h +++ b/nt/inc/inttypes.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/inc/langinfo.h b/nt/inc/langinfo.h index 646c8cadd12..1532eaa4d1d 100644 --- a/nt/inc/langinfo.h +++ b/nt/inc/langinfo.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -58,4 +58,3 @@ enum { | |||
| 58 | extern char *nl_langinfo (nl_item); | 58 | extern char *nl_langinfo (nl_item); |
| 59 | 59 | ||
| 60 | #endif /* _LANGINFO_H */ | 60 | #endif /* _LANGINFO_H */ |
| 61 | |||
diff --git a/nt/inc/ms-w32.h b/nt/inc/ms-w32.h index 9de3b12a808..5fd54e2f926 100644 --- a/nt/inc/ms-w32.h +++ b/nt/inc/ms-w32.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/inc/nl_types.h b/nt/inc/nl_types.h index 6b22e766b60..e4d314ceedd 100644 --- a/nt/inc/nl_types.h +++ b/nt/inc/nl_types.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/inc/stdint.h b/nt/inc/stdint.h index adc6a1e2f2e..bb067f4418a 100644 --- a/nt/inc/stdint.h +++ b/nt/inc/stdint.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/inc/sys/socket.h b/nt/inc/sys/socket.h index 2c72a78b0f4..6b9f56f917c 100644 --- a/nt/inc/sys/socket.h +++ b/nt/inc/sys/socket.h | |||
| @@ -4,8 +4,8 @@ This file is part of GNU Emacs. | |||
| 4 | 4 | ||
| 5 | GNU Emacs is free software: you can redistribute it and/or modify | 5 | GNU Emacs is free software: you can redistribute it and/or modify |
| 6 | it under the terms of the GNU General Public License as published by | 6 | it under the terms of the GNU General Public License as published by |
| 7 | the Free Software Foundation, either version 3 of the License, or | 7 | the Free Software Foundation, either version 3 of the License, or (at |
| 8 | (at your option) any later version. | 8 | your option) any later version. |
| 9 | 9 | ||
| 10 | GNU Emacs is distributed in the hope that it will be useful, | 10 | GNU Emacs is distributed in the hope that it will be useful, |
| 11 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 11 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/inc/sys/stat.h b/nt/inc/sys/stat.h index f21086cbf93..45bc2ea1e0c 100644 --- a/nt/inc/sys/stat.h +++ b/nt/inc/sys/stat.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/inc/sys/wait.h b/nt/inc/sys/wait.h index 8a77e9881cb..46dae494997 100644 --- a/nt/inc/sys/wait.h +++ b/nt/inc/sys/wait.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/nt/preprep.c b/nt/preprep.c index 303e2ef0a0c..491a93ba3b0 100644 --- a/nt/preprep.c +++ b/nt/preprep.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -34,11 +34,10 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. | |||
| 34 | /* Include relevant definitions from IMAGEHLP.H, which can be found | 34 | /* Include relevant definitions from IMAGEHLP.H, which can be found |
| 35 | in \\win32sdk\mstools\samples\image\include\imagehlp.h. */ | 35 | in \\win32sdk\mstools\samples\image\include\imagehlp.h. */ |
| 36 | 36 | ||
| 37 | PIMAGE_NT_HEADERS | 37 | PIMAGE_NT_HEADERS (__stdcall * pfnCheckSumMappedFile) (LPVOID BaseAddress, |
| 38 | (__stdcall * pfnCheckSumMappedFile) (LPVOID BaseAddress, | 38 | DWORD_PTR FileLength, |
| 39 | DWORD_PTR FileLength, | 39 | PDWORD_PTR HeaderSum, |
| 40 | PDWORD_PTR HeaderSum, | 40 | PDWORD_PTR CheckSum); |
| 41 | PDWORD_PTR CheckSum); | ||
| 42 | 41 | ||
| 43 | #undef min | 42 | #undef min |
| 44 | #undef max | 43 | #undef max |
diff --git a/nt/runemacs.c b/nt/runemacs.c index 2685b25c30d..b5e16c0304f 100644 --- a/nt/runemacs.c +++ b/nt/runemacs.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/oldXMenu/Activate.c b/oldXMenu/Activate.c index 1e2b1980c70..0b812c5f5f0 100644 --- a/oldXMenu/Activate.c +++ b/oldXMenu/Activate.c | |||
| @@ -7,8 +7,8 @@ Copyright (C) 2001-2016 Free Software Foundation, Inc. | |||
| 7 | 7 | ||
| 8 | This program is free software: you can redistribute it and/or modify | 8 | This program is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | This program is distributed in the hope that it will be useful, | 13 | This program is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/oldXMenu/Create.c b/oldXMenu/Create.c index d0cf8f09f81..2fd86b2db01 100644 --- a/oldXMenu/Create.c +++ b/oldXMenu/Create.c | |||
| @@ -7,8 +7,8 @@ Copyright (C) 1993-1994, 2001-2016 Free Software Foundation, Inc. | |||
| 7 | 7 | ||
| 8 | This program is free software: you can redistribute it and/or modify | 8 | This program is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | This program is distributed in the hope that it will be useful, | 13 | This program is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/oldXMenu/FindSel.c b/oldXMenu/FindSel.c index 84c865163b4..991e1caf87f 100644 --- a/oldXMenu/FindSel.c +++ b/oldXMenu/FindSel.c | |||
| @@ -7,8 +7,8 @@ Copyright (C) 2001-2016 Free Software Foundation, Inc. | |||
| 7 | 7 | ||
| 8 | This program is free software: you can redistribute it and/or modify | 8 | This program is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | This program is distributed in the hope that it will be useful, | 13 | This program is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/oldXMenu/Internal.c b/oldXMenu/Internal.c index f25c96368c7..45cdf4d647c 100644 --- a/oldXMenu/Internal.c +++ b/oldXMenu/Internal.c | |||
| @@ -7,8 +7,8 @@ Copyright (C) 1993, 1996, 2001-2016 Free Software Foundation, Inc. | |||
| 7 | 7 | ||
| 8 | This program is free software: you can redistribute it and/or modify | 8 | This program is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | This program is distributed in the hope that it will be useful, | 13 | This program is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/oldXMenu/insque.c b/oldXMenu/insque.c index 248eeafce6a..c044ff0141a 100644 --- a/oldXMenu/insque.c +++ b/oldXMenu/insque.c | |||
| @@ -3,8 +3,8 @@ Copyright (C) 1993-1998, 2001-2016 Free Software Foundation, Inc. | |||
| 3 | 3 | ||
| 4 | This program is free software: you can redistribute it and/or modify | 4 | This program is free software: you can redistribute it and/or modify |
| 5 | it under the terms of the GNU General Public License as published by | 5 | it under the terms of the GNU General Public License as published by |
| 6 | the Free Software Foundation, either version 3 of the License, or | 6 | the Free Software Foundation, either version 3 of the License, or (at |
| 7 | (at your option) any later version. | 7 | your option) any later version. |
| 8 | 8 | ||
| 9 | This program is distributed in the hope that it will be useful, | 9 | This program is distributed in the hope that it will be useful, |
| 10 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 10 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/alloc.c b/src/alloc.c index 5ee1cc340a5..eaa92eeddcc 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/atimer.c b/src/atimer.c index 801956082d9..70d9bf52bc2 100644 --- a/src/atimer.c +++ b/src/atimer.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/atimer.h b/src/atimer.h index bebd156c832..17183c82e72 100644 --- a/src/atimer.h +++ b/src/atimer.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/bidi.c b/src/bidi.c index e7787054e23..a68ffdb7e6d 100644 --- a/src/bidi.c +++ b/src/bidi.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -2318,7 +2318,31 @@ bidi_resolve_weak (struct bidi_it *bidi_it) | |||
| 2318 | if (bidi_it->next_en_type == WEAK_EN) /* ET/BN with EN after it */ | 2318 | if (bidi_it->next_en_type == WEAK_EN) /* ET/BN with EN after it */ |
| 2319 | type = WEAK_EN; | 2319 | type = WEAK_EN; |
| 2320 | } | 2320 | } |
| 2321 | else if (bidi_it->next_en_pos >=0) | 2321 | else if (type == WEAK_BN |
| 2322 | /* This condition is for the following important case: | ||
| 2323 | |||
| 2324 | . we are at level zero | ||
| 2325 | . either previous strong character was L, | ||
| 2326 | or we've seen no strong characters since sos | ||
| 2327 | and the base paragraph direction is L2R | ||
| 2328 | . this BN is NOT a bidi directional control | ||
| 2329 | |||
| 2330 | For such a situation, either this BN will be | ||
| 2331 | converted to EN per W5, and then to L by virtue | ||
| 2332 | of W7; or it will become ON per W6, and then L | ||
| 2333 | because of N1/N2. So we take a shortcut here | ||
| 2334 | and make it L right away, to avoid the | ||
| 2335 | potentially costly loop below. This is | ||
| 2336 | important when the buffer has a long series of | ||
| 2337 | control characters, like binary nulls, and no | ||
| 2338 | R2L characters at all. */ | ||
| 2339 | && new_level == 0 | ||
| 2340 | && !bidi_explicit_dir_char (bidi_it->ch) | ||
| 2341 | && ((bidi_it->last_strong.type == STRONG_L) | ||
| 2342 | || (bidi_it->last_strong.type == UNKNOWN_BT | ||
| 2343 | && bidi_it->sos == L2R))) | ||
| 2344 | type = STRONG_L; | ||
| 2345 | else if (bidi_it->next_en_pos >= 0) | ||
| 2322 | { | 2346 | { |
| 2323 | /* We overstepped the last known position for ET | 2347 | /* We overstepped the last known position for ET |
| 2324 | resolution but there could be other such characters | 2348 | resolution but there could be other such characters |
| @@ -2981,9 +3005,10 @@ bidi_resolve_neutral (struct bidi_it *bidi_it) | |||
| 2981 | entering the expensive loop in the "else" clause. */ | 3005 | entering the expensive loop in the "else" clause. */ |
| 2982 | else if (current_level == 0 | 3006 | else if (current_level == 0 |
| 2983 | && bidi_it->prev_for_neutral.type == STRONG_L | 3007 | && bidi_it->prev_for_neutral.type == STRONG_L |
| 2984 | && type != WEAK_BN | 3008 | && (ASCII_CHAR_P (bidi_it->ch) |
| 2985 | && !bidi_explicit_dir_char (bidi_it->ch) | 3009 | || (type != WEAK_BN |
| 2986 | && !bidi_isolate_fmt_char (type)) | 3010 | && !bidi_explicit_dir_char (bidi_it->ch) |
| 3011 | && !bidi_isolate_fmt_char (type)))) | ||
| 2987 | type = bidi_resolve_neutral_1 (bidi_it->prev_for_neutral.type, | 3012 | type = bidi_resolve_neutral_1 (bidi_it->prev_for_neutral.type, |
| 2988 | STRONG_L, current_level); | 3013 | STRONG_L, current_level); |
| 2989 | else if (/* current level is 1 */ | 3014 | else if (/* current level is 1 */ |
| @@ -3163,7 +3188,7 @@ bidi_level_of_next_char (struct bidi_it *bidi_it) | |||
| 3163 | } | 3188 | } |
| 3164 | } | 3189 | } |
| 3165 | 3190 | ||
| 3166 | /* Perhaps the character we want is already cached s fully resolved. | 3191 | /* Perhaps the character we want is already cached as fully resolved. |
| 3167 | If it is, the call to bidi_cache_find below will return a type | 3192 | If it is, the call to bidi_cache_find below will return a type |
| 3168 | other than UNKNOWN_BT. */ | 3193 | other than UNKNOWN_BT. */ |
| 3169 | if (bidi_cache_idx > bidi_cache_start && !bidi_it->first_elt) | 3194 | if (bidi_cache_idx > bidi_cache_start && !bidi_it->first_elt) |
| @@ -3223,7 +3248,10 @@ bidi_level_of_next_char (struct bidi_it *bidi_it) | |||
| 3223 | if ((bidi_it->orig_type == NEUTRAL_WS | 3248 | if ((bidi_it->orig_type == NEUTRAL_WS |
| 3224 | || bidi_it->orig_type == WEAK_BN | 3249 | || bidi_it->orig_type == WEAK_BN |
| 3225 | || bidi_isolate_fmt_char (bidi_it->orig_type)) | 3250 | || bidi_isolate_fmt_char (bidi_it->orig_type)) |
| 3226 | && bidi_it->next_for_ws.charpos < bidi_it->charpos) | 3251 | && bidi_it->next_for_ws.charpos < bidi_it->charpos |
| 3252 | /* If this character is already at base level, we don't need to | ||
| 3253 | reset it, so avoid the potentially costly loop below. */ | ||
| 3254 | && level != bidi_it->level_stack[0].level) | ||
| 3227 | { | 3255 | { |
| 3228 | int ch; | 3256 | int ch; |
| 3229 | ptrdiff_t clen = bidi_it->ch_len; | 3257 | ptrdiff_t clen = bidi_it->ch_len; |
diff --git a/src/blockinput.h b/src/blockinput.h index 5b8bf64049a..bf513751079 100644 --- a/src/blockinput.h +++ b/src/blockinput.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/buffer.c b/src/buffer.c index 98b61c350e2..62b0bc8c6f4 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1044,7 +1044,7 @@ DEFUN ("generate-new-buffer-name", Fgenerate_new_buffer_name, | |||
| 1044 | doc: /* Return a string that is the name of no existing buffer based on NAME. | 1044 | doc: /* Return a string that is the name of no existing buffer based on NAME. |
| 1045 | If there is no live buffer named NAME, then return NAME. | 1045 | If there is no live buffer named NAME, then return NAME. |
| 1046 | Otherwise modify name by appending `<NUMBER>', incrementing NUMBER | 1046 | Otherwise modify name by appending `<NUMBER>', incrementing NUMBER |
| 1047 | (starting at 2) until an unused name is found, and then return that name. | 1047 | \(starting at 2) until an unused name is found, and then return that name. |
| 1048 | Optional second argument IGNORE specifies a name that is okay to use (if | 1048 | Optional second argument IGNORE specifies a name that is okay to use (if |
| 1049 | it is in the sequence to be tried) even if a buffer with that name exists. | 1049 | it is in the sequence to be tried) even if a buffer with that name exists. |
| 1050 | 1050 | ||
| @@ -3793,10 +3793,10 @@ If omitted, BUFFER defaults to the current buffer. | |||
| 3793 | BEG and END may be integers or markers. | 3793 | BEG and END may be integers or markers. |
| 3794 | The fourth arg FRONT-ADVANCE, if non-nil, makes the marker | 3794 | The fourth arg FRONT-ADVANCE, if non-nil, makes the marker |
| 3795 | for the front of the overlay advance when text is inserted there | 3795 | for the front of the overlay advance when text is inserted there |
| 3796 | (which means the text *is not* included in the overlay). | 3796 | \(which means the text *is not* included in the overlay). |
| 3797 | The fifth arg REAR-ADVANCE, if non-nil, makes the marker | 3797 | The fifth arg REAR-ADVANCE, if non-nil, makes the marker |
| 3798 | for the rear of the overlay advance when text is inserted there | 3798 | for the rear of the overlay advance when text is inserted there |
| 3799 | (which means the text *is* included in the overlay). */) | 3799 | \(which means the text *is* included in the overlay). */) |
| 3800 | (Lisp_Object beg, Lisp_Object end, Lisp_Object buffer, | 3800 | (Lisp_Object beg, Lisp_Object end, Lisp_Object buffer, |
| 3801 | Lisp_Object front_advance, Lisp_Object rear_advance) | 3801 | Lisp_Object front_advance, Lisp_Object rear_advance) |
| 3802 | { | 3802 | { |
| @@ -6028,7 +6028,7 @@ between 0.0 and 1.0, inclusive. */); | |||
| 6028 | doc: /* List of functions to call before each text change. | 6028 | doc: /* List of functions to call before each text change. |
| 6029 | Two arguments are passed to each function: the positions of | 6029 | Two arguments are passed to each function: the positions of |
| 6030 | the beginning and end of the range of old text to be changed. | 6030 | the beginning and end of the range of old text to be changed. |
| 6031 | (For an insertion, the beginning and end are at the same place.) | 6031 | \(For an insertion, the beginning and end are at the same place.) |
| 6032 | No information is given about the length of the text after the change. | 6032 | No information is given about the length of the text after the change. |
| 6033 | 6033 | ||
| 6034 | Buffer changes made while executing the `before-change-functions' | 6034 | Buffer changes made while executing the `before-change-functions' |
| @@ -6045,7 +6045,7 @@ from happening repeatedly and making Emacs nonfunctional. */); | |||
| 6045 | Three arguments are passed to each function: the positions of | 6045 | Three arguments are passed to each function: the positions of |
| 6046 | the beginning and end of the range of changed text, | 6046 | the beginning and end of the range of changed text, |
| 6047 | and the length in chars of the pre-change text replaced by that range. | 6047 | and the length in chars of the pre-change text replaced by that range. |
| 6048 | (For an insertion, the pre-change length is zero; | 6048 | \(For an insertion, the pre-change length is zero; |
| 6049 | for a deletion, that length is the number of chars deleted, | 6049 | for a deletion, that length is the number of chars deleted, |
| 6050 | and the post-change beginning and end are at the same place.) | 6050 | and the post-change beginning and end are at the same place.) |
| 6051 | 6051 | ||
| @@ -6090,7 +6090,7 @@ was modified between BEG and END. PROPERTY is the property name, | |||
| 6090 | and VALUE is the old value. | 6090 | and VALUE is the old value. |
| 6091 | 6091 | ||
| 6092 | An entry (apply FUN-NAME . ARGS) means undo the change with | 6092 | An entry (apply FUN-NAME . ARGS) means undo the change with |
| 6093 | (apply FUN-NAME ARGS). | 6093 | \(apply FUN-NAME ARGS). |
| 6094 | 6094 | ||
| 6095 | An entry (apply DELTA BEG END FUN-NAME . ARGS) supports selective undo | 6095 | An entry (apply DELTA BEG END FUN-NAME . ARGS) supports selective undo |
| 6096 | in the active region. BEG and END is the range affected by this entry | 6096 | in the active region. BEG and END is the range affected by this entry |
| @@ -6250,7 +6250,7 @@ to the default frame line height. A value of nil means add no extra space. */) | |||
| 6250 | doc: /* Non-nil means show a cursor in non-selected windows. | 6250 | doc: /* Non-nil means show a cursor in non-selected windows. |
| 6251 | If nil, only shows a cursor in the selected window. | 6251 | If nil, only shows a cursor in the selected window. |
| 6252 | If t, displays a cursor related to the usual cursor type | 6252 | If t, displays a cursor related to the usual cursor type |
| 6253 | (a solid box becomes hollow, a bar becomes a narrower bar). | 6253 | \(a solid box becomes hollow, a bar becomes a narrower bar). |
| 6254 | You can also specify the cursor type as in the `cursor-type' variable. | 6254 | You can also specify the cursor type as in the `cursor-type' variable. |
| 6255 | Use Custom to set this variable and update the display. */); | 6255 | Use Custom to set this variable and update the display. */); |
| 6256 | 6256 | ||
diff --git a/src/buffer.h b/src/buffer.h index 5783bfb51ab..87b7cee4413 100644 --- a/src/buffer.h +++ b/src/buffer.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -352,9 +352,9 @@ extern void enlarge_buffer_text (struct buffer *, ptrdiff_t); | |||
| 352 | /* Convert PTR, the address of a byte in the buffer, into a byte position. */ | 352 | /* Convert PTR, the address of a byte in the buffer, into a byte position. */ |
| 353 | 353 | ||
| 354 | #define PTR_BYTE_POS(ptr) \ | 354 | #define PTR_BYTE_POS(ptr) \ |
| 355 | ((ptr) - (current_buffer)->text->beg \ | 355 | ((ptr) - (current_buffer)->text->beg \ |
| 356 | - (ptr - (current_buffer)->text->beg <= GPT_BYTE - BEG_BYTE ? 0 : GAP_SIZE) \ | 356 | - (ptr - (current_buffer)->text->beg <= GPT_BYTE - BEG_BYTE ? 0 : GAP_SIZE) \ |
| 357 | + BEG_BYTE) | 357 | + BEG_BYTE) |
| 358 | 358 | ||
| 359 | /* Return character at byte position POS. See the caveat WARNING for | 359 | /* Return character at byte position POS. See the caveat WARNING for |
| 360 | FETCH_MULTIBYTE_CHAR below. */ | 360 | FETCH_MULTIBYTE_CHAR below. */ |
| @@ -386,24 +386,24 @@ extern void enlarge_buffer_text (struct buffer *, ptrdiff_t); | |||
| 386 | Note that both arguments can be computed more than once. */ | 386 | Note that both arguments can be computed more than once. */ |
| 387 | 387 | ||
| 388 | #define BUF_BYTE_ADDRESS(buf, pos) \ | 388 | #define BUF_BYTE_ADDRESS(buf, pos) \ |
| 389 | ((buf)->text->beg + (pos) - BEG_BYTE \ | 389 | ((buf)->text->beg + (pos) - BEG_BYTE \ |
| 390 | + ((pos) >= (buf)->text->gpt_byte ? (buf)->text->gap_size : 0)) | 390 | + ((pos) >= (buf)->text->gpt_byte ? (buf)->text->gap_size : 0)) |
| 391 | 391 | ||
| 392 | /* Return the address of character at char position POS in buffer BUF. | 392 | /* Return the address of character at char position POS in buffer BUF. |
| 393 | Note that both arguments can be computed more than once. */ | 393 | Note that both arguments can be computed more than once. */ |
| 394 | 394 | ||
| 395 | #define BUF_CHAR_ADDRESS(buf, pos) \ | 395 | #define BUF_CHAR_ADDRESS(buf, pos) \ |
| 396 | ((buf)->text->beg + buf_charpos_to_bytepos ((buf), (pos)) - BEG_BYTE \ | 396 | ((buf)->text->beg + buf_charpos_to_bytepos ((buf), (pos)) - BEG_BYTE \ |
| 397 | + ((pos) >= (buf)->text->gpt ? (buf)->text->gap_size : 0)) | 397 | + ((pos) >= (buf)->text->gpt ? (buf)->text->gap_size : 0)) |
| 398 | 398 | ||
| 399 | /* Convert PTR, the address of a char in buffer BUF, | 399 | /* Convert PTR, the address of a char in buffer BUF, |
| 400 | into a character position. */ | 400 | into a character position. */ |
| 401 | 401 | ||
| 402 | #define BUF_PTR_BYTE_POS(buf, ptr) \ | 402 | #define BUF_PTR_BYTE_POS(buf, ptr) \ |
| 403 | ((ptr) - (buf)->text->beg \ | 403 | ((ptr) - (buf)->text->beg \ |
| 404 | - (ptr - (buf)->text->beg <= BUF_GPT_BYTE (buf) - BEG_BYTE \ | 404 | - (ptr - (buf)->text->beg <= BUF_GPT_BYTE (buf) - BEG_BYTE \ |
| 405 | ? 0 : BUF_GAP_SIZE ((buf))) \ | 405 | ? 0 : BUF_GAP_SIZE ((buf))) \ |
| 406 | + BEG_BYTE) | 406 | + BEG_BYTE) |
| 407 | 407 | ||
| 408 | /* Return the character at byte position POS in buffer BUF. */ | 408 | /* Return the character at byte position POS in buffer BUF. */ |
| 409 | 409 | ||
diff --git a/src/bytecode.c b/src/bytecode.c index 0befe651418..9ae2e820d51 100644 --- a/src/bytecode.c +++ b/src/bytecode.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1996,9 +1996,9 @@ syms_of_bytecode (void) | |||
| 1996 | 1996 | ||
| 1997 | DEFVAR_LISP ("byte-code-meter", Vbyte_code_meter, | 1997 | DEFVAR_LISP ("byte-code-meter", Vbyte_code_meter, |
| 1998 | doc: /* A vector of vectors which holds a histogram of byte-code usage. | 1998 | doc: /* A vector of vectors which holds a histogram of byte-code usage. |
| 1999 | (aref (aref byte-code-meter 0) CODE) indicates how many times the byte | 1999 | \(aref (aref byte-code-meter 0) CODE) indicates how many times the byte |
| 2000 | opcode CODE has been executed. | 2000 | opcode CODE has been executed. |
| 2001 | (aref (aref byte-code-meter CODE1) CODE2), where CODE1 is not 0, | 2001 | \(aref (aref byte-code-meter CODE1) CODE2), where CODE1 is not 0, |
| 2002 | indicates how many times the byte opcodes CODE1 and CODE2 have been | 2002 | indicates how many times the byte opcodes CODE1 and CODE2 have been |
| 2003 | executed in succession. */); | 2003 | executed in succession. */); |
| 2004 | 2004 | ||
diff --git a/src/callint.c b/src/callint.c index 3b23f222986..3bcf2c8476b 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/callproc.c b/src/callproc.c index 9ad7ef21e2f..db602f538c9 100644 --- a/src/callproc.c +++ b/src/callproc.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1457,7 +1457,7 @@ This function searches `process-environment' for VARIABLE. | |||
| 1457 | 1457 | ||
| 1458 | If optional parameter ENV is a list, then search this list instead of | 1458 | If optional parameter ENV is a list, then search this list instead of |
| 1459 | `process-environment', and return t when encountering a negative entry | 1459 | `process-environment', and return t when encountering a negative entry |
| 1460 | (an entry for a variable with no value). */) | 1460 | \(an entry for a variable with no value). */) |
| 1461 | (Lisp_Object variable, Lisp_Object env) | 1461 | (Lisp_Object variable, Lisp_Object env) |
| 1462 | { | 1462 | { |
| 1463 | char *value; | 1463 | char *value; |
| @@ -1668,7 +1668,7 @@ Each element is a string (directory name) or nil (try default directory). | |||
| 1668 | 1668 | ||
| 1669 | By default the last element of this list is `exec-directory'. The | 1669 | By default the last element of this list is `exec-directory'. The |
| 1670 | last element is not always used, for example in shell completion | 1670 | last element is not always used, for example in shell completion |
| 1671 | (`shell-dynamic-complete-command'). */); | 1671 | \(`shell-dynamic-complete-command'). */); |
| 1672 | 1672 | ||
| 1673 | DEFVAR_LISP ("exec-suffixes", Vexec_suffixes, | 1673 | DEFVAR_LISP ("exec-suffixes", Vexec_suffixes, |
| 1674 | doc: /* List of suffixes to try to find executable file names. | 1674 | doc: /* List of suffixes to try to find executable file names. |
diff --git a/src/casefiddle.c b/src/casefiddle.c index 348215e532a..c5bfa366630 100644 --- a/src/casefiddle.c +++ b/src/casefiddle.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/casetab.c b/src/casetab.c index 8327fbd4f12..2461647bb13 100644 --- a/src/casetab.c +++ b/src/casetab.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/category.c b/src/category.c index 61502f85a0d..4397f662ba9 100644 --- a/src/category.c +++ b/src/category.c | |||
| @@ -13,8 +13,8 @@ This file is part of GNU Emacs. | |||
| 13 | 13 | ||
| 14 | GNU Emacs is free software: you can redistribute it and/or modify | 14 | GNU Emacs is free software: you can redistribute it and/or modify |
| 15 | it under the terms of the GNU General Public License as published by | 15 | it under the terms of the GNU General Public License as published by |
| 16 | the Free Software Foundation, either version 3 of the License, or | 16 | the Free Software Foundation, either version 3 of the License, or (at |
| 17 | (at your option) any later version. | 17 | your option) any later version. |
| 18 | 18 | ||
| 19 | GNU Emacs is distributed in the hope that it will be useful, | 19 | GNU Emacs is distributed in the hope that it will be useful, |
| 20 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 20 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -462,7 +462,7 @@ Emacs treats a sequence of word constituent characters as a single | |||
| 462 | word (i.e. finds no word boundary between them) only if they belong to | 462 | word (i.e. finds no word boundary between them) only if they belong to |
| 463 | the same script. But, exceptions are allowed in the following cases. | 463 | the same script. But, exceptions are allowed in the following cases. |
| 464 | 464 | ||
| 465 | (1) The case that characters are in different scripts is controlled | 465 | \(1) The case that characters are in different scripts is controlled |
| 466 | by the variable `word-combining-categories'. | 466 | by the variable `word-combining-categories'. |
| 467 | 467 | ||
| 468 | Emacs finds no word boundary between characters of different scripts | 468 | Emacs finds no word boundary between characters of different scripts |
| @@ -476,7 +476,7 @@ For instance, to tell that Han characters followed by Hiragana | |||
| 476 | characters can form a single word, the element `(?C . ?H)' should be | 476 | characters can form a single word, the element `(?C . ?H)' should be |
| 477 | in this list. | 477 | in this list. |
| 478 | 478 | ||
| 479 | (2) The case that character are in the same script is controlled by | 479 | \(2) The case that character are in the same script is controlled by |
| 480 | the variable `word-separating-categories'. | 480 | the variable `word-separating-categories'. |
| 481 | 481 | ||
| 482 | Emacs finds a word boundary between characters of the same script | 482 | Emacs finds a word boundary between characters of the same script |
diff --git a/src/category.h b/src/category.h index 02f9a193ae8..247f9093d09 100644 --- a/src/category.h +++ b/src/category.h | |||
| @@ -11,8 +11,8 @@ This file is part of GNU Emacs. | |||
| 11 | 11 | ||
| 12 | GNU Emacs is free software: you can redistribute it and/or modify | 12 | GNU Emacs is free software: you can redistribute it and/or modify |
| 13 | it under the terms of the GNU General Public License as published by | 13 | it under the terms of the GNU General Public License as published by |
| 14 | the Free Software Foundation, either version 3 of the License, or | 14 | the Free Software Foundation, either version 3 of the License, or (at |
| 15 | (at your option) any later version. | 15 | your option) any later version. |
| 16 | 16 | ||
| 17 | GNU Emacs is distributed in the hope that it will be useful, | 17 | GNU Emacs is distributed in the hope that it will be useful, |
| 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -12,8 +12,8 @@ This file is part of GNU Emacs. | |||
| 12 | 12 | ||
| 13 | GNU Emacs is free software: you can redistribute it and/or modify | 13 | GNU Emacs is free software: you can redistribute it and/or modify |
| 14 | it under the terms of the GNU General Public License as published by | 14 | it under the terms of the GNU General Public License as published by |
| 15 | the Free Software Foundation, either version 3 of the License, or | 15 | the Free Software Foundation, either version 3 of the License, or (at |
| 16 | (at your option) any later version. | 16 | your option) any later version. |
| 17 | 17 | ||
| 18 | GNU Emacs is distributed in the hope that it will be useful, | 18 | GNU Emacs is distributed in the hope that it will be useful, |
| 19 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 19 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -11,8 +11,8 @@ This file is part of GNU Emacs. | |||
| 11 | 11 | ||
| 12 | GNU Emacs is free software: you can redistribute it and/or modify | 12 | GNU Emacs is free software: you can redistribute it and/or modify |
| 13 | it under the terms of the GNU General Public License as published by | 13 | it under the terms of the GNU General Public License as published by |
| 14 | the Free Software Foundation, either version 3 of the License, or | 14 | the Free Software Foundation, either version 3 of the License, or (at |
| 15 | (at your option) any later version. | 15 | your option) any later version. |
| 16 | 16 | ||
| 17 | GNU Emacs is distributed in the hope that it will be useful, | 17 | GNU Emacs is distributed in the hope that it will be useful, |
| 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/character.c b/src/character.c index 48187480df1..9f60aa718d5 100644 --- a/src/character.c +++ b/src/character.c | |||
| @@ -11,8 +11,8 @@ This file is part of GNU Emacs. | |||
| 11 | 11 | ||
| 12 | GNU Emacs is free software: you can redistribute it and/or modify | 12 | GNU Emacs is free software: you can redistribute it and/or modify |
| 13 | it under the terms of the GNU General Public License as published by | 13 | it under the terms of the GNU General Public License as published by |
| 14 | the Free Software Foundation, either version 3 of the License, or | 14 | the Free Software Foundation, either version 3 of the License, or (at |
| 15 | (at your option) any later version. | 15 | your option) any later version. |
| 16 | 16 | ||
| 17 | GNU Emacs is distributed in the hope that it will be useful, | 17 | GNU Emacs is distributed in the hope that it will be useful, |
| 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/character.h b/src/character.h index 440e78147d1..bc3e1557844 100644 --- a/src/character.h +++ b/src/character.h | |||
| @@ -9,8 +9,8 @@ This file is part of GNU Emacs. | |||
| 9 | 9 | ||
| 10 | GNU Emacs is free software: you can redistribute it and/or modify | 10 | GNU Emacs is free software: you can redistribute it and/or modify |
| 11 | it under the terms of the GNU General Public License as published by | 11 | it under the terms of the GNU General Public License as published by |
| 12 | the Free Software Foundation, either version 3 of the License, or | 12 | the Free Software Foundation, either version 3 of the License, or (at |
| 13 | (at your option) any later version. | 13 | your option) any later version. |
| 14 | 14 | ||
| 15 | GNU Emacs is distributed in the hope that it will be useful, | 15 | GNU Emacs is distributed in the hope that it will be useful, |
| 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/charset.c b/src/charset.c index f911e9e5e0a..264036ae91b 100644 --- a/src/charset.c +++ b/src/charset.c | |||
| @@ -15,8 +15,8 @@ This file is part of GNU Emacs. | |||
| 15 | 15 | ||
| 16 | GNU Emacs is free software: you can redistribute it and/or modify | 16 | GNU Emacs is free software: you can redistribute it and/or modify |
| 17 | it under the terms of the GNU General Public License as published by | 17 | it under the terms of the GNU General Public License as published by |
| 18 | the Free Software Foundation, either version 3 of the License, or | 18 | the Free Software Foundation, either version 3 of the License, or (at |
| 19 | (at your option) any later version. | 19 | your option) any later version. |
| 20 | 20 | ||
| 21 | GNU Emacs is distributed in the hope that it will be useful, | 21 | GNU Emacs is distributed in the hope that it will be useful, |
| 22 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 22 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/charset.h b/src/charset.h index a5c453262ae..8e7756718d5 100644 --- a/src/charset.h +++ b/src/charset.h | |||
| @@ -13,8 +13,8 @@ This file is part of GNU Emacs. | |||
| 13 | 13 | ||
| 14 | GNU Emacs is free software: you can redistribute it and/or modify | 14 | GNU Emacs is free software: you can redistribute it and/or modify |
| 15 | it under the terms of the GNU General Public License as published by | 15 | it under the terms of the GNU General Public License as published by |
| 16 | the Free Software Foundation, either version 3 of the License, or | 16 | the Free Software Foundation, either version 3 of the License, or (at |
| 17 | (at your option) any later version. | 17 | your option) any later version. |
| 18 | 18 | ||
| 19 | GNU Emacs is distributed in the hope that it will be useful, | 19 | GNU Emacs is distributed in the hope that it will be useful, |
| 20 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 20 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/chartab.c b/src/chartab.c index ec618f3496e..6cf8fea0b6d 100644 --- a/src/chartab.c +++ b/src/chartab.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -533,7 +533,7 @@ DEFUN ("char-table-parent", Fchar_table_parent, Schar_table_parent, | |||
| 533 | The value is either nil or another char-table. | 533 | The value is either nil or another char-table. |
| 534 | If CHAR-TABLE holds nil for a given character, | 534 | If CHAR-TABLE holds nil for a given character, |
| 535 | then the actual applicable value is inherited from the parent char-table | 535 | then the actual applicable value is inherited from the parent char-table |
| 536 | (or from its parents, if necessary). */) | 536 | \(or from its parents, if necessary). */) |
| 537 | (Lisp_Object char_table) | 537 | (Lisp_Object char_table) |
| 538 | { | 538 | { |
| 539 | CHECK_CHAR_TABLE (char_table); | 539 | CHECK_CHAR_TABLE (char_table); |
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/cmds.c b/src/cmds.c index 34500031ba5..1e44dddfbf6 100644 --- a/src/cmds.c +++ b/src/cmds.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -106,7 +106,7 @@ right or to the left on the screen. This is in contrast with | |||
| 106 | DEFUN ("forward-line", Fforward_line, Sforward_line, 0, 1, "^p", | 106 | DEFUN ("forward-line", Fforward_line, Sforward_line, 0, 1, "^p", |
| 107 | doc: /* Move N lines forward (backward if N is negative). | 107 | doc: /* Move N lines forward (backward if N is negative). |
| 108 | Precisely, if point is on line I, move to the start of line I + N | 108 | Precisely, if point is on line I, move to the start of line I + N |
| 109 | ("start of line" in the logical order). | 109 | \("start of line" in the logical order). |
| 110 | If there isn't room, go as far as possible (no error). | 110 | If there isn't room, go as far as possible (no error). |
| 111 | 111 | ||
| 112 | Returns the count of lines left to move. If moving forward, | 112 | Returns the count of lines left to move. If moving forward, |
diff --git a/src/coding.c b/src/coding.c index f5fe52e04c0..e72d7b71867 100644 --- a/src/coding.c +++ b/src/coding.c | |||
| @@ -12,8 +12,8 @@ This file is part of GNU Emacs. | |||
| 12 | 12 | ||
| 13 | GNU Emacs is free software: you can redistribute it and/or modify | 13 | GNU Emacs is free software: you can redistribute it and/or modify |
| 14 | it under the terms of the GNU General Public License as published by | 14 | it under the terms of the GNU General Public License as published by |
| 15 | the Free Software Foundation, either version 3 of the License, or | 15 | the Free Software Foundation, either version 3 of the License, or (at |
| 16 | (at your option) any later version. | 16 | your option) any later version. |
| 17 | 17 | ||
| 18 | GNU Emacs is distributed in the hope that it will be useful, | 18 | GNU Emacs is distributed in the hope that it will be useful, |
| 19 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 19 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -9790,7 +9790,7 @@ DEFUN ("find-operation-coding-system", Ffind_operation_coding_system, | |||
| 9790 | doc: /* Choose a coding system for an operation based on the target name. | 9790 | doc: /* Choose a coding system for an operation based on the target name. |
| 9791 | The value names a pair of coding systems: (DECODING-SYSTEM . ENCODING-SYSTEM). | 9791 | The value names a pair of coding systems: (DECODING-SYSTEM . ENCODING-SYSTEM). |
| 9792 | DECODING-SYSTEM is the coding system to use for decoding | 9792 | DECODING-SYSTEM is the coding system to use for decoding |
| 9793 | (in case OPERATION does decoding), and ENCODING-SYSTEM is the coding system | 9793 | \(in case OPERATION does decoding), and ENCODING-SYSTEM is the coding system |
| 9794 | for encoding (in case OPERATION does encoding). | 9794 | for encoding (in case OPERATION does encoding). |
| 9795 | 9795 | ||
| 9796 | The first argument OPERATION specifies an I/O primitive: | 9796 | The first argument OPERATION specifies an I/O primitive: |
| @@ -11165,7 +11165,7 @@ the cdr part is used for encoding a text to be sent to a process. */); | |||
| 11165 | Table of extra Latin codes in the range 128..159 (inclusive). | 11165 | Table of extra Latin codes in the range 128..159 (inclusive). |
| 11166 | This is a vector of length 256. | 11166 | This is a vector of length 256. |
| 11167 | If Nth element is non-nil, the existence of code N in a file | 11167 | If Nth element is non-nil, the existence of code N in a file |
| 11168 | (or output of subprocess) doesn't prevent it to be detected as | 11168 | \(or output of subprocess) doesn't prevent it to be detected as |
| 11169 | a coding system of ISO 2022 variant which has a flag | 11169 | a coding system of ISO 2022 variant which has a flag |
| 11170 | `accept-latin-extra-code' t (e.g. iso-latin-1) on reading a file | 11170 | `accept-latin-extra-code' t (e.g. iso-latin-1) on reading a file |
| 11171 | or reading output of a subprocess. | 11171 | or reading output of a subprocess. |
diff --git a/src/coding.h b/src/coding.h index ea0cdd5329e..93ddff0c6bd 100644 --- a/src/coding.h +++ b/src/coding.h | |||
| @@ -12,8 +12,8 @@ This file is part of GNU Emacs. | |||
| 12 | 12 | ||
| 13 | GNU Emacs is free software: you can redistribute it and/or modify | 13 | GNU Emacs is free software: you can redistribute it and/or modify |
| 14 | it under the terms of the GNU General Public License as published by | 14 | it under the terms of the GNU General Public License as published by |
| 15 | the Free Software Foundation, either version 3 of the License, or | 15 | the Free Software Foundation, either version 3 of the License, or (at |
| 16 | (at your option) any later version. | 16 | your option) any later version. |
| 17 | 17 | ||
| 18 | GNU Emacs is distributed in the hope that it will be useful, | 18 | GNU Emacs is distributed in the hope that it will be useful, |
| 19 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 19 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/commands.h b/src/commands.h index 36ac00fba85..4e69cda5127 100644 --- a/src/commands.h +++ b/src/commands.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/composite.c b/src/composite.c index 43c909fe98f..49b00036361 100644 --- a/src/composite.c +++ b/src/composite.c | |||
| @@ -11,8 +11,8 @@ This file is part of GNU Emacs. | |||
| 11 | 11 | ||
| 12 | GNU Emacs is free software: you can redistribute it and/or modify | 12 | GNU Emacs is free software: you can redistribute it and/or modify |
| 13 | it under the terms of the GNU General Public License as published by | 13 | it under the terms of the GNU General Public License as published by |
| 14 | the Free Software Foundation, either version 3 of the License, or | 14 | the Free Software Foundation, either version 3 of the License, or (at |
| 15 | (at your option) any later version. | 15 | your option) any later version. |
| 16 | 16 | ||
| 17 | GNU Emacs is distributed in the hope that it will be useful, | 17 | GNU Emacs is distributed in the hope that it will be useful, |
| 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/composite.h b/src/composite.h index 1423feb92b2..80e17408831 100644 --- a/src/composite.h +++ b/src/composite.h | |||
| @@ -11,8 +11,8 @@ This file is part of GNU Emacs. | |||
| 11 | 11 | ||
| 12 | GNU Emacs is free software: you can redistribute it and/or modify | 12 | GNU Emacs is free software: you can redistribute it and/or modify |
| 13 | it under the terms of the GNU General Public License as published by | 13 | it under the terms of the GNU General Public License as published by |
| 14 | the Free Software Foundation, either version 3 of the License, or | 14 | the Free Software Foundation, either version 3 of the License, or (at |
| 15 | (at your option) any later version. | 15 | your option) any later version. |
| 16 | 16 | ||
| 17 | GNU Emacs is distributed in the hope that it will be useful, | 17 | GNU Emacs is distributed in the hope that it will be useful, |
| 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 18 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/conf_post.h b/src/conf_post.h index 11dbb6e81af..047e3575e19 100644 --- a/src/conf_post.h +++ b/src/conf_post.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/cygw32.c b/src/cygw32.c index 422b04d5b9c..682232035f6 100644 --- a/src/cygw32.c +++ b/src/cygw32.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/cygw32.h b/src/cygw32.h index 58d8cd4a08e..0f698817ed6 100644 --- a/src/cygw32.h +++ b/src/cygw32.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/data.c b/src/data.c index 07f87241917..2574cbbd764 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1673,7 +1673,7 @@ DEFUN ("make-local-variable", Fmake_local_variable, Smake_local_variable, | |||
| 1673 | 1, 1, "vMake Local Variable: ", | 1673 | 1, 1, "vMake Local Variable: ", |
| 1674 | doc: /* Make VARIABLE have a separate value in the current buffer. | 1674 | doc: /* Make VARIABLE have a separate value in the current buffer. |
| 1675 | Other buffers will continue to share a common default value. | 1675 | Other buffers will continue to share a common default value. |
| 1676 | (The buffer-local value of VARIABLE starts out as the same value | 1676 | \(The buffer-local value of VARIABLE starts out as the same value |
| 1677 | VARIABLE previously had. If VARIABLE was void, it remains void.) | 1677 | VARIABLE previously had. If VARIABLE was void, it remains void.) |
| 1678 | Return VARIABLE. | 1678 | Return VARIABLE. |
| 1679 | 1679 | ||
diff --git a/src/dbusbind.c b/src/dbusbind.c index 5148c3267dc..d3a32c00341 100644 --- a/src/dbusbind.c +++ b/src/dbusbind.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/decompress.c b/src/decompress.c index 8fb71b0379f..1213f482f77 100644 --- a/src/decompress.c +++ b/src/decompress.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/dired.c b/src/dired.c index fd5f142d0b5..ebc7029cc7f 100644 --- a/src/dired.c +++ b/src/dired.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/dispextern.h b/src/dispextern.h index 00667c5a8fa..70358724024 100644 --- a/src/dispextern.h +++ b/src/dispextern.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/dispnew.c b/src/dispnew.c index a9f06eb3c12..9cf12f1a995 100644 --- a/src/dispnew.c +++ b/src/dispnew.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -5669,7 +5669,7 @@ DEFUN ("sleep-for", Fsleep_for, Ssleep_for, 1, 2, 0, | |||
| 5669 | SECONDS may be a floating-point value, meaning that you can wait for a | 5669 | SECONDS may be a floating-point value, meaning that you can wait for a |
| 5670 | fraction of a second. Optional second arg MILLISECONDS specifies an | 5670 | fraction of a second. Optional second arg MILLISECONDS specifies an |
| 5671 | additional wait period, in milliseconds; this is for backwards compatibility. | 5671 | additional wait period, in milliseconds; this is for backwards compatibility. |
| 5672 | (Not all operating systems support waiting for a fraction of a second.) */) | 5672 | \(Not all operating systems support waiting for a fraction of a second.) */) |
| 5673 | (Lisp_Object seconds, Lisp_Object milliseconds) | 5673 | (Lisp_Object seconds, Lisp_Object milliseconds) |
| 5674 | { | 5674 | { |
| 5675 | double duration = extract_float (seconds); | 5675 | double duration = extract_float (seconds); |
diff --git a/src/disptab.h b/src/disptab.h index 211b649398a..964162f421a 100644 --- a/src/disptab.h +++ b/src/disptab.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -138,6 +138,9 @@ get_doc_string (Lisp_Object filepos, bool unibyte, bool definition) | |||
| 138 | #endif | 138 | #endif |
| 139 | if (fd < 0) | 139 | if (fd < 0) |
| 140 | { | 140 | { |
| 141 | if (errno == EMFILE || errno == ENFILE) | ||
| 142 | report_file_error ("Read error on documentation file", file); | ||
| 143 | |||
| 141 | SAFE_FREE (); | 144 | SAFE_FREE (); |
| 142 | AUTO_STRING (cannot_open, "Cannot open doc string file \""); | 145 | AUTO_STRING (cannot_open, "Cannot open doc string file \""); |
| 143 | AUTO_STRING (quote_nl, "\"\n"); | 146 | AUTO_STRING (quote_nl, "\"\n"); |
| @@ -716,7 +719,7 @@ is not on any keys. | |||
| 716 | Each substring of the form \\=\\{MAPVAR} is replaced by a summary of | 719 | Each substring of the form \\=\\{MAPVAR} is replaced by a summary of |
| 717 | the value of MAPVAR as a keymap. This summary is similar to the one | 720 | the value of MAPVAR as a keymap. This summary is similar to the one |
| 718 | produced by `describe-bindings'. The summary ends in two newlines | 721 | produced by `describe-bindings'. The summary ends in two newlines |
| 719 | (used by the helper function `help-make-xrefs' to find the end of the | 722 | \(used by the helper function `help-make-xrefs' to find the end of the |
| 720 | summary). | 723 | summary). |
| 721 | 724 | ||
| 722 | Each substring of the form \\=\\<MAPVAR> specifies the use of MAPVAR | 725 | Each substring of the form \\=\\<MAPVAR> specifies the use of MAPVAR |
diff --git a/src/doprnt.c b/src/doprnt.c index b0b92bf7ba7..506bbc3df35 100644 --- a/src/doprnt.c +++ b/src/doprnt.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/dosfns.c b/src/dosfns.c index f507f4121ec..880fee9163a 100644 --- a/src/dosfns.c +++ b/src/dosfns.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/dosfns.h b/src/dosfns.h index fa45d710a68..9fbf7eda192 100644 --- a/src/dosfns.h +++ b/src/dosfns.h | |||
| @@ -9,8 +9,8 @@ This file is part of GNU Emacs. | |||
| 9 | 9 | ||
| 10 | GNU Emacs is free software: you can redistribute it and/or modify | 10 | GNU Emacs is free software: you can redistribute it and/or modify |
| 11 | it under the terms of the GNU General Public License as published by | 11 | it under the terms of the GNU General Public License as published by |
| 12 | the Free Software Foundation, either version 3 of the License, or | 12 | the Free Software Foundation, either version 3 of the License, or (at |
| 13 | (at your option) any later version. | 13 | your option) any later version. |
| 14 | 14 | ||
| 15 | GNU Emacs is distributed in the hope that it will be useful, | 15 | GNU Emacs is distributed in the hope that it will be useful, |
| 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -29,4 +29,3 @@ extern int msdos_stdcolor_idx (const char *); | |||
| 29 | extern Lisp_Object msdos_stdcolor_name (int); | 29 | extern Lisp_Object msdos_stdcolor_name (int); |
| 30 | extern void x_set_title (struct frame *, Lisp_Object); | 30 | extern void x_set_title (struct frame *, Lisp_Object); |
| 31 | #endif | 31 | #endif |
| 32 | |||
diff --git a/src/dynlib.c b/src/dynlib.c index c4647e6fc1f..64f688ca800 100644 --- a/src/dynlib.c +++ b/src/dynlib.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/dynlib.h b/src/dynlib.h index 33b6d60d474..a9da985e399 100644 --- a/src/dynlib.h +++ b/src/dynlib.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/editfns.c b/src/editfns.c index 2f46cfeb2b4..c6441c25af9 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1895,7 +1895,7 @@ DEFUN ("float-time", Ffloat_time, Sfloat_time, 0, 1, 0, | |||
| 1895 | doc: /* Return the current time, as a float number of seconds since the epoch. | 1895 | doc: /* Return the current time, as a float number of seconds since the epoch. |
| 1896 | If SPECIFIED-TIME is given, it is the time to convert to float | 1896 | If SPECIFIED-TIME is given, it is the time to convert to float |
| 1897 | instead of the current time. The argument should have the form | 1897 | instead of the current time. The argument should have the form |
| 1898 | (HIGH LOW) or (HIGH LOW USEC) or (HIGH LOW USEC PSEC). Thus, | 1898 | \(HIGH LOW) or (HIGH LOW USEC) or (HIGH LOW USEC PSEC). Thus, |
| 1899 | you can use times from `current-time' and from `file-attributes'. | 1899 | you can use times from `current-time' and from `file-attributes'. |
| 1900 | SPECIFIED-TIME can also have the form (HIGH . LOW), but this is | 1900 | SPECIFIED-TIME can also have the form (HIGH . LOW), but this is |
| 1901 | considered obsolete. | 1901 | considered obsolete. |
| @@ -2284,7 +2284,7 @@ OFFSET is an integer number of seconds ahead of UTC (east of Greenwich). | |||
| 2284 | NAME is a string giving the name of the time zone. | 2284 | NAME is a string giving the name of the time zone. |
| 2285 | If SPECIFIED-TIME is given, the time zone offset is determined from it | 2285 | If SPECIFIED-TIME is given, the time zone offset is determined from it |
| 2286 | instead of using the current time. The argument should have the form | 2286 | instead of using the current time. The argument should have the form |
| 2287 | (HIGH LOW . IGNORED). Thus, you can use times obtained from | 2287 | \(HIGH LOW . IGNORED). Thus, you can use times obtained from |
| 2288 | `current-time' and from `file-attributes'. SPECIFIED-TIME can also | 2288 | `current-time' and from `file-attributes'. SPECIFIED-TIME can also |
| 2289 | have the form (HIGH . LOW), but this is considered obsolete. | 2289 | have the form (HIGH . LOW), but this is considered obsolete. |
| 2290 | Optional second arg ZONE is omitted or nil for the local time zone, or | 2290 | Optional second arg ZONE is omitted or nil for the local time zone, or |
| @@ -3627,7 +3627,7 @@ save_restriction_restore (Lisp_Object data) | |||
| 3627 | DEFUN ("save-restriction", Fsave_restriction, Ssave_restriction, 0, UNEVALLED, 0, | 3627 | DEFUN ("save-restriction", Fsave_restriction, Ssave_restriction, 0, UNEVALLED, 0, |
| 3628 | doc: /* Execute BODY, saving and restoring current buffer's restrictions. | 3628 | doc: /* Execute BODY, saving and restoring current buffer's restrictions. |
| 3629 | The buffer's restrictions make parts of the beginning and end invisible. | 3629 | The buffer's restrictions make parts of the beginning and end invisible. |
| 3630 | (They are set up with `narrow-to-region' and eliminated with `widen'.) | 3630 | \(They are set up with `narrow-to-region' and eliminated with `widen'.) |
| 3631 | This special form, `save-restriction', saves the current buffer's restrictions | 3631 | This special form, `save-restriction', saves the current buffer's restrictions |
| 3632 | when it is entered, and restores them when it is exited. | 3632 | when it is entered, and restores them when it is exited. |
| 3633 | So any `narrow-to-region' within BODY lasts only until the end of the form. | 3633 | So any `narrow-to-region' within BODY lasts only until the end of the form. |
diff --git a/src/emacs-icon.h b/src/emacs-icon.h index 2f0806c607f..970135fd0f7 100644 --- a/src/emacs-icon.h +++ b/src/emacs-icon.h | |||
| @@ -9,8 +9,8 @@ This file is part of GNU Emacs. | |||
| 9 | 9 | ||
| 10 | GNU Emacs is free software: you can redistribute it and/or modify | 10 | GNU Emacs is free software: you can redistribute it and/or modify |
| 11 | it under the terms of the GNU General Public License as published by | 11 | it under the terms of the GNU General Public License as published by |
| 12 | the Free Software Foundation, either version 3 of the License, or | 12 | the Free Software Foundation, either version 3 of the License, or (at |
| 13 | (at your option) any later version. | 13 | your option) any later version. |
| 14 | 14 | ||
| 15 | GNU Emacs is distributed in the hope that it will be useful, | 15 | GNU Emacs is distributed in the hope that it will be useful, |
| 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -350,4 +350,3 @@ static unsigned char gnu_xbm_bits[] = { | |||
| 350 | 0xf8, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0xa0, 0x02, 0x00, 0x00, 0x00, | 350 | 0xf8, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0xa0, 0x02, 0x00, 0x00, 0x00, |
| 351 | 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, | 351 | 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
| 352 | 0x00, 0x00}; | 352 | 0x00, 0x00}; |
| 353 | |||
diff --git a/src/emacs-module.c b/src/emacs-module.c index a459ab84cf5..3edb943d4ca 100644 --- a/src/emacs-module.c +++ b/src/emacs-module.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/emacs-module.h b/src/emacs-module.h index 13dcca0706e..ae7311b05a7 100644 --- a/src/emacs-module.h +++ b/src/emacs-module.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/emacs.c b/src/emacs.c index cdc4ebbe437..95d1905ae22 100644 --- a/src/emacs.c +++ b/src/emacs.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/emacsgtkfixed.c b/src/emacsgtkfixed.c index 6795155831e..cebd7b613c7 100644 --- a/src/emacsgtkfixed.c +++ b/src/emacsgtkfixed.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/emacsgtkfixed.h b/src/emacsgtkfixed.h index 72652c53104..3d6a76ab570 100644 --- a/src/emacsgtkfixed.h +++ b/src/emacsgtkfixed.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/eval.c b/src/eval.c index b6bf0e64052..74b30e66bce 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1191,7 +1191,7 @@ suppresses the debugger). | |||
| 1191 | When a handler handles an error, control returns to the `condition-case' | 1191 | When a handler handles an error, control returns to the `condition-case' |
| 1192 | and it executes the handler's BODY... | 1192 | and it executes the handler's BODY... |
| 1193 | with VAR bound to (ERROR-SYMBOL . SIGNAL-DATA) from the error. | 1193 | with VAR bound to (ERROR-SYMBOL . SIGNAL-DATA) from the error. |
| 1194 | (If VAR is nil, the handler can't access that information.) | 1194 | \(If VAR is nil, the handler can't access that information.) |
| 1195 | Then the value of the last BODY form is returned from the `condition-case' | 1195 | Then the value of the last BODY form is returned from the `condition-case' |
| 1196 | expression. | 1196 | expression. |
| 1197 | 1197 | ||
| @@ -2416,7 +2416,7 @@ may be nil, a function, or a list of functions. Call each | |||
| 2416 | function in order with arguments ARGS, stopping at the first | 2416 | function in order with arguments ARGS, stopping at the first |
| 2417 | one that returns nil, and return nil. Otherwise (if all functions | 2417 | one that returns nil, and return nil. Otherwise (if all functions |
| 2418 | return non-nil, or if there are no functions to call), return non-nil | 2418 | return non-nil, or if there are no functions to call), return non-nil |
| 2419 | (do not rely on the precise return value in this case). | 2419 | \(do not rely on the precise return value in this case). |
| 2420 | 2420 | ||
| 2421 | Do not use `make-local-variable' to make a hook variable buffer-local. | 2421 | Do not use `make-local-variable' to make a hook variable buffer-local. |
| 2422 | Instead, use `add-hook' and specify t for the LOCAL argument. | 2422 | Instead, use `add-hook' and specify t for the LOCAL argument. |
diff --git a/src/fileio.c b/src/fileio.c index 0372f46cd55..dfab3de9e94 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -450,7 +450,7 @@ DEFUN ("unhandled-file-name-directory", Funhandled_file_name_directory, | |||
| 450 | A `directly usable' directory name is one that may be used without the | 450 | A `directly usable' directory name is one that may be used without the |
| 451 | intervention of any file handler. | 451 | intervention of any file handler. |
| 452 | If FILENAME is a directly usable file itself, return | 452 | If FILENAME is a directly usable file itself, return |
| 453 | (file-name-as-directory FILENAME). | 453 | \(file-name-as-directory FILENAME). |
| 454 | If FILENAME refers to a file which is not accessible from a local process, | 454 | If FILENAME refers to a file which is not accessible from a local process, |
| 455 | then this should return nil. | 455 | then this should return nil. |
| 456 | The `call-process' and `start-process' functions use this function to | 456 | The `call-process' and `start-process' functions use this function to |
| @@ -741,7 +741,7 @@ DEFUN ("make-temp-name", Fmake_temp_name, Smake_temp_name, 1, 1, 0, | |||
| 741 | doc: /* Generate temporary file name (string) starting with PREFIX (a string). | 741 | doc: /* Generate temporary file name (string) starting with PREFIX (a string). |
| 742 | The Emacs process number forms part of the result, so there is no | 742 | The Emacs process number forms part of the result, so there is no |
| 743 | danger of generating a name being used by another Emacs process | 743 | danger of generating a name being used by another Emacs process |
| 744 | (so long as only a single host can access the containing directory...). | 744 | \(so long as only a single host can access the containing directory...). |
| 745 | 745 | ||
| 746 | This function tries to choose a name that has no existing file. | 746 | This function tries to choose a name that has no existing file. |
| 747 | For this to work, PREFIX should be an absolute file name. | 747 | For this to work, PREFIX should be an absolute file name. |
| @@ -757,7 +757,7 @@ normally use `make-temp-file' instead. */) | |||
| 757 | DEFUN ("expand-file-name", Fexpand_file_name, Sexpand_file_name, 1, 2, 0, | 757 | DEFUN ("expand-file-name", Fexpand_file_name, Sexpand_file_name, 1, 2, 0, |
| 758 | doc: /* Convert filename NAME to absolute, and canonicalize it. | 758 | doc: /* Convert filename NAME to absolute, and canonicalize it. |
| 759 | Second arg DEFAULT-DIRECTORY is directory to start with if NAME is relative | 759 | Second arg DEFAULT-DIRECTORY is directory to start with if NAME is relative |
| 760 | (does not start with slash or tilde); both the directory name and | 760 | \(does not start with slash or tilde); both the directory name and |
| 761 | a directory's file name are accepted. If DEFAULT-DIRECTORY is nil or | 761 | a directory's file name are accepted. If DEFAULT-DIRECTORY is nil or |
| 762 | missing, the current buffer's value of `default-directory' is used. | 762 | missing, the current buffer's value of `default-directory' is used. |
| 763 | NAME should be a string that is a valid file name for the underlying | 763 | NAME should be a string that is a valid file name for the underlying |
| @@ -775,8 +775,8 @@ See also the function `substitute-in-file-name'. | |||
| 775 | 775 | ||
| 776 | For technical reasons, this function can return correct but | 776 | For technical reasons, this function can return correct but |
| 777 | non-intuitive results for the root directory; for instance, | 777 | non-intuitive results for the root directory; for instance, |
| 778 | (expand-file-name ".." "/") returns "/..". For this reason, use | 778 | \(expand-file-name ".." "/") returns "/..". For this reason, use |
| 779 | (directory-file-name (file-name-directory dirname)) to traverse a | 779 | \(directory-file-name (file-name-directory dirname)) to traverse a |
| 780 | filesystem tree, not (expand-file-name ".." dirname). */) | 780 | filesystem tree, not (expand-file-name ".." dirname). */) |
| 781 | (Lisp_Object name, Lisp_Object default_directory) | 781 | (Lisp_Object name, Lisp_Object default_directory) |
| 782 | { | 782 | { |
| @@ -1459,7 +1459,7 @@ filesystem tree, not (expand-file-name ".." dirname). */) | |||
| 1459 | DEAFUN ("expand-file-name", Fexpand_file_name, Sexpand_file_name, 1, 2, 0, | 1459 | DEAFUN ("expand-file-name", Fexpand_file_name, Sexpand_file_name, 1, 2, 0, |
| 1460 | "Convert FILENAME to absolute, and canonicalize it.\n\ | 1460 | "Convert FILENAME to absolute, and canonicalize it.\n\ |
| 1461 | Second arg DEFAULT is directory to start with if FILENAME is relative\n\ | 1461 | Second arg DEFAULT is directory to start with if FILENAME is relative\n\ |
| 1462 | (does not start with slash); if DEFAULT is nil or missing,\n\ | 1462 | \(does not start with slash); if DEFAULT is nil or missing,\n\ |
| 1463 | the current buffer's value of default-directory is used.\n\ | 1463 | the current buffer's value of default-directory is used.\n\ |
| 1464 | Filenames containing `.' or `..' as components are simplified;\n\ | 1464 | Filenames containing `.' or `..' as components are simplified;\n\ |
| 1465 | initial `~/' expands to your home directory.\n\ | 1465 | initial `~/' expands to your home directory.\n\ |
| @@ -2468,7 +2468,7 @@ Use `file-symlink-p' to test for such links. */) | |||
| 2468 | DEFUN ("file-executable-p", Ffile_executable_p, Sfile_executable_p, 1, 1, 0, | 2468 | DEFUN ("file-executable-p", Ffile_executable_p, Sfile_executable_p, 1, 1, 0, |
| 2469 | doc: /* Return t if FILENAME can be executed by you. | 2469 | doc: /* Return t if FILENAME can be executed by you. |
| 2470 | For a directory, this means you can access files in that directory. | 2470 | For a directory, this means you can access files in that directory. |
| 2471 | (It is generally better to use `file-accessible-directory-p' for that | 2471 | \(It is generally better to use `file-accessible-directory-p' for that |
| 2472 | purpose, though.) */) | 2472 | purpose, though.) */) |
| 2473 | (Lisp_Object filename) | 2473 | (Lisp_Object filename) |
| 2474 | { | 2474 | { |
| @@ -5329,8 +5329,8 @@ DEFUN ("set-visited-file-modtime", Fset_visited_file_modtime, | |||
| 5329 | Useful if the buffer was not read from the file normally | 5329 | Useful if the buffer was not read from the file normally |
| 5330 | or if the file itself has been changed for some known benign reason. | 5330 | or if the file itself has been changed for some known benign reason. |
| 5331 | An argument specifies the modification time value to use | 5331 | An argument specifies the modification time value to use |
| 5332 | (instead of that of the visited file), in the form of a list | 5332 | \(instead of that of the visited file), in the form of a list |
| 5333 | (HIGH LOW USEC PSEC) or an integer flag as returned by | 5333 | \(HIGH LOW USEC PSEC) or an integer flag as returned by |
| 5334 | `visited-file-modtime'. */) | 5334 | `visited-file-modtime'. */) |
| 5335 | (Lisp_Object time_flag) | 5335 | (Lisp_Object time_flag) |
| 5336 | { | 5336 | { |
diff --git a/src/filelock.c b/src/filelock.c index 57e3990041a..4c5d72ddb95 100644 --- a/src/filelock.c +++ b/src/filelock.c | |||
| @@ -10,8 +10,8 @@ This file is part of GNU Emacs. | |||
| 10 | 10 | ||
| 11 | GNU Emacs is free software: you can redistribute it and/or modify | 11 | GNU Emacs is free software: you can redistribute it and/or modify |
| 12 | it under the terms of the GNU General Public License as published by | 12 | it under the terms of the GNU General Public License as published by |
| 13 | the Free Software Foundation, either version 3 of the License, or | 13 | the Free Software Foundation, either version 3 of the License, or (at |
| 14 | (at your option) any later version. | 14 | your option) any later version. |
| 15 | 15 | ||
| 16 | GNU Emacs is distributed in the hope that it will be useful, | 16 | GNU Emacs is distributed in the hope that it will be useful, |
| 17 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 17 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/firstfile.c b/src/firstfile.c index 68effeb1106..188d4f81b5c 100644 --- a/src/firstfile.c +++ b/src/firstfile.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/floatfns.c b/src/floatfns.c index cf485b6fcea..b9af03b3431 100644 --- a/src/floatfns.c +++ b/src/floatfns.c | |||
| @@ -3,15 +3,15 @@ | |||
| 3 | Copyright (C) 1988, 1993-1994, 1999, 2001-2016 Free Software Foundation, | 3 | Copyright (C) 1988, 1993-1994, 1999, 2001-2016 Free Software Foundation, |
| 4 | Inc. | 4 | Inc. |
| 5 | 5 | ||
| 6 | Author: Wolfgang Rupprecht | 6 | Author: Wolfgang Rupprecht (ac |
| 7 | (according to ack.texi) | 7 | ording to ack.texi) |
| 8 | 8 | ||
| 9 | This file is part of GNU Emacs. | 9 | This file is part of GNU Emacs. |
| 10 | 10 | ||
| 11 | GNU Emacs is free software: you can redistribute it and/or modify | 11 | GNU Emacs is free software: you can redistribute it and/or modify |
| 12 | it under the terms of the GNU General Public License as published by | 12 | it under the terms of the GNU General Public License as published by |
| 13 | the Free Software Foundation, either version 3 of the License, or | 13 | the Free Software Foundation, either version 3 of the License, or (at |
| 14 | (at your option) any later version. | 14 | your option) any later version. |
| 15 | 15 | ||
| 16 | GNU Emacs is distributed in the hope that it will be useful, | 16 | GNU Emacs is distributed in the hope that it will be useful, |
| 17 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 17 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -170,7 +170,7 @@ Cause an error if X1 or X2 is not a float. */) | |||
| 170 | DEFUN ("frexp", Ffrexp, Sfrexp, 1, 1, 0, | 170 | DEFUN ("frexp", Ffrexp, Sfrexp, 1, 1, 0, |
| 171 | doc: /* Get significand and exponent of a floating point number. | 171 | doc: /* Get significand and exponent of a floating point number. |
| 172 | Breaks the floating point number X into its binary significand SGNFCAND | 172 | Breaks the floating point number X into its binary significand SGNFCAND |
| 173 | (a floating point value between 0.5 (included) and 1.0 (excluded)) | 173 | \(a floating point value between 0.5 (included) and 1.0 (excluded)) |
| 174 | and an integral exponent EXP for 2, such that: | 174 | and an integral exponent EXP for 2, such that: |
| 175 | 175 | ||
| 176 | X = SGNFCAND * 2^EXP | 176 | X = SGNFCAND * 2^EXP |
| @@ -491,7 +491,7 @@ fmod_float (Lisp_Object x, Lisp_Object y) | |||
| 491 | 491 | ||
| 492 | DEFUN ("fceiling", Ffceiling, Sfceiling, 1, 1, 0, | 492 | DEFUN ("fceiling", Ffceiling, Sfceiling, 1, 1, 0, |
| 493 | doc: /* Return the smallest integer no less than ARG, as a float. | 493 | doc: /* Return the smallest integer no less than ARG, as a float. |
| 494 | (Round toward +inf.) */) | 494 | \(Round toward +inf.) */) |
| 495 | (Lisp_Object arg) | 495 | (Lisp_Object arg) |
| 496 | { | 496 | { |
| 497 | double d = extract_float (arg); | 497 | double d = extract_float (arg); |
| @@ -501,7 +501,7 @@ DEFUN ("fceiling", Ffceiling, Sfceiling, 1, 1, 0, | |||
| 501 | 501 | ||
| 502 | DEFUN ("ffloor", Fffloor, Sffloor, 1, 1, 0, | 502 | DEFUN ("ffloor", Fffloor, Sffloor, 1, 1, 0, |
| 503 | doc: /* Return the largest integer no greater than ARG, as a float. | 503 | doc: /* Return the largest integer no greater than ARG, as a float. |
| 504 | (Round towards -inf.) */) | 504 | \(Round towards -inf.) */) |
| 505 | (Lisp_Object arg) | 505 | (Lisp_Object arg) |
| 506 | { | 506 | { |
| 507 | double d = extract_float (arg); | 507 | double d = extract_float (arg); |
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -218,7 +218,7 @@ DEFUN ("compare-strings", Fcompare_strings, Scompare_strings, 6, 7, 0, | |||
| 218 | The arguments START1, END1, START2, and END2, if non-nil, are | 218 | The arguments START1, END1, START2, and END2, if non-nil, are |
| 219 | positions specifying which parts of STR1 or STR2 to compare. In | 219 | positions specifying which parts of STR1 or STR2 to compare. In |
| 220 | string STR1, compare the part between START1 (inclusive) and END1 | 220 | string STR1, compare the part between START1 (inclusive) and END1 |
| 221 | (exclusive). If START1 is nil, it defaults to 0, the beginning of | 221 | \(exclusive). If START1 is nil, it defaults to 0, the beginning of |
| 222 | the string; if END1 is nil, it defaults to the length of the string. | 222 | the string; if END1 is nil, it defaults to the length of the string. |
| 223 | Likewise, in string STR2, compare the part between START2 and END2. | 223 | Likewise, in string STR2, compare the part between START2 and END2. |
| 224 | Like in `substring', negative values are counted from the end. | 224 | Like in `substring', negative values are counted from the end. |
| @@ -385,7 +385,7 @@ This function obeys the conventions for collation order in your | |||
| 385 | locale settings. For example, punctuation and whitespace characters | 385 | locale settings. For example, punctuation and whitespace characters |
| 386 | might be considered less significant for sorting: | 386 | might be considered less significant for sorting: |
| 387 | 387 | ||
| 388 | (sort \\='("11" "12" "1 1" "1 2" "1.1" "1.2") \\='string-collate-lessp) | 388 | \(sort \\='("11" "12" "1 1" "1 2" "1.1" "1.2") \\='string-collate-lessp) |
| 389 | => ("11" "1 1" "1.1" "12" "1 2" "1.2") | 389 | => ("11" "1 1" "1.1" "12" "1 2" "1.2") |
| 390 | 390 | ||
| 391 | The optional argument LOCALE, a string, overrides the setting of your | 391 | The optional argument LOCALE, a string, overrides the setting of your |
| @@ -431,7 +431,7 @@ settings. For example, characters with different coding points but | |||
| 431 | the same meaning might be considered as equal, like different grave | 431 | the same meaning might be considered as equal, like different grave |
| 432 | accent Unicode characters: | 432 | accent Unicode characters: |
| 433 | 433 | ||
| 434 | (string-collate-equalp (string ?\\uFF40) (string ?\\u1FEF)) | 434 | \(string-collate-equalp (string ?\\uFF40) (string ?\\u1FEF)) |
| 435 | => t | 435 | => t |
| 436 | 436 | ||
| 437 | The optional argument LOCALE, a string, overrides the setting of your | 437 | The optional argument LOCALE, a string, overrides the setting of your |
| @@ -1064,7 +1064,7 @@ to a multibyte character. In this case, the returned string is a | |||
| 1064 | newly created string with no text properties. If STRING is multibyte | 1064 | newly created string with no text properties. If STRING is multibyte |
| 1065 | or entirely ASCII, it is returned unchanged. In particular, when | 1065 | or entirely ASCII, it is returned unchanged. In particular, when |
| 1066 | STRING is unibyte and entirely ASCII, the returned string is unibyte. | 1066 | STRING is unibyte and entirely ASCII, the returned string is unibyte. |
| 1067 | (When the characters are all ASCII, Emacs primitives will treat the | 1067 | \(When the characters are all ASCII, Emacs primitives will treat the |
| 1068 | string the same way whether it is unibyte or multibyte.) */) | 1068 | string the same way whether it is unibyte or multibyte.) */) |
| 1069 | (Lisp_Object string) | 1069 | (Lisp_Object string) |
| 1070 | { | 1070 | { |
| @@ -1263,14 +1263,14 @@ validate_subarray (Lisp_Object array, Lisp_Object from, Lisp_Object to, | |||
| 1263 | DEFUN ("substring", Fsubstring, Ssubstring, 1, 3, 0, | 1263 | DEFUN ("substring", Fsubstring, Ssubstring, 1, 3, 0, |
| 1264 | doc: /* Return a new string whose contents are a substring of STRING. | 1264 | doc: /* Return a new string whose contents are a substring of STRING. |
| 1265 | The returned string consists of the characters between index FROM | 1265 | The returned string consists of the characters between index FROM |
| 1266 | (inclusive) and index TO (exclusive) of STRING. FROM and TO are | 1266 | \(inclusive) and index TO (exclusive) of STRING. FROM and TO are |
| 1267 | zero-indexed: 0 means the first character of STRING. Negative values | 1267 | zero-indexed: 0 means the first character of STRING. Negative values |
| 1268 | are counted from the end of STRING. If TO is nil, the substring runs | 1268 | are counted from the end of STRING. If TO is nil, the substring runs |
| 1269 | to the end of STRING. | 1269 | to the end of STRING. |
| 1270 | 1270 | ||
| 1271 | The STRING argument may also be a vector. In that case, the return | 1271 | The STRING argument may also be a vector. In that case, the return |
| 1272 | value is a new vector that contains the elements between index FROM | 1272 | value is a new vector that contains the elements between index FROM |
| 1273 | (inclusive) and index TO (exclusive) of that vector argument. | 1273 | \(inclusive) and index TO (exclusive) of that vector argument. |
| 1274 | 1274 | ||
| 1275 | With one argument, just copy STRING (with properties, if any). */) | 1275 | With one argument, just copy STRING (with properties, if any). */) |
| 1276 | (Lisp_Object string, Lisp_Object from, Lisp_Object to) | 1276 | (Lisp_Object string, Lisp_Object from, Lisp_Object to) |
| @@ -2090,7 +2090,7 @@ merge (Lisp_Object org_l1, Lisp_Object org_l2, Lisp_Object pred) | |||
| 2090 | DEFUN ("plist-get", Fplist_get, Splist_get, 2, 2, 0, | 2090 | DEFUN ("plist-get", Fplist_get, Splist_get, 2, 2, 0, |
| 2091 | doc: /* Extract a value from a property list. | 2091 | doc: /* Extract a value from a property list. |
| 2092 | PLIST is a property list, which is a list of the form | 2092 | PLIST is a property list, which is a list of the form |
| 2093 | (PROP1 VALUE1 PROP2 VALUE2...). This function returns the value | 2093 | \(PROP1 VALUE1 PROP2 VALUE2...). This function returns the value |
| 2094 | corresponding to the given PROP, or nil if PROP is not one of the | 2094 | corresponding to the given PROP, or nil if PROP is not one of the |
| 2095 | properties on the list. This function never signals an error. */) | 2095 | properties on the list. This function never signals an error. */) |
| 2096 | (Lisp_Object plist, Lisp_Object prop) | 2096 | (Lisp_Object plist, Lisp_Object prop) |
| @@ -2125,7 +2125,7 @@ This is the last value stored with `(put SYMBOL PROPNAME VALUE)'. */) | |||
| 2125 | DEFUN ("plist-put", Fplist_put, Splist_put, 3, 3, 0, | 2125 | DEFUN ("plist-put", Fplist_put, Splist_put, 3, 3, 0, |
| 2126 | doc: /* Change value in PLIST of PROP to VAL. | 2126 | doc: /* Change value in PLIST of PROP to VAL. |
| 2127 | PLIST is a property list, which is a list of the form | 2127 | PLIST is a property list, which is a list of the form |
| 2128 | (PROP1 VALUE1 PROP2 VALUE2 ...). PROP is a symbol and VAL is any object. | 2128 | \(PROP1 VALUE1 PROP2 VALUE2 ...). PROP is a symbol and VAL is any object. |
| 2129 | If PROP is already a property on the list, its value is set to VAL, | 2129 | If PROP is already a property on the list, its value is set to VAL, |
| 2130 | otherwise the new PROP VAL pair is added. The new plist is returned; | 2130 | otherwise the new PROP VAL pair is added. The new plist is returned; |
| 2131 | use `(setq x (plist-put x prop val))' to be sure to use the new value. | 2131 | use `(setq x (plist-put x prop val))' to be sure to use the new value. |
| @@ -2169,7 +2169,7 @@ It can be retrieved with `(get SYMBOL PROPNAME)'. */) | |||
| 2169 | DEFUN ("lax-plist-get", Flax_plist_get, Slax_plist_get, 2, 2, 0, | 2169 | DEFUN ("lax-plist-get", Flax_plist_get, Slax_plist_get, 2, 2, 0, |
| 2170 | doc: /* Extract a value from a property list, comparing with `equal'. | 2170 | doc: /* Extract a value from a property list, comparing with `equal'. |
| 2171 | PLIST is a property list, which is a list of the form | 2171 | PLIST is a property list, which is a list of the form |
| 2172 | (PROP1 VALUE1 PROP2 VALUE2...). This function returns the value | 2172 | \(PROP1 VALUE1 PROP2 VALUE2...). This function returns the value |
| 2173 | corresponding to the given PROP, or nil if PROP is not | 2173 | corresponding to the given PROP, or nil if PROP is not |
| 2174 | one of the properties on the list. */) | 2174 | one of the properties on the list. */) |
| 2175 | (Lisp_Object plist, Lisp_Object prop) | 2175 | (Lisp_Object plist, Lisp_Object prop) |
| @@ -2194,7 +2194,7 @@ one of the properties on the list. */) | |||
| 2194 | DEFUN ("lax-plist-put", Flax_plist_put, Slax_plist_put, 3, 3, 0, | 2194 | DEFUN ("lax-plist-put", Flax_plist_put, Slax_plist_put, 3, 3, 0, |
| 2195 | doc: /* Change value in PLIST of PROP to VAL, comparing with `equal'. | 2195 | doc: /* Change value in PLIST of PROP to VAL, comparing with `equal'. |
| 2196 | PLIST is a property list, which is a list of the form | 2196 | PLIST is a property list, which is a list of the form |
| 2197 | (PROP1 VALUE1 PROP2 VALUE2 ...). PROP and VAL are any objects. | 2197 | \(PROP1 VALUE1 PROP2 VALUE2 ...). PROP and VAL are any objects. |
| 2198 | If PROP is already a property on the list, its value is set to VAL, | 2198 | If PROP is already a property on the list, its value is set to VAL, |
| 2199 | otherwise the new PROP VAL pair is added. The new plist is returned; | 2199 | otherwise the new PROP VAL pair is added. The new plist is returned; |
| 2200 | use `(setq x (lax-plist-put x prop val))' to be sure to use the new value. | 2200 | use `(setq x (lax-plist-put x prop val))' to be sure to use the new value. |
| @@ -2907,7 +2907,7 @@ The normal messages at start and end of loading FILENAME are suppressed. */) | |||
| 2907 | DEFUN ("plist-member", Fplist_member, Splist_member, 2, 2, 0, | 2907 | DEFUN ("plist-member", Fplist_member, Splist_member, 2, 2, 0, |
| 2908 | doc: /* Return non-nil if PLIST has the property PROP. | 2908 | doc: /* Return non-nil if PLIST has the property PROP. |
| 2909 | PLIST is a property list, which is a list of the form | 2909 | PLIST is a property list, which is a list of the form |
| 2910 | (PROP1 VALUE1 PROP2 VALUE2 ...). PROP is a symbol. | 2910 | \(PROP1 VALUE1 PROP2 VALUE2 ...). PROP is a symbol. |
| 2911 | Unlike `plist-get', this allows you to distinguish between a missing | 2911 | Unlike `plist-get', this allows you to distinguish between a missing |
| 2912 | property and a property with the value nil. | 2912 | property and a property with the value nil. |
| 2913 | The value is actually the tail of PLIST whose car is PROP. */) | 2913 | The value is actually the tail of PLIST whose car is PROP. */) |
diff --git a/src/font.c b/src/font.c index 039493bcbea..5ab3b3e8399 100644 --- a/src/font.c +++ b/src/font.c | |||
| @@ -9,8 +9,8 @@ This file is part of GNU Emacs. | |||
| 9 | 9 | ||
| 10 | GNU Emacs is free software: you can redistribute it and/or modify | 10 | GNU Emacs is free software: you can redistribute it and/or modify |
| 11 | it under the terms of the GNU General Public License as published by | 11 | it under the terms of the GNU General Public License as published by |
| 12 | the Free Software Foundation, either version 3 of the License, or | 12 | the Free Software Foundation, either version 3 of the License, or (at |
| 13 | (at your option) any later version. | 13 | your option) any later version. |
| 14 | 14 | ||
| 15 | GNU Emacs is distributed in the hope that it will be useful, | 15 | GNU Emacs is distributed in the hope that it will be useful, |
| 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -4086,7 +4086,7 @@ DEFUN ("font-face-attributes", Ffont_face_attributes, Sfont_face_attributes, 1, | |||
| 4086 | FONT is a font name, a font-spec, a font-entity, or a font-object. | 4086 | FONT is a font name, a font-spec, a font-entity, or a font-object. |
| 4087 | The return value is a list of the form | 4087 | The return value is a list of the form |
| 4088 | 4088 | ||
| 4089 | (:family FAMILY :height HEIGHT :weight WEIGHT :slant SLANT :width WIDTH) | 4089 | \(:family FAMILY :height HEIGHT :weight WEIGHT :slant SLANT :width WIDTH) |
| 4090 | 4090 | ||
| 4091 | where FAMILY, HEIGHT, WEIGHT, SLANT, and WIDTH are face attribute values | 4091 | where FAMILY, HEIGHT, WEIGHT, SLANT, and WIDTH are face attribute values |
| 4092 | compatible with `set-face-attribute'. Some of these key-attribute pairs | 4092 | compatible with `set-face-attribute'. Some of these key-attribute pairs |
| @@ -5378,7 +5378,7 @@ where ENCODING is a charset or a char-table, | |||
| 5378 | and REPERTORY is a charset, a char-table, or nil. | 5378 | and REPERTORY is a charset, a char-table, or nil. |
| 5379 | 5379 | ||
| 5380 | If ENCODING and REPERTORY are the same, the element can have the form | 5380 | If ENCODING and REPERTORY are the same, the element can have the form |
| 5381 | (REGEXP . ENCODING). | 5381 | \(REGEXP . ENCODING). |
| 5382 | 5382 | ||
| 5383 | ENCODING is for converting a character to a glyph code of the font. | 5383 | ENCODING is for converting a character to a glyph code of the font. |
| 5384 | If ENCODING is a charset, encoding a character by the charset gives | 5384 | If ENCODING is a charset, encoding a character by the charset gives |
diff --git a/src/font.h b/src/font.h index 36fe51ad319..cf477290d06 100644 --- a/src/font.h +++ b/src/font.h | |||
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/fontset.c b/src/fontset.c index 0485f6bfd44..4ab13674318 100644 --- a/src/fontset.c +++ b/src/fontset.c | |||
| @@ -13,8 +13,8 @@ This file is part of GNU Emacs. | |||
| 13 | 13 | ||
| 14 | GNU Emacs is free software: you can redistribute it and/or modify | 14 | GNU Emacs is free software: you can redistribute it and/or modify |
| 15 | it under the terms of the GNU General Public License as published by | 15 | it under the terms of the GNU General Public License as published by |
| 16 | the Free Software Foundation, either version 3 of the License, or | 16 | the Free Software Foundation, either version 3 of the License, or (at |
| 17 | (at your option) any later version. | 17 | your option) any later version. |
| 18 | 18 | ||
| 19 | GNU Emacs is distributed in the hope that it will be useful, | 19 | GNU Emacs is distributed in the hope that it will be useful, |
| 20 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 20 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/fontset.h b/src/fontset.h index 048a7d463f7..91d690af49c 100644 --- a/src/fontset.h +++ b/src/fontset.h | |||
| @@ -12,8 +12,8 @@ This file is part of GNU Emacs. | |||
| 12 | 12 | ||
| 13 | GNU Emacs is free software: you can redistribute it and/or modify | 13 | GNU Emacs is free software: you can redistribute it and/or modify |
| 14 | it under the terms of the GNU General Public License as published by | 14 | it under the terms of the GNU General Public License as published by |
| 15 | the Free Software Foundation, either version 3 of the License, or | 15 | the Free Software Foundation, either version 3 of the License, or (at |
| 16 | (at your option) any later version. | 16 | your option) any later version. |
| 17 | 17 | ||
| 18 | GNU Emacs is distributed in the hope that it will be useful, | 18 | GNU Emacs is distributed in the hope that it will be useful, |
| 19 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 19 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/frame.c b/src/frame.c index d5364682f61..a0aff88cd38 100644 --- a/src/frame.c +++ b/src/frame.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -5226,7 +5226,7 @@ keep it unchanged if this option is either t or a list containing | |||
| 5226 | `vertical-scroll-bars'. | 5226 | `vertical-scroll-bars'. |
| 5227 | 5227 | ||
| 5228 | The default value is \\='(tool-bar-lines) on Lucid, Motif and Windows | 5228 | The default value is \\='(tool-bar-lines) on Lucid, Motif and Windows |
| 5229 | (which means that adding/removing a tool bar does not change the frame | 5229 | \(which means that adding/removing a tool bar does not change the frame |
| 5230 | height), nil on all other window systems including GTK+ (which means | 5230 | height), nil on all other window systems including GTK+ (which means |
| 5231 | that changing any of the parameters listed above may change the size of | 5231 | that changing any of the parameters listed above may change the size of |
| 5232 | the frame), and t otherwise (which means the frame size never changes | 5232 | the frame), and t otherwise (which means the frame size never changes |
diff --git a/src/frame.h b/src/frame.h index b83820a2084..9de672c8635 100644 --- a/src/frame.h +++ b/src/frame.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/fringe.c b/src/fringe.c index 597c666d3bc..061f78658cf 100644 --- a/src/fringe.c +++ b/src/fringe.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1701,7 +1701,7 @@ syms_of_fringe (void) | |||
| 1701 | DEFVAR_LISP ("overflow-newline-into-fringe", Voverflow_newline_into_fringe, | 1701 | DEFVAR_LISP ("overflow-newline-into-fringe", Voverflow_newline_into_fringe, |
| 1702 | doc: /* Non-nil means that newline may flow into the right fringe. | 1702 | doc: /* Non-nil means that newline may flow into the right fringe. |
| 1703 | This means that display lines which are exactly as wide as the window | 1703 | This means that display lines which are exactly as wide as the window |
| 1704 | (not counting the final newline) will only occupy one screen line, by | 1704 | \(not counting the final newline) will only occupy one screen line, by |
| 1705 | showing (or hiding) the final newline in the right fringe; when point | 1705 | showing (or hiding) the final newline in the right fringe; when point |
| 1706 | is at the final newline, the cursor is shown in the right fringe. | 1706 | is at the final newline, the cursor is shown in the right fringe. |
| 1707 | If nil, also continue lines which are exactly as wide as the window. */); | 1707 | If nil, also continue lines which are exactly as wide as the window. */); |
diff --git a/src/ftcrfont.c b/src/ftcrfont.c index f7b1e7d26a6..2676502705d 100644 --- a/src/ftcrfont.c +++ b/src/ftcrfont.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/ftfont.c b/src/ftfont.c index 505d508d2e0..a402245a067 100644 --- a/src/ftfont.c +++ b/src/ftfont.c | |||
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/ftfont.h b/src/ftfont.h index 0cfa0ae3e33..90abb452950 100644 --- a/src/ftfont.h +++ b/src/ftfont.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -44,4 +44,3 @@ extern Lisp_Object ftfont_open2 (struct frame *f, | |||
| 44 | extern size_t ftfont_info_size; | 44 | extern size_t ftfont_info_size; |
| 45 | 45 | ||
| 46 | #endif /* EMACS_FTFONT_H */ | 46 | #endif /* EMACS_FTFONT_H */ |
| 47 | |||
diff --git a/src/ftxfont.c b/src/ftxfont.c index adf0d29f8ca..f49d44ffc20 100644 --- a/src/ftxfont.c +++ b/src/ftxfont.c | |||
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/getpagesize.h b/src/getpagesize.h index e46415344e8..fe83ae8af21 100644 --- a/src/getpagesize.h +++ b/src/getpagesize.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -46,4 +46,3 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 46 | # endif /* no _SC_PAGESIZE */ | 46 | # endif /* no _SC_PAGESIZE */ |
| 47 | 47 | ||
| 48 | #endif /* no HAVE_GETPAGESIZE */ | 48 | #endif /* no HAVE_GETPAGESIZE */ |
| 49 | |||
diff --git a/src/gfilenotify.c b/src/gfilenotify.c index 62b4efb0a3d..3b1f2fc516a 100644 --- a/src/gfilenotify.c +++ b/src/gfilenotify.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/gnutls.c b/src/gnutls.c index a9a912eb4a4..63785fea07d 100644 --- a/src/gnutls.c +++ b/src/gnutls.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/gnutls.h b/src/gnutls.h index 7418f8f84f4..47e11f2905f 100644 --- a/src/gnutls.h +++ b/src/gnutls.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/gtkutil.c b/src/gtkutil.c index 14b76ce67ae..7dca5851f29 100644 --- a/src/gtkutil.c +++ b/src/gtkutil.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/gtkutil.h b/src/gtkutil.h index ff22e3c2210..8840fe76a85 100644 --- a/src/gtkutil.h +++ b/src/gtkutil.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/image.c b/src/image.c index aa45b001d30..bee066eb3fb 100644 --- a/src/image.c +++ b/src/image.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/indent.c b/src/indent.c index ee2e9c6fb71..d5162e35b52 100644 --- a/src/indent.c +++ b/src/indent.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/indent.h b/src/indent.h index 804c47d8293..f2a4c90ed44 100644 --- a/src/indent.h +++ b/src/indent.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/inotify.c b/src/inotify.c index e0619e584f7..38c8df5a29a 100644 --- a/src/inotify.c +++ b/src/inotify.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -272,7 +272,7 @@ onlydir | |||
| 272 | Watching a directory is not recursive. CALLBACK is passed a single argument | 272 | Watching a directory is not recursive. CALLBACK is passed a single argument |
| 273 | EVENT which contains an event structure of the format | 273 | EVENT which contains an event structure of the format |
| 274 | 274 | ||
| 275 | (WATCH-DESCRIPTOR ASPECTS NAME COOKIE) | 275 | \(WATCH-DESCRIPTOR ASPECTS NAME COOKIE) |
| 276 | 276 | ||
| 277 | WATCH-DESCRIPTOR is the same object that was returned by this function. It can | 277 | WATCH-DESCRIPTOR is the same object that was returned by this function. It can |
| 278 | be tested for equality using `equal'. ASPECTS describes the event. It is a | 278 | be tested for equality using `equal'. ASPECTS describes the event. It is a |
diff --git a/src/insdel.c b/src/insdel.c index 05f37d6f647..4ad1074f5f7 100644 --- a/src/insdel.c +++ b/src/insdel.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/intervals.c b/src/intervals.c index 29cc403933c..8451069708c 100644 --- a/src/intervals.c +++ b/src/intervals.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/intervals.h b/src/intervals.h index 2b68d4ef9d6..b8cdcfdc0f5 100644 --- a/src/intervals.h +++ b/src/intervals.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/keyboard.c b/src/keyboard.c index 4e1ac152a59..b8e0a6d88ea 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -11383,7 +11383,7 @@ See Info node `(elisp)Multiple Terminals'. */); | |||
| 11383 | 11383 | ||
| 11384 | DEFVAR_BOOL ("cannot-suspend", cannot_suspend, | 11384 | DEFVAR_BOOL ("cannot-suspend", cannot_suspend, |
| 11385 | doc: /* Non-nil means to always spawn a subshell instead of suspending. | 11385 | doc: /* Non-nil means to always spawn a subshell instead of suspending. |
| 11386 | (Even if the operating system has support for stopping a process.) */); | 11386 | \(Even if the operating system has support for stopping a process.) */); |
| 11387 | cannot_suspend = false; | 11387 | cannot_suspend = false; |
| 11388 | 11388 | ||
| 11389 | DEFVAR_BOOL ("menu-prompting", menu_prompting, | 11389 | DEFVAR_BOOL ("menu-prompting", menu_prompting, |
| @@ -11597,7 +11597,7 @@ immediately after running `post-command-hook'. */); | |||
| 11597 | DEFVAR_LISP ("input-method-function", Vinput_method_function, | 11597 | DEFVAR_LISP ("input-method-function", Vinput_method_function, |
| 11598 | doc: /* If non-nil, the function that implements the current input method. | 11598 | doc: /* If non-nil, the function that implements the current input method. |
| 11599 | It's called with one argument, a printing character that was just read. | 11599 | It's called with one argument, a printing character that was just read. |
| 11600 | (That means a character with code 040...0176.) | 11600 | \(That means a character with code 040...0176.) |
| 11601 | Typically this function uses `read-event' to read additional events. | 11601 | Typically this function uses `read-event' to read additional events. |
| 11602 | When it does so, it should first bind `input-method-function' to nil | 11602 | When it does so, it should first bind `input-method-function' to nil |
| 11603 | so it will not be called recursively. | 11603 | so it will not be called recursively. |
diff --git a/src/keyboard.h b/src/keyboard.h index 7f95f11bc10..387378750c8 100644 --- a/src/keyboard.h +++ b/src/keyboard.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/keymap.c b/src/keymap.c index 7928e62ea44..8ab4c6c27ae 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1687,7 +1687,7 @@ DEFUN ("global-key-binding", Fglobal_key_binding, Sglobal_key_binding, 1, 2, 0, | |||
| 1687 | KEYS is a string or vector, a sequence of keystrokes. | 1687 | KEYS is a string or vector, a sequence of keystrokes. |
| 1688 | The binding is probably a symbol with a function definition. | 1688 | The binding is probably a symbol with a function definition. |
| 1689 | This function's return values are the same as those of `lookup-key' | 1689 | This function's return values are the same as those of `lookup-key' |
| 1690 | (which see). | 1690 | \(which see). |
| 1691 | 1691 | ||
| 1692 | If optional argument ACCEPT-DEFAULT is non-nil, recognize default | 1692 | If optional argument ACCEPT-DEFAULT is non-nil, recognize default |
| 1693 | bindings; see the description of `lookup-key' for more details about this. */) | 1693 | bindings; see the description of `lookup-key' for more details about this. */) |
| @@ -2493,7 +2493,7 @@ If FIRSTONLY is the symbol `non-ascii', return the first binding found, | |||
| 2493 | no matter what it is. | 2493 | no matter what it is. |
| 2494 | If FIRSTONLY has another non-nil value, prefer bindings | 2494 | If FIRSTONLY has another non-nil value, prefer bindings |
| 2495 | that use the modifier key specified in `where-is-preferred-modifier' | 2495 | that use the modifier key specified in `where-is-preferred-modifier' |
| 2496 | (or their meta variants) and entirely reject menu bindings. | 2496 | \(or their meta variants) and entirely reject menu bindings. |
| 2497 | 2497 | ||
| 2498 | If optional 4th arg NOINDIRECT is non-nil, don't extract the commands inside | 2498 | If optional 4th arg NOINDIRECT is non-nil, don't extract the commands inside |
| 2499 | menu-items. This makes it possible to search for a menu-item itself. | 2499 | menu-items. This makes it possible to search for a menu-item itself. |
| @@ -2724,7 +2724,7 @@ looked up in BUFFER. | |||
| 2724 | The optional argument PREFIX, if non-nil, should be a key sequence; | 2724 | The optional argument PREFIX, if non-nil, should be a key sequence; |
| 2725 | then we display only bindings that start with that prefix. | 2725 | then we display only bindings that start with that prefix. |
| 2726 | The optional argument MENUS, if non-nil, says to mention menu bindings. | 2726 | The optional argument MENUS, if non-nil, says to mention menu bindings. |
| 2727 | (Ordinarily these are omitted from the output.) */) | 2727 | \(Ordinarily these are omitted from the output.) */) |
| 2728 | (Lisp_Object buffer, Lisp_Object prefix, Lisp_Object menus) | 2728 | (Lisp_Object buffer, Lisp_Object prefix, Lisp_Object menus) |
| 2729 | { | 2729 | { |
| 2730 | Lisp_Object outbuf, shadow; | 2730 | Lisp_Object outbuf, shadow; |
diff --git a/src/keymap.h b/src/keymap.h index 009aa01ee30..37f866c49a4 100644 --- a/src/keymap.h +++ b/src/keymap.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/kqueue.c b/src/kqueue.c index 7e3bfdd5746..f45bd0c4c24 100644 --- a/src/kqueue.c +++ b/src/kqueue.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -71,9 +71,8 @@ kqueue_directory_listing (Lisp_Object directory_files) | |||
| 71 | 71 | ||
| 72 | /* Generate a file notification event. */ | 72 | /* Generate a file notification event. */ |
| 73 | static void | 73 | static void |
| 74 | kqueue_generate_event | 74 | kqueue_generate_event (Lisp_Object watch_object, Lisp_Object actions, |
| 75 | (Lisp_Object watch_object, Lisp_Object actions, | 75 | Lisp_Object file, Lisp_Object file1) |
| 76 | Lisp_Object file, Lisp_Object file1) | ||
| 77 | { | 76 | { |
| 78 | Lisp_Object flags, action, entry; | 77 | Lisp_Object flags, action, entry; |
| 79 | struct input_event event; | 78 | struct input_event event; |
| @@ -113,8 +112,7 @@ kqueue_generate_event | |||
| 113 | replaced by the new directory listing at the end of this | 112 | replaced by the new directory listing at the end of this |
| 114 | function. */ | 113 | function. */ |
| 115 | static void | 114 | static void |
| 116 | kqueue_compare_dir_list | 115 | kqueue_compare_dir_list (Lisp_Object watch_object) |
| 117 | (Lisp_Object watch_object) | ||
| 118 | { | 116 | { |
| 119 | Lisp_Object dir, pending_dl, deleted_dl; | 117 | Lisp_Object dir, pending_dl, deleted_dl; |
| 120 | Lisp_Object old_directory_files, old_dl, new_directory_files, new_dl, dl; | 118 | Lisp_Object old_directory_files, old_dl, new_directory_files, new_dl, dl; |
diff --git a/src/lastfile.c b/src/lastfile.c index de4e4f45362..9d70b001d11 100644 --- a/src/lastfile.c +++ b/src/lastfile.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/lisp.h b/src/lisp.h index 9c7955e2bc4..d0abb24b685 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/lread.c b/src/lread.c index 25e3ff01d47..91469230b7e 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -264,7 +264,7 @@ readchar (Lisp_Object readcharfun, bool *multibyte) | |||
| 264 | return c; | 264 | return c; |
| 265 | } | 265 | } |
| 266 | 266 | ||
| 267 | if (CONSP (readcharfun)) | 267 | if (CONSP (readcharfun) && STRINGP (XCAR (readcharfun))) |
| 268 | { | 268 | { |
| 269 | /* This is the case that read_vector is reading from a unibyte | 269 | /* This is the case that read_vector is reading from a unibyte |
| 270 | string that contains a byte sequence previously skipped | 270 | string that contains a byte sequence previously skipped |
| @@ -406,7 +406,7 @@ unreadchar (Lisp_Object readcharfun, int c) | |||
| 406 | read_from_string_index_byte | 406 | read_from_string_index_byte |
| 407 | = string_char_to_byte (readcharfun, read_from_string_index); | 407 | = string_char_to_byte (readcharfun, read_from_string_index); |
| 408 | } | 408 | } |
| 409 | else if (CONSP (readcharfun)) | 409 | else if (CONSP (readcharfun) && STRINGP (XCAR (readcharfun))) |
| 410 | { | 410 | { |
| 411 | unread_char = c; | 411 | unread_char = c; |
| 412 | } | 412 | } |
| @@ -2059,7 +2059,7 @@ Returns a cons: (OBJECT-READ . FINAL-STRING-INDEX). | |||
| 2059 | FINAL-STRING-INDEX is an integer giving the position of the next | 2059 | FINAL-STRING-INDEX is an integer giving the position of the next |
| 2060 | remaining character in STRING. START and END optionally delimit | 2060 | remaining character in STRING. START and END optionally delimit |
| 2061 | a substring of STRING from which to read; they default to 0 and | 2061 | a substring of STRING from which to read; they default to 0 and |
| 2062 | (length STRING) respectively. Negative values are counted from | 2062 | \(length STRING) respectively. Negative values are counted from |
| 2063 | the end of STRING. */) | 2063 | the end of STRING. */) |
| 2064 | (Lisp_Object string, Lisp_Object start, Lisp_Object end) | 2064 | (Lisp_Object string, Lisp_Object start, Lisp_Object end) |
| 2065 | { | 2065 | { |
diff --git a/src/macfont.h b/src/macfont.h index 587f10a0ce0..6630fb526b7 100644 --- a/src/macfont.h +++ b/src/macfont.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -82,4 +82,3 @@ typedef const struct _EmacsScreenFont *ScreenFontRef; /* opaque */ | |||
| 82 | extern void mac_register_font_driver (struct frame *f); | 82 | extern void mac_register_font_driver (struct frame *f); |
| 83 | extern void *macfont_get_nsctfont (struct font *font); | 83 | extern void *macfont_get_nsctfont (struct font *font); |
| 84 | extern void macfont_update_antialias_threshold (void); | 84 | extern void macfont_update_antialias_threshold (void); |
| 85 | |||
diff --git a/src/macfont.m b/src/macfont.m index 45830e0ff8a..c9082a58415 100644 --- a/src/macfont.m +++ b/src/macfont.m | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/macros.c b/src/macros.c index 289f22bcd41..0c703ba1a1f 100644 --- a/src/macros.c +++ b/src/macros.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/macros.h b/src/macros.h index 3a0c57e0469..6c66c4a3bb6 100644 --- a/src/macros.h +++ b/src/macros.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/marker.c b/src/marker.c index 9f53e9a34ec..030083002f4 100644 --- a/src/marker.c +++ b/src/marker.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/menu.c b/src/menu.c index cbddef35754..9504cee5923 100644 --- a/src/menu.c +++ b/src/menu.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1130,7 +1130,7 @@ If POSITION is t, it means to use the current mouse position. | |||
| 1130 | MENU is a specifier for a menu. For the simplest case, MENU is a keymap. | 1130 | MENU is a specifier for a menu. For the simplest case, MENU is a keymap. |
| 1131 | The menu items come from key bindings that have a menu string as well as | 1131 | The menu items come from key bindings that have a menu string as well as |
| 1132 | a definition; actually, the "definition" in such a key binding looks like | 1132 | a definition; actually, the "definition" in such a key binding looks like |
| 1133 | (STRING . REAL-DEFINITION). To give the menu a title, put a string into | 1133 | \(STRING . REAL-DEFINITION). To give the menu a title, put a string into |
| 1134 | the keymap as a top-level element. | 1134 | the keymap as a top-level element. |
| 1135 | 1135 | ||
| 1136 | If REAL-DEFINITION is nil, that puts a nonselectable string in the menu. | 1136 | If REAL-DEFINITION is nil, that puts a nonselectable string in the menu. |
| @@ -1495,7 +1495,7 @@ The return value is VALUE from the chosen item. | |||
| 1495 | An ITEM may also be just a string--that makes a nonselectable item. | 1495 | An ITEM may also be just a string--that makes a nonselectable item. |
| 1496 | An ITEM may also be nil--that means to put all preceding items | 1496 | An ITEM may also be nil--that means to put all preceding items |
| 1497 | on the left of the dialog box and all following items on the right. | 1497 | on the left of the dialog box and all following items on the right. |
| 1498 | (By default, approximately half appear on each side.) | 1498 | \(By default, approximately half appear on each side.) |
| 1499 | 1499 | ||
| 1500 | If HEADER is non-nil, the frame title for the box is "Information", | 1500 | If HEADER is non-nil, the frame title for the box is "Information", |
| 1501 | otherwise it is "Question". | 1501 | otherwise it is "Question". |
diff --git a/src/menu.h b/src/menu.h index 95d2fe5e037..4c50efb4498 100644 --- a/src/menu.h +++ b/src/menu.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/minibuf.c b/src/minibuf.c index 180668f042d..238a04a8ad2 100644 --- a/src/minibuf.c +++ b/src/minibuf.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -986,7 +986,7 @@ DEFUN ("read-no-blanks-input", Fread_no_blanks_input, Sread_no_blanks_input, 1, | |||
| 986 | Prompt with PROMPT. Whitespace terminates the input. If INITIAL is | 986 | Prompt with PROMPT. Whitespace terminates the input. If INITIAL is |
| 987 | non-nil, it should be a string, which is used as initial input, with | 987 | non-nil, it should be a string, which is used as initial input, with |
| 988 | point positioned at the end, so that SPACE will accept the input. | 988 | point positioned at the end, so that SPACE will accept the input. |
| 989 | (Actually, INITIAL can also be a cons of a string and an integer. | 989 | \(Actually, INITIAL can also be a cons of a string and an integer. |
| 990 | Such values are treated as in `read-from-minibuffer', but are normally | 990 | Such values are treated as in `read-from-minibuffer', but are normally |
| 991 | not useful in this function.) | 991 | not useful in this function.) |
| 992 | Third arg INHERIT-INPUT-METHOD, if non-nil, means the minibuffer inherits | 992 | Third arg INHERIT-INPUT-METHOD, if non-nil, means the minibuffer inherits |
diff --git a/src/msdos.c b/src/msdos.c index b378cc260a6..84e8c39ec0c 100644 --- a/src/msdos.c +++ b/src/msdos.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/msdos.h b/src/msdos.h index 691822f3127..863ca486e8d 100644 --- a/src/msdos.h +++ b/src/msdos.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -129,4 +129,3 @@ void XMenuDestroy (Display *, XMenu *); | |||
| 129 | #endif /* not HAVE_X_WINDOWS */ | 129 | #endif /* not HAVE_X_WINDOWS */ |
| 130 | 130 | ||
| 131 | #endif /* not EMACS_MSDOS_H */ | 131 | #endif /* not EMACS_MSDOS_H */ |
| 132 | |||
diff --git a/src/nsfns.m b/src/nsfns.m index eda94c430fd..ea099081a7f 100644 --- a/src/nsfns.m +++ b/src/nsfns.m | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1684,7 +1684,7 @@ DEFUN ("x-server-max-request-size", Fx_server_max_request_size, | |||
| 1684 | 1684 | ||
| 1685 | DEFUN ("x-server-vendor", Fx_server_vendor, Sx_server_vendor, 0, 1, 0, | 1685 | DEFUN ("x-server-vendor", Fx_server_vendor, Sx_server_vendor, 0, 1, 0, |
| 1686 | doc: /* Return the "vendor ID" string of Nextstep display server TERMINAL. | 1686 | doc: /* Return the "vendor ID" string of Nextstep display server TERMINAL. |
| 1687 | (Labeling every distributor as a "vendor" embodies the false assumption | 1687 | \(Labeling every distributor as a "vendor" embodies the false assumption |
| 1688 | that operating systems cannot be developed and distributed noncommercially.) | 1688 | that operating systems cannot be developed and distributed noncommercially.) |
| 1689 | The optional argument TERMINAL specifies which display to ask about. | 1689 | The optional argument TERMINAL specifies which display to ask about. |
| 1690 | TERMINAL should be a terminal object, a frame or a display name (a string). | 1690 | TERMINAL should be a terminal object, a frame or a display name (a string). |
| @@ -1730,7 +1730,7 @@ If omitted or nil, that stands for the selected frame's display. | |||
| 1730 | 1730 | ||
| 1731 | Note: "screen" here is not in Nextstep terminology but in X11's. For | 1731 | Note: "screen" here is not in Nextstep terminology but in X11's. For |
| 1732 | the number of physical monitors, use `(length | 1732 | the number of physical monitors, use `(length |
| 1733 | (display-monitor-attributes-list TERMINAL))' instead. */) | 1733 | \(display-monitor-attributes-list TERMINAL))' instead. */) |
| 1734 | (Lisp_Object terminal) | 1734 | (Lisp_Object terminal) |
| 1735 | { | 1735 | { |
| 1736 | check_ns_display_info (terminal); | 1736 | check_ns_display_info (terminal); |
| @@ -1861,7 +1861,7 @@ DISPLAY is the name of the display to connect to. | |||
| 1861 | Optional second arg XRM-STRING is a string of resources in xrdb format. | 1861 | Optional second arg XRM-STRING is a string of resources in xrdb format. |
| 1862 | If the optional third arg MUST-SUCCEED is non-nil, | 1862 | If the optional third arg MUST-SUCCEED is non-nil, |
| 1863 | terminate Emacs if we can't open the connection. | 1863 | terminate Emacs if we can't open the connection. |
| 1864 | (In the Nextstep version, the last two arguments are currently ignored.) */) | 1864 | \(In the Nextstep version, the last two arguments are currently ignored.) */) |
| 1865 | (Lisp_Object display, Lisp_Object resource_string, Lisp_Object must_succeed) | 1865 | (Lisp_Object display, Lisp_Object resource_string, Lisp_Object must_succeed) |
| 1866 | { | 1866 | { |
| 1867 | struct ns_display_info *dpyinfo; | 1867 | struct ns_display_info *dpyinfo; |
| @@ -2301,7 +2301,7 @@ x_get_focus_frame (struct frame *frame) | |||
| 2301 | 2301 | ||
| 2302 | DEFUN ("xw-color-defined-p", Fxw_color_defined_p, Sxw_color_defined_p, 1, 2, 0, | 2302 | DEFUN ("xw-color-defined-p", Fxw_color_defined_p, Sxw_color_defined_p, 1, 2, 0, |
| 2303 | doc: /* Internal function called by `color-defined-p', which see. | 2303 | doc: /* Internal function called by `color-defined-p', which see. |
| 2304 | (Note that the Nextstep version of this function ignores FRAME.) */) | 2304 | \(Note that the Nextstep version of this function ignores FRAME.) */) |
| 2305 | (Lisp_Object color, Lisp_Object frame) | 2305 | (Lisp_Object color, Lisp_Object frame) |
| 2306 | { | 2306 | { |
| 2307 | NSColor * col; | 2307 | NSColor * col; |
diff --git a/src/nsfont.m b/src/nsfont.m index b46680b87ce..92e7d1154bf 100644 --- a/src/nsfont.m +++ b/src/nsfont.m | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/nsgui.h b/src/nsgui.h index cc2e45e3da7..8dac1bde9b5 100644 --- a/src/nsgui.h +++ b/src/nsgui.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/nsimage.m b/src/nsimage.m index b87144870db..5b2534b9007 100644 --- a/src/nsimage.m +++ b/src/nsimage.m | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/nsmenu.m b/src/nsmenu.m index c6d683536ba..7d340e8ec83 100644 --- a/src/nsmenu.m +++ b/src/nsmenu.m | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/nsselect.m b/src/nsselect.m index 463f02bf5ef..eba23932e65 100644 --- a/src/nsselect.m +++ b/src/nsselect.m | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -316,7 +316,7 @@ DEFUN ("ns-own-selection-internal", Fns_own_selection_internal, | |||
| 316 | Sns_own_selection_internal, 2, 2, 0, | 316 | Sns_own_selection_internal, 2, 2, 0, |
| 317 | doc: /* Assert an X selection of type SELECTION and value VALUE. | 317 | doc: /* Assert an X selection of type SELECTION and value VALUE. |
| 318 | SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. | 318 | SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. |
| 319 | (Those are literal upper-case symbol names, since that's what X expects.) | 319 | \(Those are literal upper-case symbol names, since that's what X expects.) |
| 320 | VALUE is typically a string, or a cons of two markers, but may be | 320 | VALUE is typically a string, or a cons of two markers, but may be |
| 321 | anything that the functions on `selection-converter-alist' know about. */) | 321 | anything that the functions on `selection-converter-alist' know about. */) |
| 322 | (Lisp_Object selection, Lisp_Object value) | 322 | (Lisp_Object selection, Lisp_Object value) |
| @@ -414,7 +414,7 @@ DEFUN ("ns-selection-owner-p", Fns_selection_owner_p, Sns_selection_owner_p, | |||
| 414 | doc: /* Whether the current Emacs process owns the given X Selection. | 414 | doc: /* Whether the current Emacs process owns the given X Selection. |
| 415 | The arg should be the name of the selection in question, typically one of | 415 | The arg should be the name of the selection in question, typically one of |
| 416 | the symbols `PRIMARY', `SECONDARY', or `CLIPBOARD'. | 416 | the symbols `PRIMARY', `SECONDARY', or `CLIPBOARD'. |
| 417 | (Those are literal upper-case symbol names, since that's what X expects.) | 417 | \(Those are literal upper-case symbol names, since that's what X expects.) |
| 418 | For convenience, the symbol nil is the same as `PRIMARY', | 418 | For convenience, the symbol nil is the same as `PRIMARY', |
| 419 | and t is the same as `SECONDARY'. */) | 419 | and t is the same as `SECONDARY'. */) |
| 420 | (Lisp_Object selection) | 420 | (Lisp_Object selection) |
| @@ -433,7 +433,7 @@ DEFUN ("ns-get-selection", Fns_get_selection, | |||
| 433 | Sns_get_selection, 2, 2, 0, | 433 | Sns_get_selection, 2, 2, 0, |
| 434 | doc: /* Return text selected from some X window. | 434 | doc: /* Return text selected from some X window. |
| 435 | SELECTION-SYMBOL is typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. | 435 | SELECTION-SYMBOL is typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. |
| 436 | (Those are literal upper-case symbol names, since that's what X expects.) | 436 | \(Those are literal upper-case symbol names, since that's what X expects.) |
| 437 | TARGET-TYPE is the type of data desired, typically `STRING'. */) | 437 | TARGET-TYPE is the type of data desired, typically `STRING'. */) |
| 438 | (Lisp_Object selection_name, Lisp_Object target_type) | 438 | (Lisp_Object selection_name, Lisp_Object target_type) |
| 439 | { | 439 | { |
diff --git a/src/nsterm.h b/src/nsterm.h index fa5399c7f90..0aea9cca112 100644 --- a/src/nsterm.h +++ b/src/nsterm.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1044,10 +1044,10 @@ struct x_output | |||
| 1044 | 1044 | ||
| 1045 | /* Difference btwn char-column-calculated and actual SB widths. | 1045 | /* Difference btwn char-column-calculated and actual SB widths. |
| 1046 | This is only a concern for rendering when SB on left. */ | 1046 | This is only a concern for rendering when SB on left. */ |
| 1047 | #define NS_SCROLL_BAR_ADJUST(w, f) \ | 1047 | #define NS_SCROLL_BAR_ADJUST(w, f) \ |
| 1048 | (WINDOW_HAS_VERTICAL_SCROLL_BAR_ON_LEFT (w) ? \ | 1048 | (WINDOW_HAS_VERTICAL_SCROLL_BAR_ON_LEFT (w) ? \ |
| 1049 | (FRAME_SCROLL_BAR_COLS (f) * FRAME_COLUMN_WIDTH (f) \ | 1049 | (FRAME_SCROLL_BAR_COLS (f) * FRAME_COLUMN_WIDTH (f) \ |
| 1050 | - NS_SCROLL_BAR_WIDTH (f)) : 0) | 1050 | - NS_SCROLL_BAR_WIDTH (f)) : 0) |
| 1051 | 1051 | ||
| 1052 | /* Difference btwn char-line-calculated and actual SB heights. | 1052 | /* Difference btwn char-line-calculated and actual SB heights. |
| 1053 | This is only a concern for rendering when SB on top. */ | 1053 | This is only a concern for rendering when SB on top. */ |
diff --git a/src/nsterm.m b/src/nsterm.m index 185753d8f2b..38aa4a3a413 100644 --- a/src/nsterm.m +++ b/src/nsterm.m | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/print.c b/src/print.c index 2ecc0f52b47..2b53d7580b1 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -2224,7 +2224,7 @@ Also print formfeeds as `\\f'. */); | |||
| 2224 | 2224 | ||
| 2225 | DEFVAR_BOOL ("print-escape-nonascii", print_escape_nonascii, | 2225 | DEFVAR_BOOL ("print-escape-nonascii", print_escape_nonascii, |
| 2226 | doc: /* Non-nil means print unibyte non-ASCII chars in strings as \\OOO. | 2226 | doc: /* Non-nil means print unibyte non-ASCII chars in strings as \\OOO. |
| 2227 | (OOO is the octal representation of the character code.) | 2227 | \(OOO is the octal representation of the character code.) |
| 2228 | Only single-byte characters are affected, and only in `prin1'. | 2228 | Only single-byte characters are affected, and only in `prin1'. |
| 2229 | When the output goes in a multibyte buffer, this feature is | 2229 | When the output goes in a multibyte buffer, this feature is |
| 2230 | enabled regardless of the value of the variable. */); | 2230 | enabled regardless of the value of the variable. */); |
| @@ -2232,7 +2232,7 @@ enabled regardless of the value of the variable. */); | |||
| 2232 | 2232 | ||
| 2233 | DEFVAR_BOOL ("print-escape-multibyte", print_escape_multibyte, | 2233 | DEFVAR_BOOL ("print-escape-multibyte", print_escape_multibyte, |
| 2234 | doc: /* Non-nil means print multibyte characters in strings as \\xXXXX. | 2234 | doc: /* Non-nil means print multibyte characters in strings as \\xXXXX. |
| 2235 | (XXXX is the hex representation of the character code.) | 2235 | \(XXXX is the hex representation of the character code.) |
| 2236 | This affects only `prin1'. */); | 2236 | This affects only `prin1'. */); |
| 2237 | print_escape_multibyte = 0; | 2237 | print_escape_multibyte = 0; |
| 2238 | 2238 | ||
diff --git a/src/process.c b/src/process.c index 56f036cd7d2..a518c2bffb8 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -982,7 +982,7 @@ DEFUN ("process-command", Fprocess_command, Sprocess_command, 1, 1, 0, | |||
| 982 | This is a list of strings, the first string being the program executed | 982 | This is a list of strings, the first string being the program executed |
| 983 | and the rest of the strings being the arguments given to it. | 983 | and the rest of the strings being the arguments given to it. |
| 984 | For a network or serial process, this is nil (process is running) or t | 984 | For a network or serial process, this is nil (process is running) or t |
| 985 | (process is stopped). */) | 985 | \(process is stopped). */) |
| 986 | (register Lisp_Object process) | 986 | (register Lisp_Object process) |
| 987 | { | 987 | { |
| 988 | CHECK_PROCESS (process); | 988 | CHECK_PROCESS (process); |
| @@ -2726,7 +2726,7 @@ is not given or nil, 1 stopbit is used. | |||
| 2726 | :flowcontrol FLOWCONTROL -- FLOWCONTROL determines the type of | 2726 | :flowcontrol FLOWCONTROL -- FLOWCONTROL determines the type of |
| 2727 | flowcontrol to be used, which is either nil (don't use flowcontrol), | 2727 | flowcontrol to be used, which is either nil (don't use flowcontrol), |
| 2728 | the symbol `hw' (use RTS/CTS hardware flowcontrol), or the symbol `sw' | 2728 | the symbol `hw' (use RTS/CTS hardware flowcontrol), or the symbol `sw' |
| 2729 | (use XON/XOFF software flowcontrol). If FLOWCONTROL is not given, no | 2729 | \(use XON/XOFF software flowcontrol). If FLOWCONTROL is not given, no |
| 2730 | flowcontrol is used. | 2730 | flowcontrol is used. |
| 2731 | 2731 | ||
| 2732 | `serial-process-configure' is called by `make-serial-process' for the | 2732 | `serial-process-configure' is called by `make-serial-process' for the |
| @@ -2734,12 +2734,12 @@ initial configuration of the serial port. | |||
| 2734 | 2734 | ||
| 2735 | Examples: | 2735 | Examples: |
| 2736 | 2736 | ||
| 2737 | (serial-process-configure :process "/dev/ttyS0" :speed 1200) | 2737 | \(serial-process-configure :process "/dev/ttyS0" :speed 1200) |
| 2738 | 2738 | ||
| 2739 | (serial-process-configure | 2739 | \(serial-process-configure |
| 2740 | :buffer "COM1" :stopbits 1 :parity \\='odd :flowcontrol \\='hw) | 2740 | :buffer "COM1" :stopbits 1 :parity \\='odd :flowcontrol \\='hw) |
| 2741 | 2741 | ||
| 2742 | (serial-process-configure :port "\\\\.\\COM13" :bytesize 7) | 2742 | \(serial-process-configure :port "\\\\.\\COM13" :bytesize 7) |
| 2743 | 2743 | ||
| 2744 | usage: (serial-process-configure &rest ARGS) */) | 2744 | usage: (serial-process-configure &rest ARGS) */) |
| 2745 | (ptrdiff_t nargs, Lisp_Object *args) | 2745 | (ptrdiff_t nargs, Lisp_Object *args) |
| @@ -2833,13 +2833,13 @@ is available via the function `process-contact'. | |||
| 2833 | 2833 | ||
| 2834 | Examples: | 2834 | Examples: |
| 2835 | 2835 | ||
| 2836 | (make-serial-process :port "/dev/ttyS0" :speed 9600) | 2836 | \(make-serial-process :port "/dev/ttyS0" :speed 9600) |
| 2837 | 2837 | ||
| 2838 | (make-serial-process :port "COM1" :speed 115200 :stopbits 2) | 2838 | \(make-serial-process :port "COM1" :speed 115200 :stopbits 2) |
| 2839 | 2839 | ||
| 2840 | (make-serial-process :port "\\\\.\\COM13" :speed 1200 :bytesize 7 :parity \\='odd) | 2840 | \(make-serial-process :port "\\\\.\\COM13" :speed 1200 :bytesize 7 :parity \\='odd) |
| 2841 | 2841 | ||
| 2842 | (make-serial-process :port "/dev/tty.BlueConsole-SPP-1" :speed nil) | 2842 | \(make-serial-process :port "/dev/tty.BlueConsole-SPP-1" :speed nil) |
| 2843 | 2843 | ||
| 2844 | usage: (make-serial-process &rest ARGS) */) | 2844 | usage: (make-serial-process &rest ARGS) */) |
| 2845 | (ptrdiff_t nargs, Lisp_Object *args) | 2845 | (ptrdiff_t nargs, Lisp_Object *args) |
diff --git a/src/process.h b/src/process.h index 95bd1b65363..20593f5e8fa 100644 --- a/src/process.h +++ b/src/process.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/profiler.c b/src/profiler.c index 95f84fdbf24..31bd77f00e3 100644 --- a/src/profiler.c +++ b/src/profiler.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/puresize.h b/src/puresize.h index bcb5a9ca828..fb9d934cad5 100644 --- a/src/puresize.h +++ b/src/puresize.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/ralloc.c b/src/ralloc.c index d1a9e01652e..071cee777e9 100644 --- a/src/ralloc.c +++ b/src/ralloc.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/region-cache.c b/src/region-cache.c index 4ce7de832e2..45849568bff 100644 --- a/src/region-cache.c +++ b/src/region-cache.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/region-cache.h b/src/region-cache.h index 0c8861f1f36..270531e1a4d 100644 --- a/src/region-cache.h +++ b/src/region-cache.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/scroll.c b/src/scroll.c index 517cc686bb5..b8861087dea 100644 --- a/src/scroll.c +++ b/src/scroll.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/search.c b/src/search.c index 68b01219863..f39df6784c3 100644 --- a/src/search.c +++ b/src/search.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/sheap.c b/src/sheap.c index fe905ca0c02..72b74fa355f 100644 --- a/src/sheap.c +++ b/src/sheap.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/sound.c b/src/sound.c index 42f1fca2e20..b9a794b6a42 100644 --- a/src/sound.c +++ b/src/sound.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/syntax.c b/src/syntax.c index 249d0d58bc6..fdcfdfc62a9 100644 --- a/src/syntax.c +++ b/src/syntax.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/syntax.h b/src/syntax.h index c3575d4a9b4..96e938adf0a 100644 --- a/src/syntax.h +++ b/src/syntax.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/sysdep.c b/src/sysdep.c index a01bf1d7c10..6154c1325d8 100644 --- a/src/sysdep.c +++ b/src/sysdep.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/sysselect.h b/src/sysselect.h index b625a6582f9..0bf9b40a3cb 100644 --- a/src/sysselect.h +++ b/src/sysselect.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/syssignal.h b/src/syssignal.h index df4b1405015..3de83c71759 100644 --- a/src/syssignal.h +++ b/src/syssignal.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/sysstdio.h b/src/sysstdio.h index e1416b658e2..f1f923ed1c5 100644 --- a/src/sysstdio.h +++ b/src/sysstdio.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/systime.h b/src/systime.h index 04c83ff247a..355a3c23fa0 100644 --- a/src/systime.h +++ b/src/systime.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/systty.h b/src/systty.h index 116af97bce3..fbdc6b18373 100644 --- a/src/systty.h +++ b/src/systty.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/syswait.h b/src/syswait.h index ca672d1679e..800d5721ceb 100644 --- a/src/syswait.h +++ b/src/syswait.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/term.c b/src/term.c index 993928eefde..17f36795998 100644 --- a/src/term.c +++ b/src/term.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/termchar.h b/src/termchar.h index d816da283c3..35b30fb90cc 100644 --- a/src/termchar.h +++ b/src/termchar.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/termhooks.h b/src/termhooks.h index c183528ee84..d21d6ce588a 100644 --- a/src/termhooks.h +++ b/src/termhooks.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/terminal.c b/src/terminal.c index a5579677c4c..5dd9975a6f4 100644 --- a/src/terminal.c +++ b/src/terminal.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/terminfo.c b/src/terminfo.c index b8b5f9756c0..04da30b7794 100644 --- a/src/terminfo.c +++ b/src/terminfo.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/termopts.h b/src/termopts.h index 7cffa16d610..c64bd1b5eaa 100644 --- a/src/termopts.h +++ b/src/termopts.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/textprop.c b/src/textprop.c index 70091b939a2..c4e49d98ebc 100644 --- a/src/textprop.c +++ b/src/textprop.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1493,7 +1493,7 @@ DEFUN ("remove-text-properties", Fremove_text_properties, | |||
| 1493 | doc: /* Remove some properties from text from START to END. | 1493 | doc: /* Remove some properties from text from START to END. |
| 1494 | The third argument PROPERTIES is a property list | 1494 | The third argument PROPERTIES is a property list |
| 1495 | whose property names specify the properties to remove. | 1495 | whose property names specify the properties to remove. |
| 1496 | (The values stored in PROPERTIES are ignored.) | 1496 | \(The values stored in PROPERTIES are ignored.) |
| 1497 | If the optional fourth argument OBJECT is a buffer (or nil, which means | 1497 | If the optional fourth argument OBJECT is a buffer (or nil, which means |
| 1498 | the current buffer), START and END are buffer positions (integers or | 1498 | the current buffer), START and END are buffer positions (integers or |
| 1499 | markers). If OBJECT is a string, START and END are 0-based indices into it. | 1499 | markers). If OBJECT is a string, START and END are 0-based indices into it. |
diff --git a/src/tparam.h b/src/tparam.h index ab82e5b53e7..cc53bb9ea13 100644 --- a/src/tparam.h +++ b/src/tparam.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/undo.c b/src/undo.c index 1cc9c988d97..be5b2702054 100644 --- a/src/undo.c +++ b/src/undo.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/unexaix.c b/src/unexaix.c index eb51d287bf1..c2012f77cac 100644 --- a/src/unexaix.c +++ b/src/unexaix.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/unexcoff.c b/src/unexcoff.c index cc0df306525..6a083803a71 100644 --- a/src/unexcoff.c +++ b/src/unexcoff.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/unexcw.c b/src/unexcw.c index 6ebd8c6f83b..399e2c34dda 100644 --- a/src/unexcw.c +++ b/src/unexcw.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/unexelf.c b/src/unexelf.c index 6343207bd14..551915712fb 100644 --- a/src/unexelf.c +++ b/src/unexelf.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/unexmacosx.c b/src/unexmacosx.c index bfb8bd4ea58..827eda56e08 100644 --- a/src/unexmacosx.c +++ b/src/unexmacosx.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/unexw32.c b/src/unexw32.c index 460a39eb185..15aa7263bf8 100644 --- a/src/unexw32.c +++ b/src/unexw32.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -34,11 +34,10 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 34 | /* Include relevant definitions from IMAGEHLP.H, which can be found | 34 | /* Include relevant definitions from IMAGEHLP.H, which can be found |
| 35 | in \\win32sdk\mstools\samples\image\include\imagehlp.h. */ | 35 | in \\win32sdk\mstools\samples\image\include\imagehlp.h. */ |
| 36 | 36 | ||
| 37 | PIMAGE_NT_HEADERS | 37 | PIMAGE_NT_HEADERS (__stdcall * pfnCheckSumMappedFile) (LPVOID BaseAddress, |
| 38 | (__stdcall * pfnCheckSumMappedFile) (LPVOID BaseAddress, | 38 | DWORD FileLength, |
| 39 | DWORD FileLength, | 39 | LPDWORD HeaderSum, |
| 40 | LPDWORD HeaderSum, | 40 | LPDWORD CheckSum); |
| 41 | LPDWORD CheckSum); | ||
| 42 | 41 | ||
| 43 | extern BOOL ctrl_c_handler (unsigned long type); | 42 | extern BOOL ctrl_c_handler (unsigned long type); |
| 44 | 43 | ||
diff --git a/src/vm-limit.c b/src/vm-limit.c index 42f04708f94..7eeca3c8250 100644 --- a/src/vm-limit.c +++ b/src/vm-limit.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w16select.c b/src/w16select.c index 48bb813ce35..434a5987893 100644 --- a/src/w16select.c +++ b/src/w16select.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -686,7 +686,7 @@ For MS-Windows and MS-DOS: | |||
| 686 | When sending or receiving text via selection and clipboard, the text | 686 | When sending or receiving text via selection and clipboard, the text |
| 687 | is encoded or decoded by this coding system. The default value is | 687 | is encoded or decoded by this coding system. The default value is |
| 688 | the current system default encoding on 9x/Me, `utf-16le-dos' | 688 | the current system default encoding on 9x/Me, `utf-16le-dos' |
| 689 | (Unicode) on NT/W2K/XP, and `iso-latin-1-dos' on MS-DOS. | 689 | \(Unicode) on NT/W2K/XP, and `iso-latin-1-dos' on MS-DOS. |
| 690 | 690 | ||
| 691 | For X Windows: | 691 | For X Windows: |
| 692 | When sending text via selection and clipboard, if the target | 692 | When sending text via selection and clipboard, if the target |
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32common.h b/src/w32common.h index 4fbeab55028..f30c0cedae4 100644 --- a/src/w32common.h +++ b/src/w32common.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -15,7 +15,7 @@ GNU General Public License for more details. | |||
| 15 | 15 | ||
| 16 | You should have received a copy of the GNU General Public License | 16 | You should have received a copy of the GNU General Public License |
| 17 | along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. | 17 | along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. |
| 18 | 18 | ||
| 19 | */ | 19 | */ |
| 20 | 20 | ||
| 21 | #ifndef W32COMMON_H | 21 | #ifndef W32COMMON_H |
diff --git a/src/w32console.c b/src/w32console.c index fdadd48f323..82ba4b1cf9c 100644 --- a/src/w32console.c +++ b/src/w32console.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32fns.c b/src/w32fns.c index 568a45a3114..a08474fa9c3 100644 --- a/src/w32fns.c +++ b/src/w32fns.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -5609,7 +5609,7 @@ x_get_focus_frame (struct frame *frame) | |||
| 5609 | 5609 | ||
| 5610 | DEFUN ("xw-color-defined-p", Fxw_color_defined_p, Sxw_color_defined_p, 1, 2, 0, | 5610 | DEFUN ("xw-color-defined-p", Fxw_color_defined_p, Sxw_color_defined_p, 1, 2, 0, |
| 5611 | doc: /* Internal function called by `color-defined-p', which see. | 5611 | doc: /* Internal function called by `color-defined-p', which see. |
| 5612 | (Note that the Nextstep version of this function ignores FRAME.) */) | 5612 | \(Note that the Nextstep version of this function ignores FRAME.) */) |
| 5613 | (Lisp_Object color, Lisp_Object frame) | 5613 | (Lisp_Object color, Lisp_Object frame) |
| 5614 | { | 5614 | { |
| 5615 | XColor foo; | 5615 | XColor foo; |
| @@ -5751,7 +5751,7 @@ If omitted or nil, that stands for the selected frame's display. */) | |||
| 5751 | DEFUN ("x-server-vendor", Fx_server_vendor, Sx_server_vendor, 0, 1, 0, | 5751 | DEFUN ("x-server-vendor", Fx_server_vendor, Sx_server_vendor, 0, 1, 0, |
| 5752 | doc: /* Return the "vendor ID" string of the GUI software on TERMINAL. | 5752 | doc: /* Return the "vendor ID" string of the GUI software on TERMINAL. |
| 5753 | 5753 | ||
| 5754 | (Labeling every distributor as a "vendor" embodies the false assumption | 5754 | \(Labeling every distributor as a "vendor" embodies the false assumption |
| 5755 | that operating systems cannot be developed and distributed noncommercially.) | 5755 | that operating systems cannot be developed and distributed noncommercially.) |
| 5756 | 5756 | ||
| 5757 | For GNU and Unix systems, this queries the X server software; for | 5757 | For GNU and Unix systems, this queries the X server software; for |
| @@ -6153,7 +6153,7 @@ DISPLAY is the name of the display to connect to. | |||
| 6153 | Optional second arg XRM-STRING is a string of resources in xrdb format. | 6153 | Optional second arg XRM-STRING is a string of resources in xrdb format. |
| 6154 | If the optional third arg MUST-SUCCEED is non-nil, | 6154 | If the optional third arg MUST-SUCCEED is non-nil, |
| 6155 | terminate Emacs if we can't open the connection. | 6155 | terminate Emacs if we can't open the connection. |
| 6156 | (In the Nextstep version, the last two arguments are currently ignored.) */) | 6156 | \(In the Nextstep version, the last two arguments are currently ignored.) */) |
| 6157 | (Lisp_Object display, Lisp_Object xrm_string, Lisp_Object must_succeed) | 6157 | (Lisp_Object display, Lisp_Object xrm_string, Lisp_Object must_succeed) |
| 6158 | { | 6158 | { |
| 6159 | char *xrm_option; | 6159 | char *xrm_option; |
| @@ -8522,7 +8522,7 @@ DEFUN ("w32-set-mouse-absolute-pixel-position", Fw32_set_mouse_absolute_pixel_po | |||
| 8522 | Sw32_set_mouse_absolute_pixel_position, 2, 2, 0, | 8522 | Sw32_set_mouse_absolute_pixel_position, 2, 2, 0, |
| 8523 | doc: /* Move mouse pointer to absolute pixel position (X, Y). | 8523 | doc: /* Move mouse pointer to absolute pixel position (X, Y). |
| 8524 | The coordinates X and Y are interpreted in pixels relative to a position | 8524 | The coordinates X and Y are interpreted in pixels relative to a position |
| 8525 | (0, 0) of the selected frame's display. */) | 8525 | \(0, 0) of the selected frame's display. */) |
| 8526 | (Lisp_Object x, Lisp_Object y) | 8526 | (Lisp_Object x, Lisp_Object y) |
| 8527 | { | 8527 | { |
| 8528 | UINT trail_num = 0; | 8528 | UINT trail_num = 0; |
diff --git a/src/w32font.c b/src/w32font.c index 0c3efe2ef2e..a1878adb4bd 100644 --- a/src/w32font.c +++ b/src/w32font.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32font.h b/src/w32font.h index a3fd357287b..728ad8be96c 100644 --- a/src/w32font.h +++ b/src/w32font.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32gui.h b/src/w32gui.h index ff7af87cf5d..8e995cff1d8 100644 --- a/src/w32gui.h +++ b/src/w32gui.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32heap.c b/src/w32heap.c index b908169b96c..df2fe0a8fa3 100644 --- a/src/w32heap.c +++ b/src/w32heap.c | |||
| @@ -73,12 +73,11 @@ typedef PVOID (WINAPI * RtlCreateHeap_Proc) ( | |||
| 73 | 73 | ||
| 74 | typedef LONG NTSTATUS; | 74 | typedef LONG NTSTATUS; |
| 75 | 75 | ||
| 76 | typedef NTSTATUS | 76 | typedef NTSTATUS (NTAPI *PRTL_HEAP_COMMIT_ROUTINE) ( |
| 77 | (NTAPI * PRTL_HEAP_COMMIT_ROUTINE)( | 77 | IN PVOID Base, |
| 78 | IN PVOID Base, | 78 | IN OUT PVOID *CommitAddress, |
| 79 | IN OUT PVOID *CommitAddress, | 79 | IN OUT PSIZE_T CommitSize |
| 80 | IN OUT PSIZE_T CommitSize | 80 | ); |
| 81 | ); | ||
| 82 | 81 | ||
| 83 | typedef struct _RTL_HEAP_PARAMETERS { | 82 | typedef struct _RTL_HEAP_PARAMETERS { |
| 84 | ULONG Length; | 83 | ULONG Length; |
diff --git a/src/w32heap.h b/src/w32heap.h index c569033eef4..523bcebe125 100644 --- a/src/w32heap.h +++ b/src/w32heap.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32inevt.c b/src/w32inevt.c index c7246c7a8e2..a33f82dc7db 100644 --- a/src/w32inevt.c +++ b/src/w32inevt.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32inevt.h b/src/w32inevt.h index b23c78726cd..c317196d913 100644 --- a/src/w32inevt.h +++ b/src/w32inevt.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32menu.c b/src/w32menu.c index d8c3dc1c94e..d9ab8f5e518 100644 --- a/src/w32menu.c +++ b/src/w32menu.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32notify.c b/src/w32notify.c index 71787c45db8..586c2062f62 100644 --- a/src/w32notify.c +++ b/src/w32notify.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32proc.c b/src/w32proc.c index 85ddbfd9c7b..4a6f7862801 100644 --- a/src/w32proc.c +++ b/src/w32proc.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32reg.c b/src/w32reg.c index 7d1ccf843a4..a87381831e2 100644 --- a/src/w32reg.c +++ b/src/w32reg.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32select.c b/src/w32select.c index ce4ed691859..138fe853c4d 100644 --- a/src/w32select.c +++ b/src/w32select.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32select.h b/src/w32select.h index 8216380d91a..54022f7998f 100644 --- a/src/w32select.h +++ b/src/w32select.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32term.c b/src/w32term.c index 36a50212372..62ad4eb086b 100644 --- a/src/w32term.c +++ b/src/w32term.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32term.h b/src/w32term.h index 7c23bc43a1f..d809be3c03d 100644 --- a/src/w32term.h +++ b/src/w32term.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32uniscribe.c b/src/w32uniscribe.c index c5ba87bf7b4..ddca5f5ef52 100644 --- a/src/w32uniscribe.c +++ b/src/w32uniscribe.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/w32xfns.c b/src/w32xfns.c index 29636d1de80..04bf5ce733e 100644 --- a/src/w32xfns.c +++ b/src/w32xfns.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/widget.c b/src/widget.c index a71de90ed34..28bb475ddfa 100644 --- a/src/widget.c +++ b/src/widget.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/widget.h b/src/widget.h index 13eb9e7dd59..ceeec38e78e 100644 --- a/src/widget.h +++ b/src/widget.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/widgetprv.h b/src/widgetprv.h index 24e8378fbcd..9d9aa2185c1 100644 --- a/src/widgetprv.h +++ b/src/widgetprv.h | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/window.c b/src/window.c index be34c49135e..3cfb6fce239 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -671,7 +671,7 @@ DEFUN ("set-window-combination-limit", Fset_window_combination_limit, Sset_windo | |||
| 671 | WINDOW must be a valid window used in horizontal or vertical combination. | 671 | WINDOW must be a valid window used in horizontal or vertical combination. |
| 672 | If LIMIT is nil, child windows of WINDOW can be recombined with WINDOW's | 672 | If LIMIT is nil, child windows of WINDOW can be recombined with WINDOW's |
| 673 | siblings. LIMIT t means that child windows of WINDOW are never | 673 | siblings. LIMIT t means that child windows of WINDOW are never |
| 674 | (re-)combined with WINDOW's siblings. Other values are reserved for | 674 | \(re-)combined with WINDOW's siblings. Other values are reserved for |
| 675 | future use. */) | 675 | future use. */) |
| 676 | (Lisp_Object window, Lisp_Object limit) | 676 | (Lisp_Object window, Lisp_Object limit) |
| 677 | { | 677 | { |
| @@ -1355,7 +1355,7 @@ DEFUN ("coordinates-in-window-p", Fcoordinates_in_window_p, | |||
| 1355 | WINDOW must be a live window and defaults to the selected one. | 1355 | WINDOW must be a live window and defaults to the selected one. |
| 1356 | COORDINATES is a cons of the form (X . Y), X and Y being distances | 1356 | COORDINATES is a cons of the form (X . Y), X and Y being distances |
| 1357 | measured in characters from the upper-left corner of the frame. | 1357 | measured in characters from the upper-left corner of the frame. |
| 1358 | (0 . 0) denotes the character in the upper left corner of the | 1358 | \(0 . 0) denotes the character in the upper left corner of the |
| 1359 | frame. | 1359 | frame. |
| 1360 | If COORDINATES are in the text portion of WINDOW, | 1360 | If COORDINATES are in the text portion of WINDOW, |
| 1361 | the coordinates relative to the window are returned. | 1361 | the coordinates relative to the window are returned. |
| @@ -1741,7 +1741,7 @@ of the window. The remaining elements are omitted if the character after | |||
| 1741 | POS is fully visible; otherwise, RTOP and RBOT are the number of pixels | 1741 | POS is fully visible; otherwise, RTOP and RBOT are the number of pixels |
| 1742 | off-window at the top and bottom of the screen line ("row") containing | 1742 | off-window at the top and bottom of the screen line ("row") containing |
| 1743 | POS, ROWH is the visible height of that row, and VPOS is the row number | 1743 | POS, ROWH is the visible height of that row, and VPOS is the row number |
| 1744 | (zero-based). */) | 1744 | \(zero-based). */) |
| 1745 | (Lisp_Object pos, Lisp_Object window, Lisp_Object partially) | 1745 | (Lisp_Object pos, Lisp_Object window, Lisp_Object partially) |
| 1746 | { | 1746 | { |
| 1747 | struct window *w; | 1747 | struct window *w; |
diff --git a/src/window.h b/src/window.h index 2c030335792..84180c96a7d 100644 --- a/src/window.h +++ b/src/window.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xdisp.c b/src/xdisp.c index 5b961444384..123303ef8d8 100644 --- a/src/xdisp.c +++ b/src/xdisp.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -31389,7 +31389,7 @@ This variable is not guaranteed to be accurate except while processing | |||
| 31389 | 31389 | ||
| 31390 | DEFVAR_LISP ("frame-title-format", Vframe_title_format, | 31390 | DEFVAR_LISP ("frame-title-format", Vframe_title_format, |
| 31391 | doc: /* Template for displaying the title bar of visible frames. | 31391 | doc: /* Template for displaying the title bar of visible frames. |
| 31392 | (Assuming the window manager supports this feature.) | 31392 | \(Assuming the window manager supports this feature.) |
| 31393 | 31393 | ||
| 31394 | This variable has the same structure as `mode-line-format', except that | 31394 | This variable has the same structure as `mode-line-format', except that |
| 31395 | the %c and %l constructs are ignored. It is used only on frames for | 31395 | the %c and %l constructs are ignored. It is used only on frames for |
| @@ -31397,10 +31397,10 @@ which no explicit name has been set (see `modify-frame-parameters'). */); | |||
| 31397 | 31397 | ||
| 31398 | DEFVAR_LISP ("icon-title-format", Vicon_title_format, | 31398 | DEFVAR_LISP ("icon-title-format", Vicon_title_format, |
| 31399 | doc: /* Template for displaying the title bar of an iconified frame. | 31399 | doc: /* Template for displaying the title bar of an iconified frame. |
| 31400 | (Assuming the window manager supports this feature.) | 31400 | \(Assuming the window manager supports this feature.) |
| 31401 | This variable has the same structure as `mode-line-format' (which see), | 31401 | This variable has the same structure as `mode-line-format' (which see), |
| 31402 | and is used only on frames for which no explicit name has been set | 31402 | and is used only on frames for which no explicit name has been set |
| 31403 | (see `modify-frame-parameters'). */); | 31403 | \(see `modify-frame-parameters'). */); |
| 31404 | Vicon_title_format | 31404 | Vicon_title_format |
| 31405 | = Vframe_title_format | 31405 | = Vframe_title_format |
| 31406 | = listn (CONSTYPE_PURE, 3, | 31406 | = listn (CONSTYPE_PURE, 3, |
diff --git a/src/xfaces.c b/src/xfaces.c index 7762e0f61e9..ac1370003df 100644 --- a/src/xfaces.c +++ b/src/xfaces.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -701,10 +701,10 @@ Optional THOROUGHLY non-nil means try to free unused fonts, too. */) | |||
| 701 | DEFUN ("bitmap-spec-p", Fbitmap_spec_p, Sbitmap_spec_p, 1, 1, 0, | 701 | DEFUN ("bitmap-spec-p", Fbitmap_spec_p, Sbitmap_spec_p, 1, 1, 0, |
| 702 | doc: /* Value is non-nil if OBJECT is a valid bitmap specification. | 702 | doc: /* Value is non-nil if OBJECT is a valid bitmap specification. |
| 703 | A bitmap specification is either a string, a file name, or a list | 703 | A bitmap specification is either a string, a file name, or a list |
| 704 | (WIDTH HEIGHT DATA) where WIDTH is the pixel width of the bitmap, | 704 | \(WIDTH HEIGHT DATA) where WIDTH is the pixel width of the bitmap, |
| 705 | HEIGHT is its height, and DATA is a string containing the bits of | 705 | HEIGHT is its height, and DATA is a string containing the bits of |
| 706 | the pixmap. Bits are stored row by row, each row occupies | 706 | the pixmap. Bits are stored row by row, each row occupies |
| 707 | (WIDTH + 7)/8 bytes. */) | 707 | \(WIDTH + 7)/8 bytes. */) |
| 708 | (Lisp_Object object) | 708 | (Lisp_Object object) |
| 709 | { | 709 | { |
| 710 | bool pixmap_p = false; | 710 | bool pixmap_p = false; |
| @@ -6536,7 +6536,7 @@ changing this variable for it to take effect. */); | |||
| 6536 | Each element is a cons (FONT-PATTERN . RESCALE-RATIO), where | 6536 | Each element is a cons (FONT-PATTERN . RESCALE-RATIO), where |
| 6537 | FONT-PATTERN is a font-spec or a regular expression matching a font name, and | 6537 | FONT-PATTERN is a font-spec or a regular expression matching a font name, and |
| 6538 | RESCALE-RATIO is a floating point number to specify how much larger | 6538 | RESCALE-RATIO is a floating point number to specify how much larger |
| 6539 | (or smaller) font we should use. For instance, if a face requests | 6539 | \(or smaller) font we should use. For instance, if a face requests |
| 6540 | a font of 10 point, we actually use a font of 10 * RESCALE-RATIO point. */); | 6540 | a font of 10 point, we actually use a font of 10 * RESCALE-RATIO point. */); |
| 6541 | Vface_font_rescale_alist = Qnil; | 6541 | Vface_font_rescale_alist = Qnil; |
| 6542 | 6542 | ||
diff --git a/src/xfns.c b/src/xfns.c index 596b67c1608..74c559a5a0b 100644 --- a/src/xfns.c +++ b/src/xfns.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -3669,7 +3669,7 @@ x_focus_frame (struct frame *f) | |||
| 3669 | 3669 | ||
| 3670 | DEFUN ("xw-color-defined-p", Fxw_color_defined_p, Sxw_color_defined_p, 1, 2, 0, | 3670 | DEFUN ("xw-color-defined-p", Fxw_color_defined_p, Sxw_color_defined_p, 1, 2, 0, |
| 3671 | doc: /* Internal function called by `color-defined-p', which see. | 3671 | doc: /* Internal function called by `color-defined-p', which see. |
| 3672 | (Note that the Nextstep version of this function ignores FRAME.) */) | 3672 | \(Note that the Nextstep version of this function ignores FRAME.) */) |
| 3673 | (Lisp_Object color, Lisp_Object frame) | 3673 | (Lisp_Object color, Lisp_Object frame) |
| 3674 | { | 3674 | { |
| 3675 | XColor foo; | 3675 | XColor foo; |
| @@ -3836,7 +3836,7 @@ If omitted or nil, that stands for the selected frame's display. */) | |||
| 3836 | DEFUN ("x-server-vendor", Fx_server_vendor, Sx_server_vendor, 0, 1, 0, | 3836 | DEFUN ("x-server-vendor", Fx_server_vendor, Sx_server_vendor, 0, 1, 0, |
| 3837 | doc: /* Return the "vendor ID" string of the GUI software on TERMINAL. | 3837 | doc: /* Return the "vendor ID" string of the GUI software on TERMINAL. |
| 3838 | 3838 | ||
| 3839 | (Labeling every distributor as a "vendor" embodies the false assumption | 3839 | \(Labeling every distributor as a "vendor" embodies the false assumption |
| 3840 | that operating systems cannot be developed and distributed noncommercially.) | 3840 | that operating systems cannot be developed and distributed noncommercially.) |
| 3841 | The optional argument TERMINAL specifies which display to ask about. | 3841 | The optional argument TERMINAL specifies which display to ask about. |
| 3842 | 3842 | ||
| @@ -4261,8 +4261,19 @@ x_get_monitor_attributes_xrandr (struct x_display_info *dpyinfo) | |||
| 4261 | RROutput pxid = None; | 4261 | RROutput pxid = None; |
| 4262 | struct MonitorInfo *monitors; | 4262 | struct MonitorInfo *monitors; |
| 4263 | 4263 | ||
| 4264 | #ifdef HAVE_XRRGETSCREENRESOURCESCURRENT | 4264 | #define RANDR13_LIBRARY \ |
| 4265 | resources = XRRGetScreenResourcesCurrent (dpy, dpyinfo->root_window); | 4265 | (RANDR_MAJOR > 1 || (RANDR_MAJOR == 1 && RANDR_MINOR >= 3)) |
| 4266 | |||
| 4267 | #if RANDR13_LIBRARY | ||
| 4268 | /* Check if the display supports 1.3 too. */ | ||
| 4269 | bool randr13_avail = (dpyinfo->xrandr_major_version > 1 | ||
| 4270 | || (dpyinfo->xrandr_major_version == 1 | ||
| 4271 | && dpyinfo->xrandr_minor_version >= 3)); | ||
| 4272 | |||
| 4273 | if (randr13_avail) | ||
| 4274 | resources = XRRGetScreenResourcesCurrent (dpy, dpyinfo->root_window); | ||
| 4275 | else | ||
| 4276 | resources = XRRGetScreenResources (dpy, dpyinfo->root_window); | ||
| 4266 | #else | 4277 | #else |
| 4267 | resources = XRRGetScreenResources (dpy, dpyinfo->root_window); | 4278 | resources = XRRGetScreenResources (dpy, dpyinfo->root_window); |
| 4268 | #endif | 4279 | #endif |
| @@ -4275,8 +4286,9 @@ x_get_monitor_attributes_xrandr (struct x_display_info *dpyinfo) | |||
| 4275 | n_monitors = resources->noutput; | 4286 | n_monitors = resources->noutput; |
| 4276 | monitors = xzalloc (n_monitors * sizeof *monitors); | 4287 | monitors = xzalloc (n_monitors * sizeof *monitors); |
| 4277 | 4288 | ||
| 4278 | #ifdef HAVE_XRRGETOUTPUTPRIMARY | 4289 | #ifdef RANDR13_LIBRARY |
| 4279 | pxid = XRRGetOutputPrimary (dpy, dpyinfo->root_window); | 4290 | if (randr13_avail) |
| 4291 | pxid = XRRGetOutputPrimary (dpy, dpyinfo->root_window); | ||
| 4280 | #endif | 4292 | #endif |
| 4281 | 4293 | ||
| 4282 | for (i = 0; i < n_monitors; ++i) | 4294 | for (i = 0; i < n_monitors; ++i) |
| @@ -4359,9 +4371,11 @@ x_get_monitor_attributes (struct x_display_info *dpyinfo) | |||
| 4359 | xrr_ok = XRRQueryExtension (dpy, &xrr_event_base, &xrr_error_base); | 4371 | xrr_ok = XRRQueryExtension (dpy, &xrr_event_base, &xrr_error_base); |
| 4360 | if (xrr_ok) | 4372 | if (xrr_ok) |
| 4361 | { | 4373 | { |
| 4362 | int xrr_major, xrr_minor; | 4374 | XRRQueryVersion (dpy, &dpyinfo->xrandr_major_version, |
| 4363 | XRRQueryVersion (dpy, &xrr_major, &xrr_minor); | 4375 | &dpyinfo->xrandr_minor_version); |
| 4364 | xrr_ok = (xrr_major == 1 && xrr_minor >= 2) || xrr_major > 1; | 4376 | xrr_ok = ((dpyinfo->xrandr_major_version == 1 |
| 4377 | && dpyinfo->xrandr_minor_version >= 2) | ||
| 4378 | || dpyinfo->xrandr_major_version > 1); | ||
| 4365 | } | 4379 | } |
| 4366 | 4380 | ||
| 4367 | if (xrr_ok) | 4381 | if (xrr_ok) |
| @@ -4758,7 +4772,7 @@ DEFUN ("x-set-mouse-absolute-pixel-position", Fx_set_mouse_absolute_pixel_positi | |||
| 4758 | Sx_set_mouse_absolute_pixel_position, 2, 2, 0, | 4772 | Sx_set_mouse_absolute_pixel_position, 2, 2, 0, |
| 4759 | doc: /* Move mouse pointer to absolute pixel position (X, Y). | 4773 | doc: /* Move mouse pointer to absolute pixel position (X, Y). |
| 4760 | The coordinates X and Y are interpreted in pixels relative to a position | 4774 | The coordinates X and Y are interpreted in pixels relative to a position |
| 4761 | (0, 0) of the selected frame's display. */) | 4775 | \(0, 0) of the selected frame's display. */) |
| 4762 | (Lisp_Object x, Lisp_Object y) | 4776 | (Lisp_Object x, Lisp_Object y) |
| 4763 | { | 4777 | { |
| 4764 | struct frame *f = SELECTED_FRAME (); | 4778 | struct frame *f = SELECTED_FRAME (); |
| @@ -4934,7 +4948,7 @@ DISPLAY is the name of the display to connect to. | |||
| 4934 | Optional second arg XRM-STRING is a string of resources in xrdb format. | 4948 | Optional second arg XRM-STRING is a string of resources in xrdb format. |
| 4935 | If the optional third arg MUST-SUCCEED is non-nil, | 4949 | If the optional third arg MUST-SUCCEED is non-nil, |
| 4936 | terminate Emacs if we can't open the connection. | 4950 | terminate Emacs if we can't open the connection. |
| 4937 | (In the Nextstep version, the last two arguments are currently ignored.) */) | 4951 | \(In the Nextstep version, the last two arguments are currently ignored.) */) |
| 4938 | (Lisp_Object display, Lisp_Object xrm_string, Lisp_Object must_succeed) | 4952 | (Lisp_Object display, Lisp_Object xrm_string, Lisp_Object must_succeed) |
| 4939 | { | 4953 | { |
| 4940 | char *xrm_option; | 4954 | char *xrm_option; |
diff --git a/src/xfont.c b/src/xfont.c index 15a4b746bc4..0ef64bef10e 100644 --- a/src/xfont.c +++ b/src/xfont.c | |||
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xftfont.c b/src/xftfont.c index d94955f296a..7926325419c 100644 --- a/src/xftfont.c +++ b/src/xftfont.c | |||
| @@ -8,8 +8,8 @@ This file is part of GNU Emacs. | |||
| 8 | 8 | ||
| 9 | GNU Emacs is free software: you can redistribute it and/or modify | 9 | GNU Emacs is free software: you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by | 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation, either version 3 of the License, or | 11 | the Free Software Foundation, either version 3 of the License, or (at |
| 12 | (at your option) any later version. | 12 | your option) any later version. |
| 13 | 13 | ||
| 14 | GNU Emacs is distributed in the hope that it will be useful, | 14 | GNU Emacs is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xgselect.c b/src/xgselect.c index a61d46b958b..ac88afdd54b 100644 --- a/src/xgselect.c +++ b/src/xgselect.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xgselect.h b/src/xgselect.h index fc976ca937c..4c56633e966 100644 --- a/src/xgselect.h +++ b/src/xgselect.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xmenu.c b/src/xmenu.c index 1047b19680e..9e1a817946a 100644 --- a/src/xmenu.c +++ b/src/xmenu.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xrdb.c b/src/xrdb.c index 865acc94217..b4bc11838f0 100644 --- a/src/xrdb.c +++ b/src/xrdb.c | |||
| @@ -9,8 +9,8 @@ This file is part of GNU Emacs. | |||
| 9 | 9 | ||
| 10 | GNU Emacs is free software: you can redistribute it and/or modify | 10 | GNU Emacs is free software: you can redistribute it and/or modify |
| 11 | it under the terms of the GNU General Public License as published by | 11 | it under the terms of the GNU General Public License as published by |
| 12 | the Free Software Foundation, either version 3 of the License, or | 12 | the Free Software Foundation, either version 3 of the License, or (at |
| 13 | (at your option) any later version. | 13 | your option) any later version. |
| 14 | 14 | ||
| 15 | GNU Emacs is distributed in the hope that it will be useful, | 15 | GNU Emacs is distributed in the hope that it will be useful, |
| 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xselect.c b/src/xselect.c index 23b735ed89f..123e46374a2 100644 --- a/src/xselect.c +++ b/src/xselect.c | |||
| @@ -5,8 +5,8 @@ This file is part of GNU Emacs. | |||
| 5 | 5 | ||
| 6 | GNU Emacs is free software: you can redistribute it and/or modify | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation, either version 3 of the License, or | 8 | the Free Software Foundation, either version 3 of the License, or (at |
| 9 | (at your option) any later version. | 9 | your option) any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -1911,7 +1911,7 @@ DEFUN ("x-own-selection-internal", Fx_own_selection_internal, | |||
| 1911 | Sx_own_selection_internal, 2, 3, 0, | 1911 | Sx_own_selection_internal, 2, 3, 0, |
| 1912 | doc: /* Assert an X selection of type SELECTION and value VALUE. | 1912 | doc: /* Assert an X selection of type SELECTION and value VALUE. |
| 1913 | SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. | 1913 | SELECTION is a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. |
| 1914 | (Those are literal upper-case symbol names, since that's what X expects.) | 1914 | \(Those are literal upper-case symbol names, since that's what X expects.) |
| 1915 | VALUE is typically a string, or a cons of two markers, but may be | 1915 | VALUE is typically a string, or a cons of two markers, but may be |
| 1916 | anything that the functions on `selection-converter-alist' know about. | 1916 | anything that the functions on `selection-converter-alist' know about. |
| 1917 | 1917 | ||
| @@ -1940,7 +1940,7 @@ DEFUN ("x-get-selection-internal", Fx_get_selection_internal, | |||
| 1940 | Sx_get_selection_internal, 2, 4, 0, | 1940 | Sx_get_selection_internal, 2, 4, 0, |
| 1941 | doc: /* Return text selected from some X window. | 1941 | doc: /* Return text selected from some X window. |
| 1942 | SELECTION-SYMBOL is typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. | 1942 | SELECTION-SYMBOL is typically `PRIMARY', `SECONDARY', or `CLIPBOARD'. |
| 1943 | (Those are literal upper-case symbol names, since that's what X expects.) | 1943 | \(Those are literal upper-case symbol names, since that's what X expects.) |
| 1944 | TARGET-TYPE is the type of data desired, typically `STRING'. | 1944 | TARGET-TYPE is the type of data desired, typically `STRING'. |
| 1945 | 1945 | ||
| 1946 | TIME-STAMP is the time to use in the XConvertSelection call for foreign | 1946 | TIME-STAMP is the time to use in the XConvertSelection call for foreign |
| @@ -2044,7 +2044,7 @@ DEFUN ("x-selection-owner-p", Fx_selection_owner_p, Sx_selection_owner_p, | |||
| 2044 | doc: /* Whether the current Emacs process owns the given X Selection. | 2044 | doc: /* Whether the current Emacs process owns the given X Selection. |
| 2045 | The arg should be the name of the selection in question, typically one of | 2045 | The arg should be the name of the selection in question, typically one of |
| 2046 | the symbols `PRIMARY', `SECONDARY', or `CLIPBOARD'. | 2046 | the symbols `PRIMARY', `SECONDARY', or `CLIPBOARD'. |
| 2047 | (Those are literal upper-case symbol names, since that's what X expects.) | 2047 | \(Those are literal upper-case symbol names, since that's what X expects.) |
| 2048 | For convenience, the symbol nil is the same as `PRIMARY', | 2048 | For convenience, the symbol nil is the same as `PRIMARY', |
| 2049 | and t is the same as `SECONDARY'. | 2049 | and t is the same as `SECONDARY'. |
| 2050 | 2050 | ||
| @@ -2620,7 +2620,7 @@ and the local selection value (whatever was given to | |||
| 2620 | `x-own-selection-internal'). | 2620 | `x-own-selection-internal'). |
| 2621 | 2621 | ||
| 2622 | The function should return the value to send to the X server | 2622 | The function should return the value to send to the X server |
| 2623 | (typically a string). A return value of nil | 2623 | \(typically a string). A return value of nil |
| 2624 | means that the conversion could not be done. | 2624 | means that the conversion could not be done. |
| 2625 | A return value which is the symbol `NULL' | 2625 | A return value which is the symbol `NULL' |
| 2626 | means that a side-effect was executed, | 2626 | means that a side-effect was executed, |
| @@ -2629,10 +2629,10 @@ and there is no meaningful selection value. */); | |||
| 2629 | 2629 | ||
| 2630 | DEFVAR_LISP ("x-lost-selection-functions", Vx_lost_selection_functions, | 2630 | DEFVAR_LISP ("x-lost-selection-functions", Vx_lost_selection_functions, |
| 2631 | doc: /* A list of functions to be called when Emacs loses an X selection. | 2631 | doc: /* A list of functions to be called when Emacs loses an X selection. |
| 2632 | (This happens when some other X client makes its own selection | 2632 | \(This happens when some other X client makes its own selection |
| 2633 | or when a Lisp program explicitly clears the selection.) | 2633 | or when a Lisp program explicitly clears the selection.) |
| 2634 | The functions are called with one argument, the selection type | 2634 | The functions are called with one argument, the selection type |
| 2635 | (a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'). */); | 2635 | \(a symbol, typically `PRIMARY', `SECONDARY', or `CLIPBOARD'). */); |
| 2636 | Vx_lost_selection_functions = Qnil; | 2636 | Vx_lost_selection_functions = Qnil; |
| 2637 | 2637 | ||
| 2638 | DEFVAR_LISP ("x-sent-selection-functions", Vx_sent_selection_functions, | 2638 | DEFVAR_LISP ("x-sent-selection-functions", Vx_sent_selection_functions, |
diff --git a/src/xsettings.c b/src/xsettings.c index 28075b5e8a2..d7af68f1c5f 100644 --- a/src/xsettings.c +++ b/src/xsettings.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xsettings.h b/src/xsettings.h index 74e28b42960..fa2b5c505eb 100644 --- a/src/xsettings.h +++ b/src/xsettings.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xsmfns.c b/src/xsmfns.c index df5c46b0288..296b1cc3603 100644 --- a/src/xsmfns.c +++ b/src/xsmfns.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xterm.c b/src/xterm.c index 1f71afd7f70..ba9bf50de31 100644 --- a/src/xterm.c +++ b/src/xterm.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/src/xterm.h b/src/xterm.h index 3a78292907a..8e1fc788bc1 100644 --- a/src/xterm.h +++ b/src/xterm.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -459,6 +459,11 @@ struct x_display_info | |||
| 459 | /* SM */ | 459 | /* SM */ |
| 460 | Atom Xatom_SM_CLIENT_ID; | 460 | Atom Xatom_SM_CLIENT_ID; |
| 461 | 461 | ||
| 462 | #ifdef HAVE_XRANDR | ||
| 463 | int xrandr_major_version; | ||
| 464 | int xrandr_minor_version; | ||
| 465 | #endif | ||
| 466 | |||
| 462 | #ifdef USE_CAIRO | 467 | #ifdef USE_CAIRO |
| 463 | XExtCodes *ext_codes; | 468 | XExtCodes *ext_codes; |
| 464 | #endif | 469 | #endif |
diff --git a/src/xwidget.c b/src/xwidget.c index f436e95d686..d438d879098 100644 --- a/src/xwidget.c +++ b/src/xwidget.c | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -387,9 +387,12 @@ webkit_download_cb (WebKitWebView *webkitwebview, | |||
| 387 | } | 387 | } |
| 388 | 388 | ||
| 389 | static gboolean | 389 | static gboolean |
| 390 | webkit_mime_type_policy_typedecision_requested_cb | 390 | webkit_mime_type_policy_typedecision_requested_cb (WebKitWebView *webView, |
| 391 | (WebKitWebView *webView, WebKitWebFrame *frame, WebKitNetworkRequest *request, | 391 | WebKitWebFrame *frame, |
| 392 | gchar *mimetype, WebKitWebPolicyDecision *policy_decision, gpointer user_data) | 392 | WebKitNetworkRequest *request, |
| 393 | gchar *mimetype, | ||
| 394 | WebKitWebPolicyDecision *policy_decision, | ||
| 395 | gpointer user_data) | ||
| 393 | { | 396 | { |
| 394 | /* This function makes webkit send a download signal for all unknown | 397 | /* This function makes webkit send a download signal for all unknown |
| 395 | mime types. TODO: Defer the decision to Lisp, so that it's | 398 | mime types. TODO: Defer the decision to Lisp, so that it's |
| @@ -404,10 +407,12 @@ webkit_mime_type_policy_typedecision_requested_cb | |||
| 404 | } | 407 | } |
| 405 | 408 | ||
| 406 | static gboolean | 409 | static gboolean |
| 407 | webkit_new_window_policy_decision_requested_cb | 410 | webkit_new_window_policy_decision_requested_cb (WebKitWebView *webView, |
| 408 | (WebKitWebView *webView, WebKitWebFrame *frame, WebKitNetworkRequest *request, | 411 | WebKitWebFrame *frame, |
| 409 | WebKitWebNavigationAction *navigation_action, | 412 | WebKitNetworkRequest *request, |
| 410 | WebKitWebPolicyDecision *policy_decision, gpointer user_data) | 413 | WebKitWebNavigationAction *navigation_action, |
| 414 | WebKitWebPolicyDecision *policy_decision, | ||
| 415 | gpointer user_data) | ||
| 411 | { | 416 | { |
| 412 | struct xwidget *xw = g_object_get_data (G_OBJECT (webView), XG_XWIDGET); | 417 | struct xwidget *xw = g_object_get_data (G_OBJECT (webView), XG_XWIDGET); |
| 413 | webkit_web_navigation_action_get_original_uri (navigation_action); | 418 | webkit_web_navigation_action_get_original_uri (navigation_action); |
| @@ -419,10 +424,12 @@ webkit_new_window_policy_decision_requested_cb | |||
| 419 | } | 424 | } |
| 420 | 425 | ||
| 421 | static gboolean | 426 | static gboolean |
| 422 | webkit_navigation_policy_decision_requested_cb | 427 | webkit_navigation_policy_decision_requested_cb (WebKitWebView *webView, |
| 423 | (WebKitWebView *webView, WebKitWebFrame *frame, WebKitNetworkRequest *request, | 428 | WebKitWebFrame *frame, |
| 424 | WebKitWebNavigationAction *navigation_action, | 429 | WebKitNetworkRequest *request, |
| 425 | WebKitWebPolicyDecision *policy_decision, gpointer user_data) | 430 | WebKitWebNavigationAction *navigation_action, |
| 431 | WebKitWebPolicyDecision *policy_decision, | ||
| 432 | gpointer user_data) | ||
| 426 | { | 433 | { |
| 427 | struct xwidget *xw = g_object_get_data (G_OBJECT (webView), XG_XWIDGET); | 434 | struct xwidget *xw = g_object_get_data (G_OBJECT (webView), XG_XWIDGET); |
| 428 | store_xwidget_event_string (xw, "navigation-policy-decision-requested", | 435 | store_xwidget_event_string (xw, "navigation-policy-decision-requested", |
diff --git a/src/xwidget.h b/src/xwidget.h index 1e11f110379..8fc382188f4 100644 --- a/src/xwidget.h +++ b/src/xwidget.h | |||
| @@ -6,8 +6,8 @@ This file is part of GNU Emacs. | |||
| 6 | 6 | ||
| 7 | GNU Emacs is free software: you can redistribute it and/or modify | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
| 8 | it under the terms of the GNU General Public License as published by | 8 | it under the terms of the GNU General Public License as published by |
| 9 | the Free Software Foundation, either version 3 of the License, or | 9 | the Free Software Foundation, either version 3 of the License, or (at |
| 10 | (at your option) any later version. | 10 | your option) any later version. |
| 11 | 11 | ||
| 12 | GNU Emacs is distributed in the hope that it will be useful, | 12 | GNU Emacs is distributed in the hope that it will be useful, |
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/test/lisp/progmodes/ruby-mode-tests.el b/test/lisp/progmodes/ruby-mode-tests.el index da8d77c5157..4fa7470218a 100644 --- a/test/lisp/progmodes/ruby-mode-tests.el +++ b/test/lisp/progmodes/ruby-mode-tests.el | |||
| @@ -91,6 +91,15 @@ VALUES-PLIST is a list with alternating index and value elements." | |||
| 91 | (ert-deftest ruby-no-heredoc-inside-quotes () | 91 | (ert-deftest ruby-no-heredoc-inside-quotes () |
| 92 | (ruby-assert-state "\"<<\", \"\",\nfoo" 3 nil)) | 92 | (ruby-assert-state "\"<<\", \"\",\nfoo" 3 nil)) |
| 93 | 93 | ||
| 94 | (ert-deftest ruby-no-heredoc-left-shift () | ||
| 95 | ;; We can't really detect the left shift operator (like in similar | ||
| 96 | ;; cases, it depends on the type of foo), so we just require for << | ||
| 97 | ;; to be preceded by a character from a known set. | ||
| 98 | (ruby-assert-state "foo(a<<b)" 3 nil)) | ||
| 99 | |||
| 100 | (ert-deftest ruby-no-heredoc-class-self () | ||
| 101 | (ruby-assert-state "class <<self\nend" 3 nil)) | ||
| 102 | |||
| 94 | (ert-deftest ruby-exit!-font-lock () | 103 | (ert-deftest ruby-exit!-font-lock () |
| 95 | (ruby-assert-face "exit!" 5 font-lock-builtin-face)) | 104 | (ruby-assert-face "exit!" 5 font-lock-builtin-face)) |
| 96 | 105 | ||
| @@ -461,6 +470,14 @@ VALUES-PLIST is a list with alternating index and value elements." | |||
| 461 | (ruby-assert-face "%S{foo}" 4 nil) | 470 | (ruby-assert-face "%S{foo}" 4 nil) |
| 462 | (ruby-assert-face "%R{foo}" 4 nil)) | 471 | (ruby-assert-face "%R{foo}" 4 nil)) |
| 463 | 472 | ||
| 473 | (ert-deftest ruby-no-nested-percent-literals () | ||
| 474 | (ruby-with-temp-buffer "a = %w[b %()]" | ||
| 475 | (syntax-propertize (point)) | ||
| 476 | (should (null (nth 8 (syntax-ppss)))) | ||
| 477 | (should (eq t (nth 3 (syntax-ppss (1- (point-max)))))) | ||
| 478 | (search-backward "[") | ||
| 479 | (should (eq t (nth 3 (syntax-ppss)))))) | ||
| 480 | |||
| 464 | (ert-deftest ruby-add-log-current-method-examples () | 481 | (ert-deftest ruby-add-log-current-method-examples () |
| 465 | (let ((pairs '(("foo" . "#foo") | 482 | (let ((pairs '(("foo" . "#foo") |
| 466 | ("C.foo" . ".foo") | 483 | ("C.foo" . ".foo") |
diff --git a/test/manual/etags/CTAGS.good b/test/manual/etags/CTAGS.good index ebde715272a..19bc0bef657 100644 --- a/test/manual/etags/CTAGS.good +++ b/test/manual/etags/CTAGS.good | |||
| @@ -305,8 +305,6 @@ BUFFER_OBJFWDP c-src/emacs/src/lisp.h /^BUFFER_OBJFWDP (union Lisp_Fwd *a)$/ | |||
| 305 | BYTE_MARK_STACK c-src/emacs/src/lisp.h 3181 | 305 | BYTE_MARK_STACK c-src/emacs/src/lisp.h 3181 |
| 306 | Bar lua-src/test.lua /^function Square.something:Bar ()$/ | 306 | Bar lua-src/test.lua /^function Square.something:Bar ()$/ |
| 307 | Bar perl-src/kai-test.pl /^package Bar;$/ | 307 | Bar perl-src/kai-test.pl /^package Bar;$/ |
| 308 | Bar::f4 perl-src/kai-test.pl /^sub Bar::f4 {$/ | ||
| 309 | Bar::f5 perl-src/kai-test.pl /^sub f5 {$/ | ||
| 310 | Barrier_Function_Pointer/t ada-src/etags-test-for.ada /^ type Barrier_Function_Pointer is access$/ | 308 | Barrier_Function_Pointer/t ada-src/etags-test-for.ada /^ type Barrier_Function_Pointer is access$/ |
| 311 | Bidule/b ada-src/etags-test-for.ada /^ protected body Bidule is$/ | 309 | Bidule/b ada-src/etags-test-for.ada /^ protected body Bidule is$/ |
| 312 | Bidule/b ada-src/waroquiers.ada /^ protected body Bidule is$/ | 310 | Bidule/b ada-src/waroquiers.ada /^ protected body Bidule is$/ |
| @@ -614,8 +612,6 @@ Finalize_TAS_Cell/p ada-src/2ataspri.ads /^ procedure Finalize_TAS_Cell (Cel | |||
| 614 | First100Chars pas-src/common.pas /^procedure First100Chars; (*($/ | 612 | First100Chars pas-src/common.pas /^procedure First100Chars; (*($/ |
| 615 | Foo perl-src/kai-test.pl /^package Foo;$/ | 613 | Foo perl-src/kai-test.pl /^package Foo;$/ |
| 616 | Foo::Bar perl-src/kai-test.pl /^package Foo::Bar;$/ | 614 | Foo::Bar perl-src/kai-test.pl /^package Foo::Bar;$/ |
| 617 | Foo::Bar::f6 perl-src/kai-test.pl /^sub f6 {$/ | ||
| 618 | Foo::f3 perl-src/kai-test.pl /^sub f3 {$/ | ||
| 619 | Forth_help c-src/etags.c 573 | 615 | Forth_help c-src/etags.c 573 |
| 620 | Forth_suffixes c-src/etags.c 571 | 616 | Forth_suffixes c-src/etags.c 571 |
| 621 | Forth_words c-src/etags.c /^Forth_words (FILE *inf)$/ | 617 | Forth_words c-src/etags.c /^Forth_words (FILE *inf)$/ |
| @@ -2931,7 +2927,14 @@ f cp-src/c.C /^ void f() {}$/ | |||
| 2931 | f cp-src/fail.C /^ int f() { return 5; }$/ | 2927 | f cp-src/fail.C /^ int f() { return 5; }$/ |
| 2932 | f cp-src/fail.C /^int A::B::f() { return 2; }$/ | 2928 | f cp-src/fail.C /^int A::B::f() { return 2; }$/ |
| 2933 | f1 c.c /^ f1 () { \/* Do something. *\/; }$/ | 2929 | f1 c.c /^ f1 () { \/* Do something. *\/; }$/ |
| 2930 | f1 perl-src/kai-test.pl /^sub f1 {$/ | ||
| 2934 | f2 c.c /^void f2 () { \/* Do something. *\/; }$/ | 2931 | f2 c.c /^void f2 () { \/* Do something. *\/; }$/ |
| 2932 | f2 perl-src/kai-test.pl /^sub main::f2 {$/ | ||
| 2933 | f3 perl-src/kai-test.pl /^sub f3 {$/ | ||
| 2934 | f4 perl-src/kai-test.pl /^sub Bar::f4 {$/ | ||
| 2935 | f5 perl-src/kai-test.pl /^sub f5 {$/ | ||
| 2936 | f6 perl-src/kai-test.pl /^sub f6 {$/ | ||
| 2937 | f7 perl-src/kai-test.pl /^sub f7 {$/ | ||
| 2935 | fast_string_match_ignore_case c-src/emacs/src/lisp.h /^fast_string_match_ignore_case (Lisp_Object regexp,/ | 2938 | fast_string_match_ignore_case c-src/emacs/src/lisp.h /^fast_string_match_ignore_case (Lisp_Object regexp,/ |
| 2936 | fastctags make-src/Makefile /^fastctags:$/ | 2939 | fastctags make-src/Makefile /^fastctags:$/ |
| 2937 | fastetags make-src/Makefile /^fastetags:$/ | 2940 | fastetags make-src/Makefile /^fastetags:$/ |
| @@ -2952,6 +2955,7 @@ fignore c-src/etags.c 2416 | |||
| 2952 | file-of-tag el-src/emacs/lisp/progmodes/etags.el /^(defun file-of-tag (&optional relative)$/ | 2955 | file-of-tag el-src/emacs/lisp/progmodes/etags.el /^(defun file-of-tag (&optional relative)$/ |
| 2953 | file-of-tag-function el-src/emacs/lisp/progmodes/etags.el /^(defvar file-of-tag-function nil$/ | 2956 | file-of-tag-function el-src/emacs/lisp/progmodes/etags.el /^(defvar file-of-tag-function nil$/ |
| 2954 | fileJoin php-src/lce_functions.php /^ function fileJoin()$/ | 2957 | fileJoin php-src/lce_functions.php /^ function fileJoin()$/ |
| 2958 | file_end perl-src/htlmify-cystic /^sub file_end ()$/ | ||
| 2955 | file_index perl-src/htlmify-cystic 33 | 2959 | file_index perl-src/htlmify-cystic 33 |
| 2956 | file_tocs perl-src/htlmify-cystic 30 | 2960 | file_tocs perl-src/htlmify-cystic 30 |
| 2957 | filename_is_absolute c-src/etags.c /^filename_is_absolute (char *fn)$/ | 2961 | filename_is_absolute c-src/etags.c /^filename_is_absolute (char *fn)$/ |
| @@ -2978,6 +2982,10 @@ find-tag-tag-order el-src/emacs/lisp/progmodes/etags.el /^(defvar find-tag-tag-o | |||
| 2978 | find_entries c-src/etags.c /^find_entries (FILE *inf)$/ | 2982 | find_entries c-src/etags.c /^find_entries (FILE *inf)$/ |
| 2979 | find_user_signal_name c-src/emacs/src/keyboard.c /^find_user_signal_name (int sig)$/ | 2983 | find_user_signal_name c-src/emacs/src/keyboard.c /^find_user_signal_name (int sig)$/ |
| 2980 | findcats prol-src/natded.prolog /^findcats([],Left,Left).$/ | 2984 | findcats prol-src/natded.prolog /^findcats([],Left,Left).$/ |
| 2985 | finish_appendices perl-src/htlmify-cystic /^sub finish_appendices ()$/ | ||
| 2986 | finish_sections perl-src/htlmify-cystic /^sub finish_sections ()$/ | ||
| 2987 | finish_subsections perl-src/htlmify-cystic /^sub finish_subsections ()$/ | ||
| 2988 | finish_subsubsections perl-src/htlmify-cystic /^sub finish_subsubsections ()$/ | ||
| 2981 | finlist c-src/etags.c 2414 | 2989 | finlist c-src/etags.c 2414 |
| 2982 | first c-src/emacs/src/gmalloc.c 151 | 2990 | first c-src/emacs/src/gmalloc.c 151 |
| 2983 | fitchtreelist prol-src/natded.prolog /^fitchtreelist([]).$/ | 2991 | fitchtreelist prol-src/natded.prolog /^fitchtreelist([]).$/ |
| @@ -3085,6 +3093,7 @@ get_layer_by_name lua-src/allegro.lua /^local function get_layer_by_name (sprite | |||
| 3085 | get_tag c-src/etags.c /^get_tag (register char *bp, char **namepp)$/ | 3093 | get_tag c-src/etags.c /^get_tag (register char *bp, char **namepp)$/ |
| 3086 | get_word c-src/tab.c /^static char *get_word(char **str, char delim)$/ | 3094 | get_word c-src/tab.c /^static char *get_word(char **str, char delim)$/ |
| 3087 | getcjmp c-src/emacs/src/keyboard.c 147 | 3095 | getcjmp c-src/emacs/src/keyboard.c 147 |
| 3096 | getopt perl-src/yagrip.pl /^sub getopt {$/ | ||
| 3088 | getopt.o make-src/Makefile /^getopt.o: emacs\/lib-src\/getopt.c$/ | 3097 | getopt.o make-src/Makefile /^getopt.o: emacs\/lib-src\/getopt.c$/ |
| 3089 | getopt1.o make-src/Makefile /^getopt1.o: emacs\/lib-src\/getopt1.c$/ | 3098 | getopt1.o make-src/Makefile /^getopt1.o: emacs\/lib-src\/getopt1.c$/ |
| 3090 | getptys objc-src/Subprocess.m /^getptys (int *master, int *slave)$/ | 3099 | getptys objc-src/Subprocess.m /^getptys (int *master, int *slave)$/ |
| @@ -3419,23 +3428,6 @@ mach_reply_port c-src/machsyscalls.h /^SYSCALL (mach_reply_port, -26,$/ | |||
| 3419 | mach_task_self c-src/machsyscalls.h /^SYSCALL (mach_task_self, -28,$/ | 3428 | mach_task_self c-src/machsyscalls.h /^SYSCALL (mach_task_self, -28,$/ |
| 3420 | mach_thread_self c-src/machsyscalls.h /^SYSCALL (mach_thread_self, -27,$/ | 3429 | mach_thread_self c-src/machsyscalls.h /^SYSCALL (mach_thread_self, -27,$/ |
| 3421 | magic c-src/emacs/src/gmalloc.c 1863 | 3430 | magic c-src/emacs/src/gmalloc.c 1863 |
| 3422 | main::f1 perl-src/kai-test.pl /^sub f1 {$/ | ||
| 3423 | main::f2 perl-src/kai-test.pl /^sub main::f2 {$/ | ||
| 3424 | main::f7 perl-src/kai-test.pl /^sub f7 {$/ | ||
| 3425 | main::file_end perl-src/htlmify-cystic /^sub file_end ()$/ | ||
| 3426 | main::finish_appendices perl-src/htlmify-cystic /^sub finish_appendices ()$/ | ||
| 3427 | main::finish_sections perl-src/htlmify-cystic /^sub finish_sections ()$/ | ||
| 3428 | main::finish_subsections perl-src/htlmify-cystic /^sub finish_subsections ()$/ | ||
| 3429 | main::finish_subsubsections perl-src/htlmify-cystic /^sub finish_subsubsections ()$/ | ||
| 3430 | main::getopt perl-src/yagrip.pl /^sub getopt {$/ | ||
| 3431 | main::read_toc perl-src/htlmify-cystic /^sub read_toc ()$/ | ||
| 3432 | main::section_href perl-src/htlmify-cystic /^sub section_href ($)$/ | ||
| 3433 | main::section_name perl-src/htlmify-cystic /^sub section_name ($)$/ | ||
| 3434 | main::section_url perl-src/htlmify-cystic /^sub section_url ()$/ | ||
| 3435 | main::section_url_base perl-src/htlmify-cystic /^sub section_url_base ()$/ | ||
| 3436 | main::section_url_name perl-src/htlmify-cystic /^sub section_url_name ()$/ | ||
| 3437 | main::toc_line perl-src/htlmify-cystic /^sub toc_line ($)$/ | ||
| 3438 | main::usage perl-src/yagrip.pl /^sub usage {$/ | ||
| 3439 | maintaining.info make-src/Makefile /^maintaining.info: maintaining.texi$/ | 3431 | maintaining.info make-src/Makefile /^maintaining.info: maintaining.texi$/ |
| 3440 | make-abbrev-table c-src/abbrev.c /^DEFUN ("make-abbrev-table", Fmake_abbrev_table, Sm/ | 3432 | make-abbrev-table c-src/abbrev.c /^DEFUN ("make-abbrev-table", Fmake_abbrev_table, Sm/ |
| 3441 | make_C_tag c-src/etags.c /^make_C_tag (bool isfun)$/ | 3433 | make_C_tag c-src/etags.c /^make_C_tag (bool isfun)$/ |
| @@ -3922,6 +3914,7 @@ read_key_sequence_cmd c-src/emacs/src/keyboard.c 232 | |||
| 3922 | read_key_sequence_remapped c-src/emacs/src/keyboard.c 233 | 3914 | read_key_sequence_remapped c-src/emacs/src/keyboard.c 233 |
| 3923 | read_key_sequence_vs c-src/emacs/src/keyboard.c /^read_key_sequence_vs (Lisp_Object prompt, Lisp_Obj/ | 3915 | read_key_sequence_vs c-src/emacs/src/keyboard.c /^read_key_sequence_vs (Lisp_Object prompt, Lisp_Obj/ |
| 3924 | read_menu_command c-src/emacs/src/keyboard.c /^read_menu_command (void)$/ | 3916 | read_menu_command c-src/emacs/src/keyboard.c /^read_menu_command (void)$/ |
| 3917 | read_toc perl-src/htlmify-cystic /^sub read_toc ()$/ | ||
| 3925 | readable_events c-src/emacs/src/keyboard.c /^readable_events (int flags)$/ | 3918 | readable_events c-src/emacs/src/keyboard.c /^readable_events (int flags)$/ |
| 3926 | readline c-src/etags.c /^readline (linebuffer *lbp, FILE *stream)$/ | 3919 | readline c-src/etags.c /^readline (linebuffer *lbp, FILE *stream)$/ |
| 3927 | readline_internal c-src/etags.c /^readline_internal (linebuffer *lbp, register FILE / | 3920 | readline_internal c-src/etags.c /^readline_internal (linebuffer *lbp, register FILE / |
| @@ -4027,8 +4020,13 @@ scroll_bar_parts c-src/emacs/src/keyboard.c 5189 | |||
| 4027 | sec=\relax tex-src/texinfo.tex /^\\let\\appendixsec=\\relax$/ | 4020 | sec=\relax tex-src/texinfo.tex /^\\let\\appendixsec=\\relax$/ |
| 4028 | section perl-src/htlmify-cystic 25 | 4021 | section perl-src/htlmify-cystic 25 |
| 4029 | section=\relax tex-src/texinfo.tex /^\\let\\appendixsection=\\relax$/ | 4022 | section=\relax tex-src/texinfo.tex /^\\let\\appendixsection=\\relax$/ |
| 4023 | section_href perl-src/htlmify-cystic /^sub section_href ($)$/ | ||
| 4030 | section_name perl-src/htlmify-cystic 12 | 4024 | section_name perl-src/htlmify-cystic 12 |
| 4025 | section_name perl-src/htlmify-cystic /^sub section_name ($)$/ | ||
| 4031 | section_toc perl-src/htlmify-cystic 15 | 4026 | section_toc perl-src/htlmify-cystic 15 |
| 4027 | section_url perl-src/htlmify-cystic /^sub section_url ()$/ | ||
| 4028 | section_url_base perl-src/htlmify-cystic /^sub section_url_base ()$/ | ||
| 4029 | section_url_name perl-src/htlmify-cystic /^sub section_url_name ()$/ | ||
| 4032 | select prol-src/natded.prolog /^select(X,[X|Xs],Xs).$/ | 4030 | select prol-src/natded.prolog /^select(X,[X|Xs],Xs).$/ |
| 4033 | select-tags-table el-src/emacs/lisp/progmodes/etags.el /^(defun select-tags-table ()$/ | 4031 | select-tags-table el-src/emacs/lisp/progmodes/etags.el /^(defun select-tags-table ()$/ |
| 4034 | select-tags-table-mode el-src/emacs/lisp/progmodes/etags.el /^(define-derived-mode select-tags-table-mode specia/ | 4032 | select-tags-table-mode el-src/emacs/lisp/progmodes/etags.el /^(define-derived-mode select-tags-table-mode specia/ |
| @@ -4324,6 +4322,7 @@ timers_run c-src/emacs/src/keyboard.c 320 | |||
| 4324 | tinbody c-src/etags.c 2431 | 4322 | tinbody c-src/etags.c 2431 |
| 4325 | tkeyseen c-src/etags.c 2429 | 4323 | tkeyseen c-src/etags.c 2429 |
| 4326 | tnone c-src/etags.c 2428 | 4324 | tnone c-src/etags.c 2428 |
| 4325 | toc_line perl-src/htlmify-cystic /^sub toc_line ($)$/ | ||
| 4327 | toggleDescription objc-src/PackInsp.m /^-toggleDescription$/ | 4326 | toggleDescription objc-src/PackInsp.m /^-toggleDescription$/ |
| 4328 | tok c-src/etags.c 2491 | 4327 | tok c-src/etags.c 2491 |
| 4329 | token c-src/etags.c 2508 | 4328 | token c-src/etags.c 2508 |
| @@ -4396,6 +4395,7 @@ unsignedp cccp.y 113 | |||
| 4396 | unsignedp y-src/cccp.y 112 | 4395 | unsignedp y-src/cccp.y 112 |
| 4397 | uprintmax_t c-src/emacs/src/lisp.h 149 | 4396 | uprintmax_t c-src/emacs/src/lisp.h 149 |
| 4398 | uprintmax_t c-src/emacs/src/lisp.h 154 | 4397 | uprintmax_t c-src/emacs/src/lisp.h 154 |
| 4398 | usage perl-src/yagrip.pl /^sub usage {$/ | ||
| 4399 | usecharno c-src/etags.c 210 | 4399 | usecharno c-src/etags.c 210 |
| 4400 | used c-src/emacs/src/regex.h 347 | 4400 | used c-src/emacs/src/regex.h 347 |
| 4401 | used_syntax c-src/emacs/src/regex.h 398 | 4401 | used_syntax c-src/emacs/src/regex.h 398 |
diff --git a/test/manual/etags/ETAGS.good_1 b/test/manual/etags/ETAGS.good_1 index d2550863428..58661bbf600 100644 --- a/test/manual/etags/ETAGS.good_1 +++ b/test/manual/etags/ETAGS.good_1 | |||
| @@ -2665,7 +2665,7 @@ define("TEST"TEST1,0 | |||
| 2665 | test 4,26 | 2665 | test 4,26 |
| 2666 | foo(16,200 | 2666 | foo(16,200 |
| 2667 | 2667 | ||
| 2668 | perl-src/htlmify-cystic,1443 | 2668 | perl-src/htlmify-cystic,1197 |
| 2669 | my @section_name;section_name12,236 | 2669 | my @section_name;section_name12,236 |
| 2670 | my @appendix_name;appendix_name13,254 | 2670 | my @appendix_name;appendix_name13,254 |
| 2671 | my @section_toc;section_toc15,274 | 2671 | my @section_toc;section_toc15,274 |
| @@ -2683,7 +2683,7 @@ my $output_file;output_file35,556 | |||
| 2683 | my $line;line37,574 | 2683 | my $line;line37,574 |
| 2684 | my $subsection_marker;subsection_marker161,3883 | 2684 | my $subsection_marker;subsection_marker161,3883 |
| 2685 | my $new;new163,3907 | 2685 | my $new;new163,3907 |
| 2686 | sub read_toc main::read_toc165,3917 | 2686 | sub read_toc 165,3917 |
| 2687 | my $entry entry218,5621 | 2687 | my $entry entry218,5621 |
| 2688 | my $entry entry234,6077 | 2688 | my $entry entry234,6077 |
| 2689 | my $entry entry245,6351 | 2689 | my $entry entry245,6351 |
| @@ -2692,38 +2692,38 @@ sub read_toc main::read_toc165,3917 | |||
| 2692 | my $entry entry276,7204 | 2692 | my $entry entry276,7204 |
| 2693 | my $entry entry281,7328 | 2693 | my $entry entry281,7328 |
| 2694 | my $entry entry296,7698 | 2694 | my $entry entry296,7698 |
| 2695 | sub finish_subsubsections main::finish_subsubsections302,7805 | 2695 | sub finish_subsubsections 302,7805 |
| 2696 | sub finish_subsections main::finish_subsections309,7987 | 2696 | sub finish_subsections 309,7987 |
| 2697 | sub finish_sections main::finish_sections320,8310 | 2697 | sub finish_sections 320,8310 |
| 2698 | sub finish_appendices main::finish_appendices331,8599 | 2698 | sub finish_appendices 331,8599 |
| 2699 | sub section_url_base main::section_url_base337,8724 | 2699 | sub section_url_base 337,8724 |
| 2700 | sub section_url_name main::section_url_name342,8922 | 2700 | sub section_url_name 342,8922 |
| 2701 | sub section_url main::section_url355,9284 | 2701 | sub section_url 355,9284 |
| 2702 | my $name name357,9336 | 2702 | my $name name357,9336 |
| 2703 | sub section_href main::section_href364,9452 | 2703 | sub section_href 364,9452 |
| 2704 | sub section_name main::section_name368,9551 | 2704 | sub section_name 368,9551 |
| 2705 | sub toc_line main::toc_line372,9655 | 2705 | sub toc_line 372,9655 |
| 2706 | sub file_end main::file_end375,9750 | 2706 | sub file_end 375,9750 |
| 2707 | 2707 | ||
| 2708 | perl-src/yagrip.pl,258 | 2708 | perl-src/yagrip.pl,233 |
| 2709 | sub getopt main::getopt7,156 | 2709 | sub getopt 7,156 |
| 2710 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 | 2710 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 |
| 2711 | sub usage main::usage38,856 | 2711 | sub usage 38,856 |
| 2712 | local($prog,$_,@list)($prog,$_,@list39,868 | 2712 | local($prog,$_,@list)($prog,$_,@list39,868 |
| 2713 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 | 2713 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 |
| 2714 | 2714 | ||
| 2715 | perl-src/kai-test.pl,244 | 2715 | perl-src/kai-test.pl,203 |
| 2716 | sub f1 main::f12,16 | 2716 | sub f1 2,16 |
| 2717 | sub main::f2 6,50 | 2717 | sub main::f2 f26,50 |
| 2718 | package Foo;10,90 | 2718 | package Foo;10,90 |
| 2719 | sub f3 Foo::f312,104 | 2719 | sub f3 12,104 |
| 2720 | sub Bar::f4 16,138 | 2720 | sub Bar::f4 f416,138 |
| 2721 | package Bar;20,177 | 2721 | package Bar;20,177 |
| 2722 | sub f5 Bar::f522,191 | 2722 | sub f5 22,191 |
| 2723 | package Foo::Bar;26,225 | 2723 | package Foo::Bar;26,225 |
| 2724 | sub f6 Foo::Bar::f628,244 | 2724 | sub f6 28,244 |
| 2725 | package main;32,278 | 2725 | package main;32,278 |
| 2726 | sub f7 main::f734,293 | 2726 | sub f7 34,293 |
| 2727 | 2727 | ||
| 2728 | ps-src/rfc1245.ps,2478 | 2728 | ps-src/rfc1245.ps,2478 |
| 2729 | /FMversion 12,311 | 2729 | /FMversion 12,311 |
diff --git a/test/manual/etags/ETAGS.good_2 b/test/manual/etags/ETAGS.good_2 index 9eb1d4297c8..ecfa7d19885 100644 --- a/test/manual/etags/ETAGS.good_2 +++ b/test/manual/etags/ETAGS.good_2 | |||
| @@ -3235,7 +3235,7 @@ define("TEST"TEST1,0 | |||
| 3235 | test 4,26 | 3235 | test 4,26 |
| 3236 | foo(16,200 | 3236 | foo(16,200 |
| 3237 | 3237 | ||
| 3238 | perl-src/htlmify-cystic,1443 | 3238 | perl-src/htlmify-cystic,1197 |
| 3239 | my @section_name;section_name12,236 | 3239 | my @section_name;section_name12,236 |
| 3240 | my @appendix_name;appendix_name13,254 | 3240 | my @appendix_name;appendix_name13,254 |
| 3241 | my @section_toc;section_toc15,274 | 3241 | my @section_toc;section_toc15,274 |
| @@ -3253,7 +3253,7 @@ my $output_file;output_file35,556 | |||
| 3253 | my $line;line37,574 | 3253 | my $line;line37,574 |
| 3254 | my $subsection_marker;subsection_marker161,3883 | 3254 | my $subsection_marker;subsection_marker161,3883 |
| 3255 | my $new;new163,3907 | 3255 | my $new;new163,3907 |
| 3256 | sub read_toc main::read_toc165,3917 | 3256 | sub read_toc 165,3917 |
| 3257 | my $entry entry218,5621 | 3257 | my $entry entry218,5621 |
| 3258 | my $entry entry234,6077 | 3258 | my $entry entry234,6077 |
| 3259 | my $entry entry245,6351 | 3259 | my $entry entry245,6351 |
| @@ -3262,38 +3262,38 @@ sub read_toc main::read_toc165,3917 | |||
| 3262 | my $entry entry276,7204 | 3262 | my $entry entry276,7204 |
| 3263 | my $entry entry281,7328 | 3263 | my $entry entry281,7328 |
| 3264 | my $entry entry296,7698 | 3264 | my $entry entry296,7698 |
| 3265 | sub finish_subsubsections main::finish_subsubsections302,7805 | 3265 | sub finish_subsubsections 302,7805 |
| 3266 | sub finish_subsections main::finish_subsections309,7987 | 3266 | sub finish_subsections 309,7987 |
| 3267 | sub finish_sections main::finish_sections320,8310 | 3267 | sub finish_sections 320,8310 |
| 3268 | sub finish_appendices main::finish_appendices331,8599 | 3268 | sub finish_appendices 331,8599 |
| 3269 | sub section_url_base main::section_url_base337,8724 | 3269 | sub section_url_base 337,8724 |
| 3270 | sub section_url_name main::section_url_name342,8922 | 3270 | sub section_url_name 342,8922 |
| 3271 | sub section_url main::section_url355,9284 | 3271 | sub section_url 355,9284 |
| 3272 | my $name name357,9336 | 3272 | my $name name357,9336 |
| 3273 | sub section_href main::section_href364,9452 | 3273 | sub section_href 364,9452 |
| 3274 | sub section_name main::section_name368,9551 | 3274 | sub section_name 368,9551 |
| 3275 | sub toc_line main::toc_line372,9655 | 3275 | sub toc_line 372,9655 |
| 3276 | sub file_end main::file_end375,9750 | 3276 | sub file_end 375,9750 |
| 3277 | 3277 | ||
| 3278 | perl-src/yagrip.pl,258 | 3278 | perl-src/yagrip.pl,233 |
| 3279 | sub getopt main::getopt7,156 | 3279 | sub getopt 7,156 |
| 3280 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 | 3280 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 |
| 3281 | sub usage main::usage38,856 | 3281 | sub usage 38,856 |
| 3282 | local($prog,$_,@list)($prog,$_,@list39,868 | 3282 | local($prog,$_,@list)($prog,$_,@list39,868 |
| 3283 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 | 3283 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 |
| 3284 | 3284 | ||
| 3285 | perl-src/kai-test.pl,244 | 3285 | perl-src/kai-test.pl,203 |
| 3286 | sub f1 main::f12,16 | 3286 | sub f1 2,16 |
| 3287 | sub main::f2 6,50 | 3287 | sub main::f2 f26,50 |
| 3288 | package Foo;10,90 | 3288 | package Foo;10,90 |
| 3289 | sub f3 Foo::f312,104 | 3289 | sub f3 12,104 |
| 3290 | sub Bar::f4 16,138 | 3290 | sub Bar::f4 f416,138 |
| 3291 | package Bar;20,177 | 3291 | package Bar;20,177 |
| 3292 | sub f5 Bar::f522,191 | 3292 | sub f5 22,191 |
| 3293 | package Foo::Bar;26,225 | 3293 | package Foo::Bar;26,225 |
| 3294 | sub f6 Foo::Bar::f628,244 | 3294 | sub f6 28,244 |
| 3295 | package main;32,278 | 3295 | package main;32,278 |
| 3296 | sub f7 main::f734,293 | 3296 | sub f7 34,293 |
| 3297 | 3297 | ||
| 3298 | ps-src/rfc1245.ps,2478 | 3298 | ps-src/rfc1245.ps,2478 |
| 3299 | /FMversion 12,311 | 3299 | /FMversion 12,311 |
diff --git a/test/manual/etags/ETAGS.good_3 b/test/manual/etags/ETAGS.good_3 index 1f5a34272e3..5f84aa9a0c6 100644 --- a/test/manual/etags/ETAGS.good_3 +++ b/test/manual/etags/ETAGS.good_3 | |||
| @@ -3012,7 +3012,7 @@ test 4,26 | |||
| 3012 | var $test12,176 | 3012 | var $test12,176 |
| 3013 | foo(16,200 | 3013 | foo(16,200 |
| 3014 | 3014 | ||
| 3015 | perl-src/htlmify-cystic,1443 | 3015 | perl-src/htlmify-cystic,1197 |
| 3016 | my @section_name;section_name12,236 | 3016 | my @section_name;section_name12,236 |
| 3017 | my @appendix_name;appendix_name13,254 | 3017 | my @appendix_name;appendix_name13,254 |
| 3018 | my @section_toc;section_toc15,274 | 3018 | my @section_toc;section_toc15,274 |
| @@ -3030,7 +3030,7 @@ my $output_file;output_file35,556 | |||
| 3030 | my $line;line37,574 | 3030 | my $line;line37,574 |
| 3031 | my $subsection_marker;subsection_marker161,3883 | 3031 | my $subsection_marker;subsection_marker161,3883 |
| 3032 | my $new;new163,3907 | 3032 | my $new;new163,3907 |
| 3033 | sub read_toc main::read_toc165,3917 | 3033 | sub read_toc 165,3917 |
| 3034 | my $entry entry218,5621 | 3034 | my $entry entry218,5621 |
| 3035 | my $entry entry234,6077 | 3035 | my $entry entry234,6077 |
| 3036 | my $entry entry245,6351 | 3036 | my $entry entry245,6351 |
| @@ -3039,38 +3039,38 @@ sub read_toc main::read_toc165,3917 | |||
| 3039 | my $entry entry276,7204 | 3039 | my $entry entry276,7204 |
| 3040 | my $entry entry281,7328 | 3040 | my $entry entry281,7328 |
| 3041 | my $entry entry296,7698 | 3041 | my $entry entry296,7698 |
| 3042 | sub finish_subsubsections main::finish_subsubsections302,7805 | 3042 | sub finish_subsubsections 302,7805 |
| 3043 | sub finish_subsections main::finish_subsections309,7987 | 3043 | sub finish_subsections 309,7987 |
| 3044 | sub finish_sections main::finish_sections320,8310 | 3044 | sub finish_sections 320,8310 |
| 3045 | sub finish_appendices main::finish_appendices331,8599 | 3045 | sub finish_appendices 331,8599 |
| 3046 | sub section_url_base main::section_url_base337,8724 | 3046 | sub section_url_base 337,8724 |
| 3047 | sub section_url_name main::section_url_name342,8922 | 3047 | sub section_url_name 342,8922 |
| 3048 | sub section_url main::section_url355,9284 | 3048 | sub section_url 355,9284 |
| 3049 | my $name name357,9336 | 3049 | my $name name357,9336 |
| 3050 | sub section_href main::section_href364,9452 | 3050 | sub section_href 364,9452 |
| 3051 | sub section_name main::section_name368,9551 | 3051 | sub section_name 368,9551 |
| 3052 | sub toc_line main::toc_line372,9655 | 3052 | sub toc_line 372,9655 |
| 3053 | sub file_end main::file_end375,9750 | 3053 | sub file_end 375,9750 |
| 3054 | 3054 | ||
| 3055 | perl-src/yagrip.pl,258 | 3055 | perl-src/yagrip.pl,233 |
| 3056 | sub getopt main::getopt7,156 | 3056 | sub getopt 7,156 |
| 3057 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 | 3057 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 |
| 3058 | sub usage main::usage38,856 | 3058 | sub usage 38,856 |
| 3059 | local($prog,$_,@list)($prog,$_,@list39,868 | 3059 | local($prog,$_,@list)($prog,$_,@list39,868 |
| 3060 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 | 3060 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 |
| 3061 | 3061 | ||
| 3062 | perl-src/kai-test.pl,244 | 3062 | perl-src/kai-test.pl,203 |
| 3063 | sub f1 main::f12,16 | 3063 | sub f1 2,16 |
| 3064 | sub main::f2 6,50 | 3064 | sub main::f2 f26,50 |
| 3065 | package Foo;10,90 | 3065 | package Foo;10,90 |
| 3066 | sub f3 Foo::f312,104 | 3066 | sub f3 12,104 |
| 3067 | sub Bar::f4 16,138 | 3067 | sub Bar::f4 f416,138 |
| 3068 | package Bar;20,177 | 3068 | package Bar;20,177 |
| 3069 | sub f5 Bar::f522,191 | 3069 | sub f5 22,191 |
| 3070 | package Foo::Bar;26,225 | 3070 | package Foo::Bar;26,225 |
| 3071 | sub f6 Foo::Bar::f628,244 | 3071 | sub f6 28,244 |
| 3072 | package main;32,278 | 3072 | package main;32,278 |
| 3073 | sub f7 main::f734,293 | 3073 | sub f7 34,293 |
| 3074 | 3074 | ||
| 3075 | ps-src/rfc1245.ps,2478 | 3075 | ps-src/rfc1245.ps,2478 |
| 3076 | /FMversion 12,311 | 3076 | /FMversion 12,311 |
diff --git a/test/manual/etags/ETAGS.good_4 b/test/manual/etags/ETAGS.good_4 index b8a3d9de6db..12e2a6549cf 100644 --- a/test/manual/etags/ETAGS.good_4 +++ b/test/manual/etags/ETAGS.good_4 | |||
| @@ -2829,7 +2829,7 @@ define("TEST"TEST1,0 | |||
| 2829 | test 4,26 | 2829 | test 4,26 |
| 2830 | foo(16,200 | 2830 | foo(16,200 |
| 2831 | 2831 | ||
| 2832 | perl-src/htlmify-cystic,1443 | 2832 | perl-src/htlmify-cystic,1197 |
| 2833 | my @section_name;section_name12,236 | 2833 | my @section_name;section_name12,236 |
| 2834 | my @appendix_name;appendix_name13,254 | 2834 | my @appendix_name;appendix_name13,254 |
| 2835 | my @section_toc;section_toc15,274 | 2835 | my @section_toc;section_toc15,274 |
| @@ -2847,7 +2847,7 @@ my $output_file;output_file35,556 | |||
| 2847 | my $line;line37,574 | 2847 | my $line;line37,574 |
| 2848 | my $subsection_marker;subsection_marker161,3883 | 2848 | my $subsection_marker;subsection_marker161,3883 |
| 2849 | my $new;new163,3907 | 2849 | my $new;new163,3907 |
| 2850 | sub read_toc main::read_toc165,3917 | 2850 | sub read_toc 165,3917 |
| 2851 | my $entry entry218,5621 | 2851 | my $entry entry218,5621 |
| 2852 | my $entry entry234,6077 | 2852 | my $entry entry234,6077 |
| 2853 | my $entry entry245,6351 | 2853 | my $entry entry245,6351 |
| @@ -2856,38 +2856,38 @@ sub read_toc main::read_toc165,3917 | |||
| 2856 | my $entry entry276,7204 | 2856 | my $entry entry276,7204 |
| 2857 | my $entry entry281,7328 | 2857 | my $entry entry281,7328 |
| 2858 | my $entry entry296,7698 | 2858 | my $entry entry296,7698 |
| 2859 | sub finish_subsubsections main::finish_subsubsections302,7805 | 2859 | sub finish_subsubsections 302,7805 |
| 2860 | sub finish_subsections main::finish_subsections309,7987 | 2860 | sub finish_subsections 309,7987 |
| 2861 | sub finish_sections main::finish_sections320,8310 | 2861 | sub finish_sections 320,8310 |
| 2862 | sub finish_appendices main::finish_appendices331,8599 | 2862 | sub finish_appendices 331,8599 |
| 2863 | sub section_url_base main::section_url_base337,8724 | 2863 | sub section_url_base 337,8724 |
| 2864 | sub section_url_name main::section_url_name342,8922 | 2864 | sub section_url_name 342,8922 |
| 2865 | sub section_url main::section_url355,9284 | 2865 | sub section_url 355,9284 |
| 2866 | my $name name357,9336 | 2866 | my $name name357,9336 |
| 2867 | sub section_href main::section_href364,9452 | 2867 | sub section_href 364,9452 |
| 2868 | sub section_name main::section_name368,9551 | 2868 | sub section_name 368,9551 |
| 2869 | sub toc_line main::toc_line372,9655 | 2869 | sub toc_line 372,9655 |
| 2870 | sub file_end main::file_end375,9750 | 2870 | sub file_end 375,9750 |
| 2871 | 2871 | ||
| 2872 | perl-src/yagrip.pl,258 | 2872 | perl-src/yagrip.pl,233 |
| 2873 | sub getopt main::getopt7,156 | 2873 | sub getopt 7,156 |
| 2874 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 | 2874 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 |
| 2875 | sub usage main::usage38,856 | 2875 | sub usage 38,856 |
| 2876 | local($prog,$_,@list)($prog,$_,@list39,868 | 2876 | local($prog,$_,@list)($prog,$_,@list39,868 |
| 2877 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 | 2877 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 |
| 2878 | 2878 | ||
| 2879 | perl-src/kai-test.pl,244 | 2879 | perl-src/kai-test.pl,203 |
| 2880 | sub f1 main::f12,16 | 2880 | sub f1 2,16 |
| 2881 | sub main::f2 6,50 | 2881 | sub main::f2 f26,50 |
| 2882 | package Foo;10,90 | 2882 | package Foo;10,90 |
| 2883 | sub f3 Foo::f312,104 | 2883 | sub f3 12,104 |
| 2884 | sub Bar::f4 16,138 | 2884 | sub Bar::f4 f416,138 |
| 2885 | package Bar;20,177 | 2885 | package Bar;20,177 |
| 2886 | sub f5 Bar::f522,191 | 2886 | sub f5 22,191 |
| 2887 | package Foo::Bar;26,225 | 2887 | package Foo::Bar;26,225 |
| 2888 | sub f6 Foo::Bar::f628,244 | 2888 | sub f6 28,244 |
| 2889 | package main;32,278 | 2889 | package main;32,278 |
| 2890 | sub f7 main::f734,293 | 2890 | sub f7 34,293 |
| 2891 | 2891 | ||
| 2892 | ps-src/rfc1245.ps,2478 | 2892 | ps-src/rfc1245.ps,2478 |
| 2893 | /FMversion 12,311 | 2893 | /FMversion 12,311 |
diff --git a/test/manual/etags/ETAGS.good_5 b/test/manual/etags/ETAGS.good_5 index 9e3b258eabc..98de4f2c2fb 100644 --- a/test/manual/etags/ETAGS.good_5 +++ b/test/manual/etags/ETAGS.good_5 | |||
| @@ -3746,7 +3746,7 @@ test 4,26 | |||
| 3746 | var $test12,176 | 3746 | var $test12,176 |
| 3747 | foo(16,200 | 3747 | foo(16,200 |
| 3748 | 3748 | ||
| 3749 | perl-src/htlmify-cystic,1443 | 3749 | perl-src/htlmify-cystic,1197 |
| 3750 | my @section_name;section_name12,236 | 3750 | my @section_name;section_name12,236 |
| 3751 | my @appendix_name;appendix_name13,254 | 3751 | my @appendix_name;appendix_name13,254 |
| 3752 | my @section_toc;section_toc15,274 | 3752 | my @section_toc;section_toc15,274 |
| @@ -3764,7 +3764,7 @@ my $output_file;output_file35,556 | |||
| 3764 | my $line;line37,574 | 3764 | my $line;line37,574 |
| 3765 | my $subsection_marker;subsection_marker161,3883 | 3765 | my $subsection_marker;subsection_marker161,3883 |
| 3766 | my $new;new163,3907 | 3766 | my $new;new163,3907 |
| 3767 | sub read_toc main::read_toc165,3917 | 3767 | sub read_toc 165,3917 |
| 3768 | my $entry entry218,5621 | 3768 | my $entry entry218,5621 |
| 3769 | my $entry entry234,6077 | 3769 | my $entry entry234,6077 |
| 3770 | my $entry entry245,6351 | 3770 | my $entry entry245,6351 |
| @@ -3773,38 +3773,38 @@ sub read_toc main::read_toc165,3917 | |||
| 3773 | my $entry entry276,7204 | 3773 | my $entry entry276,7204 |
| 3774 | my $entry entry281,7328 | 3774 | my $entry entry281,7328 |
| 3775 | my $entry entry296,7698 | 3775 | my $entry entry296,7698 |
| 3776 | sub finish_subsubsections main::finish_subsubsections302,7805 | 3776 | sub finish_subsubsections 302,7805 |
| 3777 | sub finish_subsections main::finish_subsections309,7987 | 3777 | sub finish_subsections 309,7987 |
| 3778 | sub finish_sections main::finish_sections320,8310 | 3778 | sub finish_sections 320,8310 |
| 3779 | sub finish_appendices main::finish_appendices331,8599 | 3779 | sub finish_appendices 331,8599 |
| 3780 | sub section_url_base main::section_url_base337,8724 | 3780 | sub section_url_base 337,8724 |
| 3781 | sub section_url_name main::section_url_name342,8922 | 3781 | sub section_url_name 342,8922 |
| 3782 | sub section_url main::section_url355,9284 | 3782 | sub section_url 355,9284 |
| 3783 | my $name name357,9336 | 3783 | my $name name357,9336 |
| 3784 | sub section_href main::section_href364,9452 | 3784 | sub section_href 364,9452 |
| 3785 | sub section_name main::section_name368,9551 | 3785 | sub section_name 368,9551 |
| 3786 | sub toc_line main::toc_line372,9655 | 3786 | sub toc_line 372,9655 |
| 3787 | sub file_end main::file_end375,9750 | 3787 | sub file_end 375,9750 |
| 3788 | 3788 | ||
| 3789 | perl-src/yagrip.pl,258 | 3789 | perl-src/yagrip.pl,233 |
| 3790 | sub getopt main::getopt7,156 | 3790 | sub getopt 7,156 |
| 3791 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 | 3791 | local($_,$flag,$opt,$f,$r,@temp)($_,$flag,$opt,$f,$r,@temp8,169 |
| 3792 | sub usage main::usage38,856 | 3792 | sub usage 38,856 |
| 3793 | local($prog,$_,@list)($prog,$_,@list39,868 | 3793 | local($prog,$_,@list)($prog,$_,@list39,868 |
| 3794 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 | 3794 | local($string,$flag,@string,@temp,@last)($string,$flag,@string,@temp,@last40,897 |
| 3795 | 3795 | ||
| 3796 | perl-src/kai-test.pl,244 | 3796 | perl-src/kai-test.pl,203 |
| 3797 | sub f1 main::f12,16 | 3797 | sub f1 2,16 |
| 3798 | sub main::f2 6,50 | 3798 | sub main::f2 f26,50 |
| 3799 | package Foo;10,90 | 3799 | package Foo;10,90 |
| 3800 | sub f3 Foo::f312,104 | 3800 | sub f3 12,104 |
| 3801 | sub Bar::f4 16,138 | 3801 | sub Bar::f4 f416,138 |
| 3802 | package Bar;20,177 | 3802 | package Bar;20,177 |
| 3803 | sub f5 Bar::f522,191 | 3803 | sub f5 22,191 |
| 3804 | package Foo::Bar;26,225 | 3804 | package Foo::Bar;26,225 |
| 3805 | sub f6 Foo::Bar::f628,244 | 3805 | sub f6 28,244 |
| 3806 | package main;32,278 | 3806 | package main;32,278 |
| 3807 | sub f7 main::f734,293 | 3807 | sub f7 34,293 |
| 3808 | 3808 | ||
| 3809 | ps-src/rfc1245.ps,2478 | 3809 | ps-src/rfc1245.ps,2478 |
| 3810 | /FMversion 12,311 | 3810 | /FMversion 12,311 |
diff --git a/test/manual/etags/c-src/emacs/src/keyboard.c b/test/manual/etags/c-src/emacs/src/keyboard.c index 077b147c76e..68584ee71fc 100644 --- a/test/manual/etags/c-src/emacs/src/keyboard.c +++ b/test/manual/etags/c-src/emacs/src/keyboard.c | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/test/manual/etags/c-src/emacs/src/lisp.h b/test/manual/etags/c-src/emacs/src/lisp.h index 96c52c04691..db8722917ea 100644 --- a/test/manual/etags/c-src/emacs/src/lisp.h +++ b/test/manual/etags/c-src/emacs/src/lisp.h | |||
| @@ -7,8 +7,8 @@ This file is part of GNU Emacs. | |||
| 7 | 7 | ||
| 8 | GNU Emacs is free software: you can redistribute it and/or modify | 8 | GNU Emacs is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by | 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or | 10 | the Free Software Foundation, either version 3 of the License, or (at |
| 11 | (at your option) any later version. | 11 | your option) any later version. |
| 12 | 12 | ||
| 13 | GNU Emacs is distributed in the hope that it will be useful, | 13 | GNU Emacs is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
diff --git a/test/manual/etags/c-src/etags.c b/test/manual/etags/c-src/etags.c index 4465b830602..453419897bc 100644 --- a/test/manual/etags/c-src/etags.c +++ b/test/manual/etags/c-src/etags.c | |||
| @@ -35,8 +35,8 @@ This file is not considered part of GNU Emacs. | |||
| 35 | 35 | ||
| 36 | This program is free software: you can redistribute it and/or modify | 36 | This program is free software: you can redistribute it and/or modify |
| 37 | it under the terms of the GNU General Public License as published by | 37 | it under the terms of the GNU General Public License as published by |
| 38 | the Free Software Foundation, either version 3 of the License, or | 38 | the Free Software Foundation, either version 3 of the License, or (at |
| 39 | (at your option) any later version. | 39 | your option) any later version. |
| 40 | 40 | ||
| 41 | This program is distributed in the hope that it will be useful, | 41 | This program is distributed in the hope that it will be useful, |
| 42 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 42 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| @@ -613,8 +613,8 @@ static const char *Objc_suffixes [] = | |||
| 613 | static const char Objc_help [] = | 613 | static const char Objc_help [] = |
| 614 | "In Objective C code, tags include Objective C definitions for classes,\n\ | 614 | "In Objective C code, tags include Objective C definitions for classes,\n\ |
| 615 | class categories, methods and protocols. Tags for variables and\n\ | 615 | class categories, methods and protocols. Tags for variables and\n\ |
| 616 | functions in classes are named `CLASS::VARIABLE' and `CLASS::FUNCTION'.\n\ | 616 | functions in classes are named `CLASS::VARIABLE' and `CLASS::FUNCTION'.\ |
| 617 | (Use --help --lang=c --lang=objc --lang=java for full help.)"; | 617 | \n(Use --help --lang=c --lang=objc --lang=java for full help.)"; |
| 618 | 618 | ||
| 619 | static const char *Pascal_suffixes [] = | 619 | static const char *Pascal_suffixes [] = |
| 620 | { "p", "pas", NULL }; | 620 | { "p", "pas", NULL }; |
diff --git a/test/manual/indent/js.js b/test/manual/indent/js.js index 9a1e0dc7ad5..d843f615fd8 100644 --- a/test/manual/indent/js.js +++ b/test/manual/indent/js.js | |||
| @@ -72,7 +72,12 @@ baz(`http://foo.bar/${tee}`) | |||
| 72 | class A { | 72 | class A { |
| 73 | * x() { | 73 | * x() { |
| 74 | return 1 | 74 | return 1 |
| 75 | * 2; | 75 | * a(2); |
| 76 | } | ||
| 77 | |||
| 78 | *[Symbol.iterator]() { | ||
| 79 | yield "Foo"; | ||
| 80 | yield "Bar"; | ||
| 76 | } | 81 | } |
| 77 | } | 82 | } |
| 78 | 83 | ||
diff --git a/test/manual/indent/ruby.rb b/test/manual/indent/ruby.rb index dfd1c75a679..585263d02a6 100644 --- a/test/manual/indent/ruby.rb +++ b/test/manual/indent/ruby.rb | |||
| @@ -168,6 +168,15 @@ if x == :!= | |||
| 168 | something | 168 | something |
| 169 | end | 169 | end |
| 170 | 170 | ||
| 171 | qux :+, | ||
| 172 | bar, | ||
| 173 | :[]=, | ||
| 174 | bar, | ||
| 175 | :a | ||
| 176 | |||
| 177 | b = $: | ||
| 178 | c = ?? | ||
| 179 | |||
| 171 | # Example from http://www.ruby-doc.org/docs/ProgrammingRuby/html/language.html | 180 | # Example from http://www.ruby-doc.org/docs/ProgrammingRuby/html/language.html |
| 172 | d = 4 + 5 + # no '\' needed | 181 | d = 4 + 5 + # no '\' needed |
| 173 | 6 + 7 | 182 | 6 + 7 |
| @@ -194,6 +203,9 @@ class C | |||
| 194 | self.end | 203 | self.end |
| 195 | D.new.class | 204 | D.new.class |
| 196 | end | 205 | end |
| 206 | |||
| 207 | def begin | ||
| 208 | end | ||
| 197 | end | 209 | end |
| 198 | 210 | ||
| 199 | a = foo(j, k) - | 211 | a = foo(j, k) - |
| @@ -223,6 +235,9 @@ z = { | |||
| 223 | foo if | 235 | foo if |
| 224 | bar | 236 | bar |
| 225 | 237 | ||
| 238 | fail "stuff" \ | ||
| 239 | unless all_fine? | ||
| 240 | |||
| 226 | if foo? | 241 | if foo? |
| 227 | bar | 242 | bar |
| 228 | end | 243 | end |