diff options
| author | Glenn Morris | 2018-09-28 07:54:24 -0700 |
|---|---|---|
| committer | Glenn Morris | 2018-09-28 07:54:24 -0700 |
| commit | 6aa93b45af9fb3631fb8fb6a04407db4d9a74107 (patch) | |
| tree | 9446e698538c3cccc3a7ac40f61e63fa028d68eb | |
| parent | 2d54710c36c8b5f7e0d25eefd45c318c0cb533ea (diff) | |
| parent | 1908173a4d79649566fbef12962e251c69e300a2 (diff) | |
| download | emacs-6aa93b45af9fb3631fb8fb6a04407db4d9a74107.tar.gz emacs-6aa93b45af9fb3631fb8fb6a04407db4d9a74107.zip | |
Merge from origin/emacs-26
1908173 (origin/emacs-26) Fix Bug#32828
7f5086d * lisp/net/shr.el (shr-copy-url): Fix docstring.
d309994 Fix typos in documentation
25cdd65 ; Spellcheck two more documentation strings
c8bda05 ; * lisp/simple.el (save-interprogram-paste-before-kill): Fix...
dc7fdee * doc/emacs/kmacro.texi (Basic Keyboard Macro): Mention old b...
17766a1 Improve docs of functions/variables related to 'display-buffer'
a363931 * lisp/mouse.el (tear-off-window): Fix non-mouse use (bug#32799)
8b8a4c0 Improve documentation of directory-local variables
c9c9756 Don't use obsolete variable 'save-place' in documentation
ca208e8 Use save-place-mode instead of save-place
| -rw-r--r-- | CONTRIBUTE | 2 | ||||
| -rw-r--r-- | doc/emacs/custom.texi | 11 | ||||
| -rw-r--r-- | doc/emacs/kmacro.texi | 4 | ||||
| -rw-r--r-- | doc/lispref/control.texi | 2 | ||||
| -rw-r--r-- | doc/lispref/customize.texi | 11 | ||||
| -rw-r--r-- | doc/lispref/os.texi | 2 | ||||
| -rw-r--r-- | doc/man/emacsclient.1 | 2 | ||||
| -rw-r--r-- | doc/misc/calc.texi | 2 | ||||
| -rw-r--r-- | doc/misc/eshell.texi | 2 | ||||
| -rw-r--r-- | doc/misc/gnus.texi | 2 | ||||
| -rw-r--r-- | doc/misc/org.texi | 4 | ||||
| -rw-r--r-- | doc/misc/reftex.texi | 2 | ||||
| -rw-r--r-- | doc/misc/sieve.texi | 2 | ||||
| -rw-r--r-- | doc/misc/srecode.texi | 2 | ||||
| -rw-r--r-- | doc/misc/tramp.texi | 2 | ||||
| -rw-r--r-- | doc/misc/url.texi | 2 | ||||
| -rw-r--r-- | doc/misc/vhdl-mode.texi | 2 | ||||
| -rw-r--r-- | lisp/files.el | 9 | ||||
| -rw-r--r-- | lisp/menu-bar.el | 6 | ||||
| -rw-r--r-- | lisp/mouse.el | 2 | ||||
| -rw-r--r-- | lisp/net/dbus.el | 9 | ||||
| -rw-r--r-- | lisp/net/shr.el | 6 | ||||
| -rw-r--r-- | lisp/saveplace.el | 12 | ||||
| -rw-r--r-- | lisp/simple.el | 2 | ||||
| -rw-r--r-- | lisp/window.el | 81 | ||||
| -rw-r--r-- | src/keymap.c | 2 |
26 files changed, 113 insertions, 72 deletions
diff --git a/CONTRIBUTE b/CONTRIBUTE index c4f424ce560..0b68052a0cd 100644 --- a/CONTRIBUTE +++ b/CONTRIBUTE | |||
| @@ -97,7 +97,7 @@ Otherwise do not mark it. | |||
| 97 | If your change requires updating the manuals to document new | 97 | If your change requires updating the manuals to document new |
| 98 | functions/commands/variables/faces, then use the proper Texinfo | 98 | functions/commands/variables/faces, then use the proper Texinfo |
| 99 | command to index them; for instance, use @vindex for variables and | 99 | command to index them; for instance, use @vindex for variables and |
| 100 | @findex for functions/commands. For the full list of predefine indices, see | 100 | @findex for functions/commands. For the full list of predefined indices, see |
| 101 | https://www.gnu.org/software/texinfo/manual/texinfo/html_node/Predefined-Indices.html | 101 | https://www.gnu.org/software/texinfo/manual/texinfo/html_node/Predefined-Indices.html |
| 102 | or run the shell command 'info "(texinfo)Predefined Indices"'. | 102 | or run the shell command 'info "(texinfo)Predefined Indices"'. |
| 103 | 103 | ||
diff --git a/doc/emacs/custom.texi b/doc/emacs/custom.texi index 51e36ea4b75..ddde5b22e6b 100644 --- a/doc/emacs/custom.texi +++ b/doc/emacs/custom.texi | |||
| @@ -1059,6 +1059,10 @@ local variable specifications; it automatically makes these variables | |||
| 1059 | local to the buffer, and sets them to the values specified in the | 1059 | local to the buffer, and sets them to the values specified in the |
| 1060 | file. | 1060 | file. |
| 1061 | 1061 | ||
| 1062 | File local variables override directory local variables | ||
| 1063 | (@pxref{Directory Variables}), if any are specified for a file's | ||
| 1064 | directory. | ||
| 1065 | |||
| 1062 | @menu | 1066 | @menu |
| 1063 | * Specifying File Variables:: Specifying file local variables. | 1067 | * Specifying File Variables:: Specifying file local variables. |
| 1064 | * Safe File Variables:: Making sure file local variables are safe. | 1068 | * Safe File Variables:: Making sure file local variables are safe. |
| @@ -1309,7 +1313,12 @@ confirmation about processing @code{eval} variables. | |||
| 1309 | Sometimes, you may wish to define the same set of local variables to | 1313 | Sometimes, you may wish to define the same set of local variables to |
| 1310 | all the files in a certain directory and its subdirectories, such as | 1314 | all the files in a certain directory and its subdirectories, such as |
| 1311 | the directory tree of a large software project. This can be | 1315 | the directory tree of a large software project. This can be |
| 1312 | accomplished with @dfn{directory-local variables}. | 1316 | accomplished with @dfn{directory-local variables}. File local |
| 1317 | variables override directory local variables, so if some of the files | ||
| 1318 | in a directory need specialized settings, you can specify the settings | ||
| 1319 | for the majority of the directory's files in directory variables, and | ||
| 1320 | then define file local variables in a few files which need the general | ||
| 1321 | settings overridden. | ||
| 1313 | 1322 | ||
| 1314 | @cindex @file{.dir-locals.el} file | 1323 | @cindex @file{.dir-locals.el} file |
| 1315 | The usual way to define directory-local variables is to put a file | 1324 | The usual way to define directory-local variables is to put a file |
diff --git a/doc/emacs/kmacro.texi b/doc/emacs/kmacro.texi index dac41fdb873..0151c816a89 100644 --- a/doc/emacs/kmacro.texi +++ b/doc/emacs/kmacro.texi | |||
| @@ -49,15 +49,19 @@ intelligent or general. For such things, Lisp must be used. | |||
| 49 | 49 | ||
| 50 | @table @kbd | 50 | @table @kbd |
| 51 | @item @key{F3} | 51 | @item @key{F3} |
| 52 | @itemx C-x ( | ||
| 52 | Start defining a keyboard macro | 53 | Start defining a keyboard macro |
| 53 | (@code{kmacro-start-macro-or-insert-counter}). | 54 | (@code{kmacro-start-macro-or-insert-counter}). |
| 54 | @item @key{F4} | 55 | @item @key{F4} |
| 56 | @itemx C-x e | ||
| 55 | If a keyboard macro is being defined, end the definition; otherwise, | 57 | If a keyboard macro is being defined, end the definition; otherwise, |
| 56 | execute the most recent keyboard macro | 58 | execute the most recent keyboard macro |
| 57 | (@code{kmacro-end-or-call-macro}). | 59 | (@code{kmacro-end-or-call-macro}). |
| 58 | @item C-u @key{F3} | 60 | @item C-u @key{F3} |
| 61 | @itemx C-u C-x ( | ||
| 59 | Re-execute last keyboard macro, then append keys to its definition. | 62 | Re-execute last keyboard macro, then append keys to its definition. |
| 60 | @item C-u C-u @key{F3} | 63 | @item C-u C-u @key{F3} |
| 64 | @itemx C-u C-u C-x ( | ||
| 61 | Append keys to the last keyboard macro without re-executing it. | 65 | Append keys to the last keyboard macro without re-executing it. |
| 62 | @item C-x C-k r | 66 | @item C-x C-k r |
| 63 | Run the last keyboard macro on each line that begins in the region | 67 | Run the last keyboard macro on each line that begins in the region |
diff --git a/doc/lispref/control.texi b/doc/lispref/control.texi index 8a6cf73af51..0f7502f1c20 100644 --- a/doc/lispref/control.texi +++ b/doc/lispref/control.texi | |||
| @@ -791,7 +791,7 @@ Here are some important details about that usage. | |||
| 791 | 791 | ||
| 792 | @enumerate | 792 | @enumerate |
| 793 | @item When @var{symbol} occurs more than once in @var{seqpat}, | 793 | @item When @var{symbol} occurs more than once in @var{seqpat}, |
| 794 | the second and subsequent occurances do not expand to re-binding, | 794 | the second and subsequent occurrences do not expand to re-binding, |
| 795 | but instead expand to an equality test using @code{eq}. | 795 | but instead expand to an equality test using @code{eq}. |
| 796 | 796 | ||
| 797 | The following example features a @code{pcase} form | 797 | The following example features a @code{pcase} form |
diff --git a/doc/lispref/customize.texi b/doc/lispref/customize.texi index b3528b12d57..1cc7cb65b5f 100644 --- a/doc/lispref/customize.texi +++ b/doc/lispref/customize.texi | |||
| @@ -449,15 +449,14 @@ those other variables already have their intended values. | |||
| 449 | It is useful to specify the @code{:require} keyword for an option | 449 | It is useful to specify the @code{:require} keyword for an option |
| 450 | that turns on a certain feature. This causes Emacs to load the | 450 | that turns on a certain feature. This causes Emacs to load the |
| 451 | feature, if it is not already loaded, whenever the option is set. | 451 | feature, if it is not already loaded, whenever the option is set. |
| 452 | @xref{Common Keywords}. Here is an example, from the library | 452 | @xref{Common Keywords}. Here is an example: |
| 453 | @file{saveplace.el}: | ||
| 454 | 453 | ||
| 455 | @example | 454 | @example |
| 456 | (defcustom save-place nil | 455 | (defcustom frobnicate-automatically nil |
| 457 | "Non-nil means automatically save place in each file..." | 456 | "Non-nil means automatically frobnicate all buffers." |
| 458 | :type 'boolean | 457 | :type 'boolean |
| 459 | :require 'saveplace | 458 | :require 'frobnicate-mode |
| 460 | :group 'save-place) | 459 | :group 'frobnicate) |
| 461 | @end example | 460 | @end example |
| 462 | 461 | ||
| 463 | If a customization item has a type such as @code{hook} or | 462 | If a customization item has a type such as @code{hook} or |
diff --git a/doc/lispref/os.texi b/doc/lispref/os.texi index 67b78aea747..400e6bb45c0 100644 --- a/doc/lispref/os.texi +++ b/doc/lispref/os.texi | |||
| @@ -3039,7 +3039,7 @@ Although Emacs normally respects access permissions of the underlying | |||
| 3039 | operating system, in some cases it handles accesses specially. For | 3039 | operating system, in some cases it handles accesses specially. For |
| 3040 | example, file names can have handlers that treat the files specially, | 3040 | example, file names can have handlers that treat the files specially, |
| 3041 | with their own access checking. @xref{Magic File Names}. Also, a | 3041 | with their own access checking. @xref{Magic File Names}. Also, a |
| 3042 | buffer can be read-only even if the corresponding file is writeable, | 3042 | buffer can be read-only even if the corresponding file is writable, |
| 3043 | and vice versa, which can result in messages such as @samp{File passwd | 3043 | and vice versa, which can result in messages such as @samp{File passwd |
| 3044 | is write-protected; try to save anyway? (yes or no)}. @xref{Read Only | 3044 | is write-protected; try to save anyway? (yes or no)}. @xref{Read Only |
| 3045 | Buffers}. | 3045 | Buffers}. |
diff --git a/doc/man/emacsclient.1 b/doc/man/emacsclient.1 index daaacab7f3e..5aaa6d1f083 100644 --- a/doc/man/emacsclient.1 +++ b/doc/man/emacsclient.1 | |||
| @@ -1,7 +1,7 @@ | |||
| 1 | .\" See section COPYING for conditions for redistribution. | 1 | .\" See section COPYING for conditions for redistribution. |
| 2 | .TH EMACSCLIENT 1 | 2 | .TH EMACSCLIENT 1 |
| 3 | .\" NAME should be all caps, SECTION should be 1-8, maybe w/ subsection | 3 | .\" NAME should be all caps, SECTION should be 1-8, maybe w/ subsection |
| 4 | .\" other parms are allowed: see man(7), man(1) | 4 | .\" other params are allowed: see man(7), man(1) |
| 5 | .SH NAME | 5 | .SH NAME |
| 6 | emacsclient \- tells a running Emacs to visit a file | 6 | emacsclient \- tells a running Emacs to visit a file |
| 7 | .SH SYNOPSIS | 7 | .SH SYNOPSIS |
diff --git a/doc/misc/calc.texi b/doc/misc/calc.texi index 446210e5ff4..83807c6fd28 100644 --- a/doc/misc/calc.texi +++ b/doc/misc/calc.texi | |||
| @@ -36249,7 +36249,7 @@ keystrokes are not listed in this summary. | |||
| 36249 | @c | 36249 | @c |
| 36250 | @r{ @: j + @:formula @: 27 @:calc-sel-add-both-sides@:} | 36250 | @r{ @: j + @:formula @: 27 @:calc-sel-add-both-sides@:} |
| 36251 | @r{ @: j - @:formula @: 27 @:calc-sel-sub-both-sides@:} | 36251 | @r{ @: j - @:formula @: 27 @:calc-sel-sub-both-sides@:} |
| 36252 | @r{ @: j * @:formula @: 27 @:calc-sel-mul-both-sides@:} | 36252 | @r{ @: j * @:formula @: 27 @:calc-sel-mult-both-sides@:} |
| 36253 | @r{ @: j / @:formula @: 27 @:calc-sel-div-both-sides@:} | 36253 | @r{ @: j / @:formula @: 27 @:calc-sel-div-both-sides@:} |
| 36254 | @r{ @: j & @: @: 27 @:calc-sel-invert@:} | 36254 | @r{ @: j & @: @: 27 @:calc-sel-invert@:} |
| 36255 | 36255 | ||
diff --git a/doc/misc/eshell.texi b/doc/misc/eshell.texi index 79aac9b31fc..c19d5e1a437 100644 --- a/doc/misc/eshell.texi +++ b/doc/misc/eshell.texi | |||
| @@ -851,7 +851,7 @@ since. | |||
| 851 | 851 | ||
| 852 | Make it so that the Lisp command on the right of the pipe is repeatedly | 852 | Make it so that the Lisp command on the right of the pipe is repeatedly |
| 853 | called with the input strings as arguments. This will require changing | 853 | called with the input strings as arguments. This will require changing |
| 854 | @code{eshell-do-pipeline} to handle non-process targets. | 854 | @code{eshell-do-pipelines} to handle non-process targets. |
| 855 | 855 | ||
| 856 | @item Input redirection is not supported | 856 | @item Input redirection is not supported |
| 857 | 857 | ||
diff --git a/doc/misc/gnus.texi b/doc/misc/gnus.texi index 40cc44a12e7..2f7d8407fc4 100644 --- a/doc/misc/gnus.texi +++ b/doc/misc/gnus.texi | |||
| @@ -4457,7 +4457,7 @@ generated. It may be used to modify the buffer in some strange, | |||
| 4457 | unnatural way. | 4457 | unnatural way. |
| 4458 | 4458 | ||
| 4459 | @item gnus-group-prepared-hook | 4459 | @item gnus-group-prepared-hook |
| 4460 | @vindex gnus-group-prepare-hook | 4460 | @vindex gnus-group-prepared-hook |
| 4461 | is called as the very last thing after the group buffer has been | 4461 | is called as the very last thing after the group buffer has been |
| 4462 | generated. It may be used to move point around, for instance. | 4462 | generated. It may be used to move point around, for instance. |
| 4463 | 4463 | ||
diff --git a/doc/misc/org.texi b/doc/misc/org.texi index 3bce0dd7369..ccb5f88f93d 100644 --- a/doc/misc/org.texi +++ b/doc/misc/org.texi | |||
| @@ -17991,7 +17991,7 @@ supports Imenu menus. Enable it with a mode hook as follows: | |||
| 17991 | @end lisp | 17991 | @end lisp |
| 17992 | @vindex org-imenu-depth | 17992 | @vindex org-imenu-depth |
| 17993 | By default the Imenu index is two levels deep. Change the index depth using | 17993 | By default the Imenu index is two levels deep. Change the index depth using |
| 17994 | thes variable, @code{org-imenu-depth}. | 17994 | the variable @code{org-imenu-depth}. |
| 17995 | @item @file{speedbar.el} by Eric M. Ludlam | 17995 | @item @file{speedbar.el} by Eric M. Ludlam |
| 17996 | @cindex @file{speedbar.el} | 17996 | @cindex @file{speedbar.el} |
| 17997 | @cindex Ludlam, Eric M. | 17997 | @cindex Ludlam, Eric M. |
| @@ -18065,7 +18065,7 @@ different replacement keys, look at the variable @code{org-disputed-keys}. | |||
| 18065 | @cindex @file{ecomplete.el} | 18065 | @cindex @file{ecomplete.el} |
| 18066 | 18066 | ||
| 18067 | Ecomplete provides ``electric'' address completion in address header | 18067 | Ecomplete provides ``electric'' address completion in address header |
| 18068 | lines in message buffers. Sadly Orgtbl mode cuts ecompletes power | 18068 | lines in message buffers. Sadly Orgtbl mode cuts ecomplete's power |
| 18069 | supply: No completion happens when Orgtbl mode is enabled in message | 18069 | supply: No completion happens when Orgtbl mode is enabled in message |
| 18070 | buffers while entering text in address header lines. If one wants to | 18070 | buffers while entering text in address header lines. If one wants to |
| 18071 | use ecomplete one should @emph{not} follow the advice to automagically | 18071 | use ecomplete one should @emph{not} follow the advice to automagically |
diff --git a/doc/misc/reftex.texi b/doc/misc/reftex.texi index 2ea98cf5df1..4367d773e63 100644 --- a/doc/misc/reftex.texi +++ b/doc/misc/reftex.texi | |||
| @@ -4618,7 +4618,7 @@ return the string to insert into the buffer. | |||
| 4618 | 4618 | ||
| 4619 | @defopt reftex-cite-prompt-optional-args | 4619 | @defopt reftex-cite-prompt-optional-args |
| 4620 | Non-@code{nil} means, prompt for empty optional arguments in cite macros. | 4620 | Non-@code{nil} means, prompt for empty optional arguments in cite macros. |
| 4621 | When an entry in @code{reftex-cite-format} ist given with square brackets to | 4621 | When an entry in @code{reftex-cite-format} is given with square brackets to |
| 4622 | indicate optional arguments (for example @samp{\\cite[][]@{%l@}}), RefTeX can | 4622 | indicate optional arguments (for example @samp{\\cite[][]@{%l@}}), RefTeX can |
| 4623 | prompt for values. Possible values are: | 4623 | prompt for values. Possible values are: |
| 4624 | @example | 4624 | @example |
diff --git a/doc/misc/sieve.texi b/doc/misc/sieve.texi index 2d290b36885..cad3cd86469 100644 --- a/doc/misc/sieve.texi +++ b/doc/misc/sieve.texi | |||
| @@ -127,7 +127,7 @@ bindings to manage Sieve scripts remotely. @xref{Managing Sieve}. | |||
| 127 | @kindex C-c RET | 127 | @kindex C-c RET |
| 128 | @findex sieve-manage | 128 | @findex sieve-manage |
| 129 | @cindex manage remote sieve script | 129 | @cindex manage remote sieve script |
| 130 | Open a connection to a remote server using the Managesieve protocol. | 130 | Open a connection to a remote server using the Manage Sieve protocol. |
| 131 | 131 | ||
| 132 | @item C-c C-l | 132 | @item C-c C-l |
| 133 | @kindex C-c C-l | 133 | @kindex C-c C-l |
diff --git a/doc/misc/srecode.texi b/doc/misc/srecode.texi index 2987f629747..7d8416e9013 100644 --- a/doc/misc/srecode.texi +++ b/doc/misc/srecode.texi | |||
| @@ -1474,7 +1474,7 @@ to write your own function in order to provide your dictionaries with | |||
| 1474 | the values needed for custom templates. | 1474 | the values needed for custom templates. |
| 1475 | 1475 | ||
| 1476 | In this way, you can build your own code generator for any language | 1476 | In this way, you can build your own code generator for any language |
| 1477 | based on a set of predefined macros whos values you need to derive | 1477 | based on a set of predefined macros whose values you need to derive |
| 1478 | from Emacs Lisp code yourself. | 1478 | from Emacs Lisp code yourself. |
| 1479 | 1479 | ||
| 1480 | For example: | 1480 | For example: |
diff --git a/doc/misc/tramp.texi b/doc/misc/tramp.texi index ca402013c71..88fa55fdeeb 100644 --- a/doc/misc/tramp.texi +++ b/doc/misc/tramp.texi | |||
| @@ -301,7 +301,7 @@ into a buffer, and then deletes the temporary file. | |||
| 301 | 301 | ||
| 302 | @item | 302 | @item |
| 303 | Edit, modify, change the buffer contents as normal, and then save the | 303 | Edit, modify, change the buffer contents as normal, and then save the |
| 304 | buffer wth @kbd{C-x C-s}. | 304 | buffer with @kbd{C-x C-s}. |
| 305 | 305 | ||
| 306 | @item | 306 | @item |
| 307 | @value{tramp} transfers the buffer contents to the remote host in | 307 | @value{tramp} transfers the buffer contents to the remote host in |
diff --git a/doc/misc/url.texi b/doc/misc/url.texi index a8ac1179751..eaeae603526 100644 --- a/doc/misc/url.texi +++ b/doc/misc/url.texi | |||
| @@ -1342,7 +1342,7 @@ The User Agent string used for sending @acronym{HTTP}/@acronym{HTTPS} | |||
| 1342 | requests. The value should be @code{nil}, which means that no | 1342 | requests. The value should be @code{nil}, which means that no |
| 1343 | @samp{User-Agent} header is generated, @code{default}, which means | 1343 | @samp{User-Agent} header is generated, @code{default}, which means |
| 1344 | that a string is generated based on the setting of | 1344 | that a string is generated based on the setting of |
| 1345 | @code{url-privacy-leve}, a string or a function of no arguments that | 1345 | @code{url-privacy-level}, a string or a function of no arguments that |
| 1346 | returns a string. | 1346 | returns a string. |
| 1347 | 1347 | ||
| 1348 | The default is @code{default}, which means that the | 1348 | The default is @code{default}, which means that the |
diff --git a/doc/misc/vhdl-mode.texi b/doc/misc/vhdl-mode.texi index 8fc75106d52..c0efdbf75f4 100644 --- a/doc/misc/vhdl-mode.texi +++ b/doc/misc/vhdl-mode.texi | |||
| @@ -734,7 +734,7 @@ operator on the first line of the statement. Here is the lisp code | |||
| 734 | Custom indent functions take a single argument, which is a syntactic | 734 | Custom indent functions take a single argument, which is a syntactic |
| 735 | component cons cell (see @ref{Syntactic Analysis}). The | 735 | component cons cell (see @ref{Syntactic Analysis}). The |
| 736 | function returns an integer offset value that will be added to the | 736 | function returns an integer offset value that will be added to the |
| 737 | running total indentation for the lne. Note that what actually gets | 737 | running total indentation for the line. Note that what actually gets |
| 738 | returned is the difference between the column that the signal assignment | 738 | returned is the difference between the column that the signal assignment |
| 739 | operator is on, and the column of the buffer relative position passed in | 739 | operator is on, and the column of the buffer relative position passed in |
| 740 | the function's argument. Remember that VHDL Mode automatically | 740 | the function's argument. Remember that VHDL Mode automatically |
diff --git a/lisp/files.el b/lisp/files.el index 7efbf05b1a6..b8f6c461467 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -490,7 +490,8 @@ The functions are called in the order given until one of them returns non-nil.") | |||
| 490 | (defcustom find-file-hook nil | 490 | (defcustom find-file-hook nil |
| 491 | "List of functions to be called after a buffer is loaded from a file. | 491 | "List of functions to be called after a buffer is loaded from a file. |
| 492 | The buffer's local variables (if any) will have been processed before the | 492 | The buffer's local variables (if any) will have been processed before the |
| 493 | functions are called." | 493 | functions are called. This includes directory-local variables, if any, |
| 494 | for the file's directory." | ||
| 494 | :group 'find-file | 495 | :group 'find-file |
| 495 | :type 'hook | 496 | :type 'hook |
| 496 | :options '(auto-insert) | 497 | :options '(auto-insert) |
| @@ -2431,7 +2432,7 @@ the file contents into it using `insert-file-contents-literally'." | |||
| 2431 | _after-find-file-from-revert-buffer | 2432 | _after-find-file-from-revert-buffer |
| 2432 | nomodes) | 2433 | nomodes) |
| 2433 | "Called after finding a file and by the default revert function. | 2434 | "Called after finding a file and by the default revert function. |
| 2434 | Sets buffer mode, parses local variables. | 2435 | Sets buffer mode, parses file-local and directory-local variables. |
| 2435 | Optional args ERROR, WARN, and NOAUTO: ERROR non-nil means there was an | 2436 | Optional args ERROR, WARN, and NOAUTO: ERROR non-nil means there was an |
| 2436 | error in reading the file. WARN non-nil means warn if there | 2437 | error in reading the file. WARN non-nil means warn if there |
| 2437 | exists an auto-save file more recent than the visited file. | 2438 | exists an auto-save file more recent than the visited file. |
| @@ -2516,7 +2517,7 @@ unless NOMODES is non-nil." | |||
| 2516 | 2517 | ||
| 2517 | (defun normal-mode (&optional find-file) | 2518 | (defun normal-mode (&optional find-file) |
| 2518 | "Choose the major mode for this buffer automatically. | 2519 | "Choose the major mode for this buffer automatically. |
| 2519 | Also sets up any specified local variables of the file. | 2520 | Also sets up any specified local variables of the file or its directory. |
| 2520 | Uses the visited file name, the -*- line, and the local variables spec. | 2521 | Uses the visited file name, the -*- line, and the local variables spec. |
| 2521 | 2522 | ||
| 2522 | This function is called automatically from `find-file'. In that case, | 2523 | This function is called automatically from `find-file'. In that case, |
| @@ -3547,6 +3548,8 @@ DIR-NAME is the name of the associated directory. Otherwise it is nil." | |||
| 3547 | 3548 | ||
| 3548 | (defun hack-local-variables (&optional handle-mode) | 3549 | (defun hack-local-variables (&optional handle-mode) |
| 3549 | "Parse and put into effect this buffer's local variables spec. | 3550 | "Parse and put into effect this buffer's local variables spec. |
| 3551 | For buffers visiting files, also puts into effect directory-local | ||
| 3552 | variables. | ||
| 3550 | Uses `hack-local-variables-apply' to apply the variables. | 3553 | Uses `hack-local-variables-apply' to apply the variables. |
| 3551 | 3554 | ||
| 3552 | If HANDLE-MODE is nil, we apply all the specified local | 3555 | If HANDLE-MODE is nil, we apply all the specified local |
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 74e01f87e9b..7f3698850d0 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -689,7 +689,7 @@ The selected font will be the default on both the existing and future frames." | |||
| 689 | debug-on-quit debug-on-error | 689 | debug-on-quit debug-on-error |
| 690 | ;; Somehow this works, when tool-bar and menu-bar don't. | 690 | ;; Somehow this works, when tool-bar and menu-bar don't. |
| 691 | tooltip-mode window-divider-mode | 691 | tooltip-mode window-divider-mode |
| 692 | save-place uniquify-buffer-name-style fringe-mode | 692 | save-place-mode uniquify-buffer-name-style fringe-mode |
| 693 | indicate-empty-lines indicate-buffer-boundaries | 693 | indicate-empty-lines indicate-buffer-boundaries |
| 694 | case-fold-search font-use-system-font | 694 | case-fold-search font-use-system-font |
| 695 | current-language-environment default-input-method | 695 | current-language-environment default-input-method |
| @@ -1409,7 +1409,7 @@ mail status in mode line")) | |||
| 1409 | 1409 | ||
| 1410 | (bindings--define-key menu [save-place] | 1410 | (bindings--define-key menu [save-place] |
| 1411 | (menu-bar-make-toggle | 1411 | (menu-bar-make-toggle |
| 1412 | toggle-save-place-globally save-place | 1412 | toggle-save-place-globally save-place-mode |
| 1413 | "Save Place in Files between Sessions" | 1413 | "Save Place in Files between Sessions" |
| 1414 | "Saving place in files %s" | 1414 | "Saving place in files %s" |
| 1415 | "Visit files of previous session when restarting Emacs" | 1415 | "Visit files of previous session when restarting Emacs" |
| @@ -1417,7 +1417,7 @@ mail status in mode line")) | |||
| 1417 | ;; Do it by name, to avoid a free-variable | 1417 | ;; Do it by name, to avoid a free-variable |
| 1418 | ;; warning during byte compilation. | 1418 | ;; warning during byte compilation. |
| 1419 | (set-default | 1419 | (set-default |
| 1420 | 'save-place (not (symbol-value 'save-place))))) | 1420 | 'save-place-mode (not (symbol-value 'save-place-mode))))) |
| 1421 | 1421 | ||
| 1422 | (bindings--define-key menu [uniquify] | 1422 | (bindings--define-key menu [uniquify] |
| 1423 | (menu-bar-make-toggle | 1423 | (menu-bar-make-toggle |
diff --git a/lisp/mouse.el b/lisp/mouse.el index d5c132f484e..cb63ca51c54 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el | |||
| @@ -327,7 +327,7 @@ This command must be bound to a mouse click." | |||
| 327 | (define-obsolete-function-alias 'mouse-tear-off-window 'tear-off-window "24.4") | 327 | (define-obsolete-function-alias 'mouse-tear-off-window 'tear-off-window "24.4") |
| 328 | (defun tear-off-window (click) | 328 | (defun tear-off-window (click) |
| 329 | "Delete the selected window, and create a new frame displaying its buffer." | 329 | "Delete the selected window, and create a new frame displaying its buffer." |
| 330 | (interactive "e") | 330 | (interactive (list last-nonmenu-event)) |
| 331 | (mouse-minibuffer-check click) | 331 | (mouse-minibuffer-check click) |
| 332 | (let* ((window (posn-window (event-start click))) | 332 | (let* ((window (posn-window (event-start click))) |
| 333 | (buf (window-buffer window)) | 333 | (buf (window-buffer window)) |
diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el index 2d9660d127f..4397817032f 100644 --- a/lisp/net/dbus.el +++ b/lisp/net/dbus.el | |||
| @@ -1798,10 +1798,11 @@ GTK+. It should be used with care for at least the `:system' and | |||
| 1798 | this connection to those buses." | 1798 | this connection to those buses." |
| 1799 | (or (featurep 'dbusbind) | 1799 | (or (featurep 'dbusbind) |
| 1800 | (signal 'dbus-error (list "Emacs not compiled with dbus support"))) | 1800 | (signal 'dbus-error (list "Emacs not compiled with dbus support"))) |
| 1801 | (dbus--init-bus bus private) | 1801 | (prog1 |
| 1802 | (dbus-register-signal | 1802 | (dbus--init-bus bus private) |
| 1803 | bus nil dbus-path-local dbus-interface-local | 1803 | (dbus-register-signal |
| 1804 | "Disconnected" #'dbus-handle-bus-disconnect)) | 1804 | bus nil dbus-path-local dbus-interface-local |
| 1805 | "Disconnected" #'dbus-handle-bus-disconnect))) | ||
| 1805 | 1806 | ||
| 1806 | 1807 | ||
| 1807 | ;; Initialize `:system' and `:session' buses. This adds their file | 1808 | ;; Initialize `:system' and `:session' buses. This adds their file |
diff --git a/lisp/net/shr.el b/lisp/net/shr.el index bc86fe5a383..7ef1e18a1a0 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el | |||
| @@ -321,9 +321,9 @@ under point instead." | |||
| 321 | 321 | ||
| 322 | (defun shr-copy-url (url) | 322 | (defun shr-copy-url (url) |
| 323 | "Copy the URL under point to the kill ring. | 323 | "Copy the URL under point to the kill ring. |
| 324 | If IMAGE-URL (the prefix) is non-nil, or there is no link under | 324 | With a prefix argument, or if there is no link under point, but |
| 325 | point, but there is an image under point then copy the URL of the | 325 | there is an image under point then copy the URL of the image |
| 326 | image under point instead." | 326 | under point instead." |
| 327 | (interactive (list (shr-url-at-point current-prefix-arg))) | 327 | (interactive (list (shr-url-at-point current-prefix-arg))) |
| 328 | (if (not url) | 328 | (if (not url) |
| 329 | (message "No URL under point") | 329 | (message "No URL under point") |
diff --git a/lisp/saveplace.el b/lisp/saveplace.el index 9d3f10ac352..f8f15cabcd1 100644 --- a/lisp/saveplace.el +++ b/lisp/saveplace.el | |||
| @@ -27,7 +27,7 @@ | |||
| 27 | ;; Automatically save place in files, so that visiting them later | 27 | ;; Automatically save place in files, so that visiting them later |
| 28 | ;; (even during a different Emacs session) automatically moves point | 28 | ;; (even during a different Emacs session) automatically moves point |
| 29 | ;; to the saved position, when the file is first found. Uses the | 29 | ;; to the saved position, when the file is first found. Uses the |
| 30 | ;; value of buffer-local variable save-place to determine whether to | 30 | ;; value of buffer-local variable save-place-mode to determine whether to |
| 31 | ;; save position or not. | 31 | ;; save position or not. |
| 32 | ;; | 32 | ;; |
| 33 | ;; Thanks to Stefan Schoef, who sent a patch with the | 33 | ;; Thanks to Stefan Schoef, who sent a patch with the |
| @@ -176,7 +176,7 @@ file: | |||
| 176 | 176 | ||
| 177 | (defun save-place-to-alist () | 177 | (defun save-place-to-alist () |
| 178 | ;; put filename and point in a cons box and then cons that onto the | 178 | ;; put filename and point in a cons box and then cons that onto the |
| 179 | ;; front of the save-place-alist, if save-place is non-nil. | 179 | ;; front of the save-place-alist, if save-place-mode is non-nil. |
| 180 | ;; Otherwise, just delete that file from the alist. | 180 | ;; Otherwise, just delete that file from the alist. |
| 181 | ;; first check to make sure alist has been loaded in from the master | 181 | ;; first check to make sure alist has been loaded in from the master |
| 182 | ;; file. If not, do so, then feel free to modify the alist. It | 182 | ;; file. If not, do so, then feel free to modify the alist. It |
| @@ -306,8 +306,8 @@ may have changed) back to `save-place-alist'." | |||
| 306 | nil)))) | 306 | nil)))) |
| 307 | 307 | ||
| 308 | (defun save-places-to-alist () | 308 | (defun save-places-to-alist () |
| 309 | ;; go through buffer-list, saving places to alist if save-place is | 309 | ;; go through buffer-list, saving places to alist if save-place-mode |
| 310 | ;; non-nil, deleting them from alist if it is nil. | 310 | ;; is non-nil, deleting them from alist if it is nil. |
| 311 | (let ((buf-list (buffer-list))) | 311 | (let ((buf-list (buffer-list))) |
| 312 | (while buf-list | 312 | (while buf-list |
| 313 | ;; put this into a save-excursion in case someone is counting on | 313 | ;; put this into a save-excursion in case someone is counting on |
| @@ -332,7 +332,7 @@ may have changed) back to `save-place-alist'." | |||
| 332 | (and (integerp (cdr cell)) | 332 | (and (integerp (cdr cell)) |
| 333 | (goto-char (cdr cell)))) | 333 | (goto-char (cdr cell)))) |
| 334 | ;; and make sure it will be saved again for later | 334 | ;; and make sure it will be saved again for later |
| 335 | (setq save-place t))))) | 335 | (setq save-place-mode t))))) |
| 336 | 336 | ||
| 337 | (declare-function dired-goto-file "dired" (file)) | 337 | (declare-function dired-goto-file "dired" (file)) |
| 338 | 338 | ||
| @@ -357,7 +357,7 @@ may have changed) back to `save-place-alist'." | |||
| 357 | ((and (listp (cdr cell)) (assq 'dired-filename (cdr cell))) | 357 | ((and (listp (cdr cell)) (assq 'dired-filename (cdr cell))) |
| 358 | (dired-goto-file (cdr (assq 'dired-filename (cdr cell))))))) | 358 | (dired-goto-file (cdr (assq 'dired-filename (cdr cell))))))) |
| 359 | ;; and make sure it will be saved again for later | 359 | ;; and make sure it will be saved again for later |
| 360 | (setq save-place t))))) | 360 | (setq save-place-mode t))))) |
| 361 | 361 | ||
| 362 | (defun save-place-kill-emacs-hook () | 362 | (defun save-place-kill-emacs-hook () |
| 363 | ;; First update the alist. This loads the old save-place-file if nec. | 363 | ;; First update the alist. This loads the old save-place-file if nec. |
diff --git a/lisp/simple.el b/lisp/simple.el index f0fcbf57562..e41630d4ed1 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -4352,7 +4352,7 @@ ring directly.") | |||
| 4352 | A non-nil value ensures that Emacs kill operations do not | 4352 | A non-nil value ensures that Emacs kill operations do not |
| 4353 | irrevocably overwrite existing clipboard text by saving it to the | 4353 | irrevocably overwrite existing clipboard text by saving it to the |
| 4354 | `kill-ring' prior to the kill. Such text can subsequently be | 4354 | `kill-ring' prior to the kill. Such text can subsequently be |
| 4355 | retrieved via \\[yank] \\[yank-pop]]." | 4355 | retrieved via \\[yank] \\[yank-pop]." |
| 4356 | :type 'boolean | 4356 | :type 'boolean |
| 4357 | :group 'killing | 4357 | :group 'killing |
| 4358 | :version "23.2") | 4358 | :version "23.2") |
diff --git a/lisp/window.el b/lisp/window.el index 76de4207e74..0a42dae6ca8 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -201,7 +201,7 @@ argument replaces this)." | |||
| 201 | 201 | ||
| 202 | (defmacro with-current-buffer-window (buffer-or-name action quit-function &rest body) | 202 | (defmacro with-current-buffer-window (buffer-or-name action quit-function &rest body) |
| 203 | "Evaluate BODY with a buffer BUFFER-OR-NAME current and show that buffer. | 203 | "Evaluate BODY with a buffer BUFFER-OR-NAME current and show that buffer. |
| 204 | This construct is like `with-temp-buffer-window' but unlike that | 204 | This construct is like `with-temp-buffer-window' but unlike that, |
| 205 | makes the buffer specified by BUFFER-OR-NAME current for running | 205 | makes the buffer specified by BUFFER-OR-NAME current for running |
| 206 | BODY." | 206 | BODY." |
| 207 | (declare (debug t)) | 207 | (declare (debug t)) |
| @@ -224,7 +224,7 @@ BODY." | |||
| 224 | 224 | ||
| 225 | (defmacro with-displayed-buffer-window (buffer-or-name action quit-function &rest body) | 225 | (defmacro with-displayed-buffer-window (buffer-or-name action quit-function &rest body) |
| 226 | "Show a buffer BUFFER-OR-NAME and evaluate BODY in that buffer. | 226 | "Show a buffer BUFFER-OR-NAME and evaluate BODY in that buffer. |
| 227 | This construct is like `with-current-buffer-window' but unlike that | 227 | This construct is like `with-current-buffer-window' but unlike that, |
| 228 | displays the buffer specified by BUFFER-OR-NAME before running BODY." | 228 | displays the buffer specified by BUFFER-OR-NAME before running BODY." |
| 229 | (declare (debug t)) | 229 | (declare (debug t)) |
| 230 | (let ((buffer (make-symbol "buffer")) | 230 | (let ((buffer (make-symbol "buffer")) |
| @@ -992,16 +992,16 @@ and may be called only if no window on SIDE exists yet." | |||
| 992 | ALIST is an association list of symbols and values. The | 992 | ALIST is an association list of symbols and values. The |
| 993 | following special symbols can be used in ALIST. | 993 | following special symbols can be used in ALIST. |
| 994 | 994 | ||
| 995 | `side' denotes the side of the frame where the new window shall | 995 | `side' denotes the side of the frame where the new window shall |
| 996 | be located. Valid values are `bottom', `right', `top' and | 996 | be located. Valid values are `bottom', `right', `top' and |
| 997 | `left'. The default is `bottom'. | 997 | `left'. The default is `bottom'. |
| 998 | 998 | ||
| 999 | `slot' if non-nil, specifies the window slot where to display | 999 | `slot' if non-nil, specifies the window slot where to display |
| 1000 | BUFFER. A value of zero or nil means use the middle slot on | 1000 | BUFFER. A value of zero or nil means use the middle slot on |
| 1001 | the specified side. A negative value means use a slot | 1001 | the specified side. A negative value means use a slot |
| 1002 | preceding (that is, above or on the left of) the middle slot. | 1002 | preceding (that is, above or on the left of) the middle slot. |
| 1003 | A positive value means use a slot following (that is, below or | 1003 | A positive value means use a slot following (that is, below or |
| 1004 | on the right of) the middle slot. The default is zero. | 1004 | on the right of) the middle slot. The default is zero. |
| 1005 | 1005 | ||
| 1006 | If the current frame size or the settings of `window-sides-slots' | 1006 | If the current frame size or the settings of `window-sides-slots' |
| 1007 | do not permit making a new window, a suitable existing window may | 1007 | do not permit making a new window, a suitable existing window may |
| @@ -6384,7 +6384,7 @@ See also `same-window-buffer-names'." | |||
| 6384 | :group 'windows) | 6384 | :group 'windows) |
| 6385 | 6385 | ||
| 6386 | (defun same-window-p (buffer-name) | 6386 | (defun same-window-p (buffer-name) |
| 6387 | "Return non-nil if a buffer named BUFFER-NAME would be shown in the \"same\" window. | 6387 | "Return non-nil if buffer BUFFER-NAME would be shown in the \"same\" window. |
| 6388 | This function returns non-nil if `display-buffer' or | 6388 | This function returns non-nil if `display-buffer' or |
| 6389 | `pop-to-buffer' would show a buffer named BUFFER-NAME in the | 6389 | `pop-to-buffer' would show a buffer named BUFFER-NAME in the |
| 6390 | selected rather than (as usual) some other window. See | 6390 | selected rather than (as usual) some other window. See |
| @@ -6822,16 +6822,22 @@ The actual non-nil value of this variable will be copied to the | |||
| 6822 | "Custom type for `display-buffer' actions.") | 6822 | "Custom type for `display-buffer' actions.") |
| 6823 | 6823 | ||
| 6824 | (defvar display-buffer-overriding-action '(nil . nil) | 6824 | (defvar display-buffer-overriding-action '(nil . nil) |
| 6825 | "Overriding action to perform to display a buffer. | 6825 | "User-defined overriding action to perform to display a buffer. |
| 6826 | It should be a cons cell (FUNCTION . ALIST), where FUNCTION is a | 6826 | This action overrides all the other actions in the action variables |
| 6827 | function or a list of functions. Each function should accept two | 6827 | and arguments passed to `display-buffer'. |
| 6828 | arguments: a buffer to display and an alist similar to ALIST. | 6828 | Value should be a cons cell (FUNCTION . ALIST), where FUNCTION is |
| 6829 | a function or a list of functions. Each function should accept | ||
| 6830 | two arguments: a buffer to display and an alist similar to ALIST. | ||
| 6831 | The default value is empty. | ||
| 6829 | See `display-buffer' for details.") | 6832 | See `display-buffer' for details.") |
| 6830 | (put 'display-buffer-overriding-action 'risky-local-variable t) | 6833 | (put 'display-buffer-overriding-action 'risky-local-variable t) |
| 6831 | 6834 | ||
| 6832 | (defcustom display-buffer-alist nil | 6835 | (defcustom display-buffer-alist nil |
| 6833 | "Alist of conditional actions for `display-buffer'. | 6836 | "Alist of uder-defined conditional actions for `display-buffer'. |
| 6834 | This is a list of elements (CONDITION . ACTION), where: | 6837 | Its value takes effect before `display-buffer-base-action' |
| 6838 | and `display-buffer-fallback-action', but after | ||
| 6839 | `display-buffer-overriding-action', which see. | ||
| 6840 | If non-nil, this is a list of elements (CONDITION . ACTION), where: | ||
| 6835 | 6841 | ||
| 6836 | CONDITION is either a regexp matching buffer names, or a | 6842 | CONDITION is either a regexp matching buffer names, or a |
| 6837 | function that takes two arguments - a buffer name and the | 6843 | function that takes two arguments - a buffer name and the |
| @@ -6857,9 +6863,13 @@ associated action to the list of actions it will try." | |||
| 6857 | 6863 | ||
| 6858 | (defcustom display-buffer-base-action '(nil . nil) | 6864 | (defcustom display-buffer-base-action '(nil . nil) |
| 6859 | "User-specified default action for `display-buffer'. | 6865 | "User-specified default action for `display-buffer'. |
| 6866 | This is the default action used by `display-buffer' if no other | ||
| 6867 | actions are specified or all fail, before falling back on | ||
| 6868 | `display-buffer-fallback-action'. | ||
| 6860 | It should be a cons cell (FUNCTION . ALIST), where FUNCTION is a | 6869 | It should be a cons cell (FUNCTION . ALIST), where FUNCTION is a |
| 6861 | function or a list of functions. Each function should accept two | 6870 | function or a list of functions. Each function should accept two |
| 6862 | arguments: a buffer to display and an alist similar to ALIST. | 6871 | arguments: a buffer to display and an alist similar to ALIST. |
| 6872 | The default value is empty. | ||
| 6863 | See `display-buffer' for details." | 6873 | See `display-buffer' for details." |
| 6864 | :type display-buffer--action-custom-type | 6874 | :type display-buffer--action-custom-type |
| 6865 | :risky t | 6875 | :risky t |
| @@ -6877,12 +6887,16 @@ See `display-buffer' for details." | |||
| 6877 | "Default fallback action for `display-buffer'. | 6887 | "Default fallback action for `display-buffer'. |
| 6878 | This is the action used by `display-buffer' if no other actions | 6888 | This is the action used by `display-buffer' if no other actions |
| 6879 | specified, e.g. by the user options `display-buffer-alist' or | 6889 | specified, e.g. by the user options `display-buffer-alist' or |
| 6880 | `display-buffer-base-action'. See `display-buffer'.") | 6890 | `display-buffer-base-action', or they all fail. See `display-buffer'.") |
| 6881 | (put 'display-buffer-fallback-action 'risky-local-variable t) | 6891 | (put 'display-buffer-fallback-action 'risky-local-variable t) |
| 6882 | 6892 | ||
| 6883 | (defun display-buffer-assq-regexp (buffer-name alist action) | 6893 | (defun display-buffer-assq-regexp (buffer-name alist action) |
| 6884 | "Retrieve ALIST entry corresponding to BUFFER-NAME. | 6894 | "Retrieve ALIST entry corresponding to BUFFER-NAME. |
| 6885 | ACTION is the action argument passed to `display-buffer'." | 6895 | This returns the cdr of the ALIST entry if either its key is a |
| 6896 | string that matches BUFFER-NAME, as reported by `string-match-p'; | ||
| 6897 | or if the key is a function that returns a non-nil when called | ||
| 6898 | with 3 arguments: the ALIST key, BUFFER-NAME, and ACTION. | ||
| 6899 | ACTION should have the form of the action argument passed to `display-buffer'." | ||
| 6886 | (catch 'match | 6900 | (catch 'match |
| 6887 | (dolist (entry alist) | 6901 | (dolist (entry alist) |
| 6888 | (let ((key (car entry))) | 6902 | (let ((key (car entry))) |
| @@ -6895,7 +6909,8 @@ ACTION is the action argument passed to `display-buffer'." | |||
| 6895 | (defvar display-buffer--same-window-action | 6909 | (defvar display-buffer--same-window-action |
| 6896 | '(display-buffer-same-window | 6910 | '(display-buffer-same-window |
| 6897 | (inhibit-same-window . nil)) | 6911 | (inhibit-same-window . nil)) |
| 6898 | "A `display-buffer' action for displaying in the same window.") | 6912 | "A `display-buffer' action for displaying in the same window. |
| 6913 | Specifies to call `display-buffer-same-window'.") | ||
| 6899 | (put 'display-buffer--same-window-action 'risky-local-variable t) | 6914 | (put 'display-buffer--same-window-action 'risky-local-variable t) |
| 6900 | 6915 | ||
| 6901 | (defvar display-buffer--other-frame-action | 6916 | (defvar display-buffer--other-frame-action |
| @@ -6903,7 +6918,9 @@ ACTION is the action argument passed to `display-buffer'." | |||
| 6903 | display-buffer-pop-up-frame) | 6918 | display-buffer-pop-up-frame) |
| 6904 | (reusable-frames . 0) | 6919 | (reusable-frames . 0) |
| 6905 | (inhibit-same-window . t)) | 6920 | (inhibit-same-window . t)) |
| 6906 | "A `display-buffer' action for displaying in another frame.") | 6921 | "A `display-buffer' action for displaying in another frame. |
| 6922 | Specifies to call `display-buffer-reuse-window', and if that | ||
| 6923 | fails, call `display-buffer-pop-up-frame'.") | ||
| 6907 | (put 'display-buffer--other-frame-action 'risky-local-variable t) | 6924 | (put 'display-buffer--other-frame-action 'risky-local-variable t) |
| 6908 | 6925 | ||
| 6909 | (defun display-buffer (buffer-or-name &optional action frame) | 6926 | (defun display-buffer (buffer-or-name &optional action frame) |
| @@ -6924,7 +6941,7 @@ If ACTION is non-nil, it should have the form (FUNCTION . ALIST), | |||
| 6924 | where FUNCTION is either a function or a list of functions, and | 6941 | where FUNCTION is either a function or a list of functions, and |
| 6925 | ALIST is an arbitrary association list (alist). | 6942 | ALIST is an arbitrary association list (alist). |
| 6926 | 6943 | ||
| 6927 | Each such FUNCTION should accept two arguments: the buffer to | 6944 | Each such function should accept two arguments: the buffer to |
| 6928 | display and an alist. Based on those arguments, it should | 6945 | display and an alist. Based on those arguments, it should |
| 6929 | display the buffer and return the window. If the caller is | 6946 | display the buffer and return the window. If the caller is |
| 6930 | prepared to handle the case of not displaying the buffer | 6947 | prepared to handle the case of not displaying the buffer |
| @@ -7048,6 +7065,9 @@ argument, ACTION is t." | |||
| 7048 | 7065 | ||
| 7049 | (defun display-buffer-other-frame (buffer) | 7066 | (defun display-buffer-other-frame (buffer) |
| 7050 | "Display buffer BUFFER preferably in another frame. | 7067 | "Display buffer BUFFER preferably in another frame. |
| 7068 | This function attempts to look for a window displaying BUFFER, | ||
| 7069 | on all the frames on the current terminal, skipping the selected | ||
| 7070 | window; if that fails, it pops up a new frame. | ||
| 7051 | This uses the function `display-buffer' as a subroutine; see | 7071 | This uses the function `display-buffer' as a subroutine; see |
| 7052 | its documentation for additional customization information." | 7072 | its documentation for additional customization information." |
| 7053 | (interactive "BDisplay buffer in other frame: ") | 7073 | (interactive "BDisplay buffer in other frame: ") |
| @@ -7091,10 +7111,10 @@ that allows the selected frame)." | |||
| 7091 | 7111 | ||
| 7092 | (defun display-buffer-same-window (buffer alist) | 7112 | (defun display-buffer-same-window (buffer alist) |
| 7093 | "Display BUFFER in the selected window. | 7113 | "Display BUFFER in the selected window. |
| 7094 | This fails if ALIST has a non-nil `inhibit-same-window' entry, or | 7114 | This fails if ALIST has an `inhibit-same-window' element whose |
| 7095 | if the selected window is a minibuffer window or is dedicated to | 7115 | value is non-nil, or if the selected window is a minibuffer |
| 7096 | another buffer; in that case, return nil. Otherwise, return the | 7116 | window or is dedicated to another buffer; in that case, return nil. |
| 7097 | selected window." | 7117 | Otherwise, return the selected window." |
| 7098 | (unless (or (cdr (assq 'inhibit-same-window alist)) | 7118 | (unless (or (cdr (assq 'inhibit-same-window alist)) |
| 7099 | (window-minibuffer-p) | 7119 | (window-minibuffer-p) |
| 7100 | (window-dedicated-p)) | 7120 | (window-dedicated-p)) |
| @@ -7581,7 +7601,12 @@ Optional argument NORECORD, if non-nil means do not put this | |||
| 7581 | buffer at the front of the list of recently selected ones. | 7601 | buffer at the front of the list of recently selected ones. |
| 7582 | 7602 | ||
| 7583 | Unlike `pop-to-buffer', this function prefers using the selected | 7603 | Unlike `pop-to-buffer', this function prefers using the selected |
| 7584 | window over popping up a new window or frame." | 7604 | window over popping up a new window or frame. Specifically, if |
| 7605 | the selected window is neither a minibuffer window (as reported | ||
| 7606 | by `window-minibuffer-p'), nor is dedicated to another buffer | ||
| 7607 | (see `window-dedicated-p'), BUFFER will be displayed in the | ||
| 7608 | currently selected window; otherwise it will be displayed in | ||
| 7609 | another window." | ||
| 7585 | (pop-to-buffer buffer display-buffer--same-window-action norecord)) | 7610 | (pop-to-buffer buffer display-buffer--same-window-action norecord)) |
| 7586 | 7611 | ||
| 7587 | (defun read-buffer-to-switch (prompt) | 7612 | (defun read-buffer-to-switch (prompt) |
diff --git a/src/keymap.c b/src/keymap.c index 22e24b2cb00..3a79bf4c5aa 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -2298,7 +2298,7 @@ DEFUN ("text-char-description", Ftext_char_description, Stext_char_description, | |||
| 2298 | doc: /* Return the description of CHARACTER in standard Emacs notation. | 2298 | doc: /* Return the description of CHARACTER in standard Emacs notation. |
| 2299 | CHARACTER must be a valid character code that passes the `characterp' test. | 2299 | CHARACTER must be a valid character code that passes the `characterp' test. |
| 2300 | Control characters turn into "^char", and characters with Meta and other | 2300 | Control characters turn into "^char", and characters with Meta and other |
| 2301 | modifiers signal an error, as they are not valid characterr codes. | 2301 | modifiers signal an error, as they are not valid character codes. |
| 2302 | This differs from `single-key-description' which accepts character events, | 2302 | This differs from `single-key-description' which accepts character events, |
| 2303 | and thus doesn't enforce the `characterp' condition, turns control | 2303 | and thus doesn't enforce the `characterp' condition, turns control |
| 2304 | characters into "C-char", and uses the 2**27 bit for Meta. | 2304 | characters into "C-char", and uses the 2**27 bit for Meta. |