diff options
| author | Eli Zaretskii | 2023-07-01 06:29:43 -0400 |
|---|---|---|
| committer | Eli Zaretskii | 2023-07-01 06:29:43 -0400 |
| commit | e45ddf2fdc6b25c72ed6be29ad9e8effda6a2b6a (patch) | |
| tree | 1228de33a93478dca17c7738c0e29a2148015f61 | |
| parent | 0bdd7707626858b48d330f78e692a96f02ab0a28 (diff) | |
| parent | 4df510c7a7097641169ac8f088bf1923ea04c2cc (diff) | |
| download | emacs-e45ddf2fdc6b25c72ed6be29ad9e8effda6a2b6a.tar.gz emacs-e45ddf2fdc6b25c72ed6be29ad9e8effda6a2b6a.zip | |
Merge from origin/emacs-29
4df510c7a70 Fix VC package build when doc file isn't in a subdir
382f5fa8130 ; * doc/emacs/package.texi (Fetching Package Sources): Fi...
fc7e7c3fde3 Fix type check in tramp-get-buffer-string
2aa57fe6cf9 ; Fix typo in maintaining.texi (bug#64279)
| -rw-r--r-- | doc/emacs/maintaining.texi | 2 | ||||
| -rw-r--r-- | doc/emacs/package.texi | 2 | ||||
| -rw-r--r-- | lisp/emacs-lisp/package-vc.el | 2 | ||||
| -rw-r--r-- | lisp/net/tramp.el | 7 |
4 files changed, 8 insertions, 5 deletions
diff --git a/doc/emacs/maintaining.texi b/doc/emacs/maintaining.texi index 246e335cfe7..2dad70d3d13 100644 --- a/doc/emacs/maintaining.texi +++ b/doc/emacs/maintaining.texi | |||
| @@ -716,7 +716,7 @@ started editing (@pxref{Old Revisions}), type @kbd{C-c C-d} | |||
| 716 | (@code{log-edit-generate-changelog-from-diff}), to generate skeleton | 716 | (@code{log-edit-generate-changelog-from-diff}), to generate skeleton |
| 717 | ChangeLog entries, listing all changed file and function names based | 717 | ChangeLog entries, listing all changed file and function names based |
| 718 | on the diff of the VC fileset. Consecutive entries left empty will be | 718 | on the diff of the VC fileset. Consecutive entries left empty will be |
| 719 | combined by @kbd{C-q} (@code{fill-paragraph}). By default the | 719 | combined by @kbd{M-q} (@code{fill-paragraph}). By default the |
| 720 | skeleton will just include the file name, without any leading | 720 | skeleton will just include the file name, without any leading |
| 721 | directories. If you wish to prepend the leading directories up to the | 721 | directories. If you wish to prepend the leading directories up to the |
| 722 | VC root, customize @code{diff-add-log-use-relative-names}. | 722 | VC root, customize @code{diff-add-log-use-relative-names}. |
diff --git a/doc/emacs/package.texi b/doc/emacs/package.texi index f1f88ac7f58..b294e3d58bd 100644 --- a/doc/emacs/package.texi +++ b/doc/emacs/package.texi | |||
| @@ -625,7 +625,7 @@ checkout instead of cloning a remote repository. You can do this by | |||
| 625 | using @code{package-vc-install-from-checkout}, which creates a symbolic link | 625 | using @code{package-vc-install-from-checkout}, which creates a symbolic link |
| 626 | from the package directory (@pxref{Package Files}) to your checkout | 626 | from the package directory (@pxref{Package Files}) to your checkout |
| 627 | and initializes the code. Note that you might have to use | 627 | and initializes the code. Note that you might have to use |
| 628 | @code{package-vc-refresh} to repeat the initialization and update the | 628 | @code{package-vc-rebuild} to repeat the initialization and update the |
| 629 | autoloads. | 629 | autoloads. |
| 630 | 630 | ||
| 631 | @subsection Specifying Package Sources | 631 | @subsection Specifying Package Sources |
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index f34cfb3120b..db8b41aee6a 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el | |||
| @@ -386,7 +386,7 @@ FILE can be an Org file, indicated by its \".org\" extension, | |||
| 386 | otherwise it's assumed to be an Info file." | 386 | otherwise it's assumed to be an Info file." |
| 387 | (let* ((pkg-name (package-desc-name pkg-desc)) | 387 | (let* ((pkg-name (package-desc-name pkg-desc)) |
| 388 | (default-directory (package-desc-dir pkg-desc)) | 388 | (default-directory (package-desc-dir pkg-desc)) |
| 389 | (docs-directory (expand-file-name (file-name-directory file))) | 389 | (docs-directory (file-name-directory (expand-file-name file))) |
| 390 | (output (expand-file-name (format "%s.info" pkg-name))) | 390 | (output (expand-file-name (format "%s.info" pkg-name))) |
| 391 | clean-up) | 391 | clean-up) |
| 392 | (when (string-match-p "\\.org\\'" file) | 392 | (when (string-match-p "\\.org\\'" file) |
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index f64abbcf06e..4820feb276e 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el | |||
| @@ -1950,8 +1950,11 @@ version, the function does nothing." | |||
| 1950 | "Return contents of BUFFER. | 1950 | "Return contents of BUFFER. |
| 1951 | If BUFFER is not a buffer or a buffer name, return the contents | 1951 | If BUFFER is not a buffer or a buffer name, return the contents |
| 1952 | of `current-buffer'." | 1952 | of `current-buffer'." |
| 1953 | (with-current-buffer (or buffer (current-buffer)) | 1953 | (or (let ((buf (or buffer (current-buffer)))) |
| 1954 | (substring-no-properties (buffer-string)))) | 1954 | (when (bufferp buf) |
| 1955 | (with-current-buffer (or buffer (current-buffer)) | ||
| 1956 | (substring-no-properties (buffer-string))))) | ||
| 1957 | "")) | ||
| 1955 | 1958 | ||
| 1956 | (defun tramp-debug-buffer-name (vec) | 1959 | (defun tramp-debug-buffer-name (vec) |
| 1957 | "A name for the debug buffer for VEC." | 1960 | "A name for the debug buffer for VEC." |