diff options
| author | Glenn Morris | 2019-06-11 08:38:34 -0700 |
|---|---|---|
| committer | Glenn Morris | 2019-06-11 08:38:34 -0700 |
| commit | 1903e9964f2fd16b604f4ef50390dfa9b4d90a9a (patch) | |
| tree | 183e546ecafaf4c72049dc7eee47b3962661477b | |
| parent | e545d612df8111d2dc76c115685ccd3f426ee2ee (diff) | |
| parent | 5ca093d2814fe5574c720338fc64cba44357f9b3 (diff) | |
| download | emacs-1903e9964f2fd16b604f4ef50390dfa9b4d90a9a.tar.gz emacs-1903e9964f2fd16b604f4ef50390dfa9b4d90a9a.zip | |
Merge from origin/emacs-26
5ca093d (origin/emacs-26) Fix doc of 'display-buffer-in-previous-wind...
add2cac lisp/*.el: Minor docstring fixes
| -rw-r--r-- | doc/lispref/windows.texi | 3 | ||||
| -rw-r--r-- | lisp/subr.el | 12 | ||||
| -rw-r--r-- | lisp/svg.el | 12 | ||||
| -rw-r--r-- | lisp/window.el | 7 |
4 files changed, 20 insertions, 14 deletions
diff --git a/doc/lispref/windows.texi b/doc/lispref/windows.texi index 5e644138109..860c439d9a0 100644 --- a/doc/lispref/windows.texi +++ b/doc/lispref/windows.texi | |||
| @@ -2598,6 +2598,9 @@ If @var{alist} has a @code{previous-window} entry and the window | |||
| 2598 | specified by that entry is live and not dedicated to another buffer, | 2598 | specified by that entry is live and not dedicated to another buffer, |
| 2599 | that window will be preferred, even if it never showed @var{buffer} | 2599 | that window will be preferred, even if it never showed @var{buffer} |
| 2600 | before. | 2600 | before. |
| 2601 | |||
| 2602 | This function will not choose the selected window if it finds another | ||
| 2603 | eligible window that has shown @var{buffer} previously. | ||
| 2601 | @end defun | 2604 | @end defun |
| 2602 | 2605 | ||
| 2603 | @defun display-buffer-use-some-window buffer alist | 2606 | @defun display-buffer-use-some-window buffer alist |
diff --git a/lisp/subr.el b/lisp/subr.el index 73031a2a9f6..93a98a4bdb1 100644 --- a/lisp/subr.el +++ b/lisp/subr.el | |||
| @@ -5519,15 +5519,15 @@ This is the simplest safe way to acquire and release a mutex." | |||
| 5519 | (defvar definition-prefixes (make-hash-table :test 'equal) | 5519 | (defvar definition-prefixes (make-hash-table :test 'equal) |
| 5520 | "Hash table mapping prefixes to the files in which they're used. | 5520 | "Hash table mapping prefixes to the files in which they're used. |
| 5521 | This can be used to automatically fetch not-yet-loaded definitions. | 5521 | This can be used to automatically fetch not-yet-loaded definitions. |
| 5522 | More specifically, if there is a value of the form (FILES...) for a string PREFIX | 5522 | More specifically, if there is a value of the form (FILES...) for |
| 5523 | it means that the FILES define variables or functions with names that start | 5523 | a string PREFIX it means that the FILES define variables or functions |
| 5524 | with PREFIX. | 5524 | with names that start with PREFIX. |
| 5525 | 5525 | ||
| 5526 | Note that it does not imply that all definitions starting with PREFIX can | 5526 | Note that it does not imply that all definitions starting with PREFIX can |
| 5527 | be found in those files. E.g. if prefix is \"gnus-article-\" there might | 5527 | be found in those files. E.g. if prefix is \"gnus-article-\" there might |
| 5528 | still be definitions of the form \"gnus-article-toto-titi\" in other files, which would | 5528 | still be definitions of the form \"gnus-article-toto-titi\" in other files, |
| 5529 | presumably appear in this table under another prefix such as \"gnus-\" | 5529 | which would presumably appear in this table under another prefix such as |
| 5530 | or \"gnus-article-toto-\".") | 5530 | \"gnus-\" or \"gnus-article-toto-\".") |
| 5531 | 5531 | ||
| 5532 | (defun register-definition-prefixes (file prefixes) | 5532 | (defun register-definition-prefixes (file prefixes) |
| 5533 | "Register that FILE uses PREFIXES." | 5533 | "Register that FILE uses PREFIXES." |
diff --git a/lisp/svg.el b/lisp/svg.el index 291b9a11d99..da779728cc1 100644 --- a/lisp/svg.el +++ b/lisp/svg.el | |||
| @@ -30,7 +30,7 @@ | |||
| 30 | (eval-when-compile (require 'subr-x)) | 30 | (eval-when-compile (require 'subr-x)) |
| 31 | 31 | ||
| 32 | (defun svg-create (width height &rest args) | 32 | (defun svg-create (width height &rest args) |
| 33 | "Create a new, empty SVG image with dimensions WIDTHxHEIGHT. | 33 | "Create a new, empty SVG image with dimensions WIDTH x HEIGHT. |
| 34 | ARGS can be used to provide `stroke' and `stroke-width' parameters to | 34 | ARGS can be used to provide `stroke' and `stroke-width' parameters to |
| 35 | any further elements added." | 35 | any further elements added." |
| 36 | (dom-node 'svg | 36 | (dom-node 'svg |
| @@ -42,8 +42,8 @@ any further elements added." | |||
| 42 | 42 | ||
| 43 | (defun svg-gradient (svg id type stops) | 43 | (defun svg-gradient (svg id type stops) |
| 44 | "Add a gradient with ID to SVG. | 44 | "Add a gradient with ID to SVG. |
| 45 | TYPE is `linear' or `radial'. STOPS is a list of percentage/color | 45 | TYPE is `linear' or `radial'. |
| 46 | pairs." | 46 | STOPS is a list of percentage/color pairs." |
| 47 | (svg--def | 47 | (svg--def |
| 48 | svg | 48 | svg |
| 49 | (apply | 49 | (apply |
| @@ -66,9 +66,9 @@ pairs." | |||
| 66 | "Create a rectangle on SVG, starting at position X/Y, of WIDTH/HEIGHT. | 66 | "Create a rectangle on SVG, starting at position X/Y, of WIDTH/HEIGHT. |
| 67 | ARGS is a plist of modifiers. Possible values are | 67 | ARGS is a plist of modifiers. Possible values are |
| 68 | 68 | ||
| 69 | :stroke-width PIXELS. The line width. | 69 | :stroke-width PIXELS The line width. |
| 70 | :stroke-color COLOR. The line color. | 70 | :stroke-color COLOR The line color. |
| 71 | :gradient ID. The gradient ID to use." | 71 | :gradient ID The gradient ID to use." |
| 72 | (svg--append | 72 | (svg--append |
| 73 | svg | 73 | svg |
| 74 | (dom-node 'rect | 74 | (dom-node 'rect |
diff --git a/lisp/window.el b/lisp/window.el index 69b1299dbda..7117d4aacd6 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -7783,8 +7783,11 @@ selected frame if `display-buffer-reuse-frames' and | |||
| 7783 | terminal if either of those variables is non-nil. | 7783 | terminal if either of those variables is non-nil. |
| 7784 | 7784 | ||
| 7785 | If ALIST has a `previous-window' entry, the window specified by | 7785 | If ALIST has a `previous-window' entry, the window specified by |
| 7786 | that entry will override any other window found by the methods | 7786 | that entry may override any other window found by the methods |
| 7787 | above, even if that window never showed BUFFER before." | 7787 | above, even if that window never showed BUFFER before. |
| 7788 | |||
| 7789 | Avoid using the selected window if another eligible window has | ||
| 7790 | shown BUFFER before." | ||
| 7788 | (let* ((alist-entry (assq 'reusable-frames alist)) | 7791 | (let* ((alist-entry (assq 'reusable-frames alist)) |
| 7789 | (inhibit-same-window | 7792 | (inhibit-same-window |
| 7790 | (cdr (assq 'inhibit-same-window alist))) | 7793 | (cdr (assq 'inhibit-same-window alist))) |