mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-10 08:10:21 -08:00
Merge from origin/emacs-26
24b6e6e(origin/emacs-26) * etc/AUTHORS: Update.2f22a17* ; ChangeLog.3 update0f523deImprove indexing of the user manualbd5795eFix url-copy-file arglisteaa188a; * admin/notes/bugtracker: Minor additions and updates.5ed05fbFix downloading updates for packages with non-ASCII descriptionse9f2d1f* etc/NEWS: Remove temporary markers.24fc133* doc/misc/cc-mode.texi (Config Basics): in @itemize, @asis -...0f325d1Don't clobber 'comint-input-autoexpand' in 'read-shell-command'bc75589Document restrictions when setting window margins, fringes or...cc4cebfMore improvements for 'read-buffer's doc stringd026d9a* lisp/progmodes/cc-defs.el: Update c-version to 5.33.2 for E...5dbf08b* src/minibuf.c (Fread_buffer): Minor doc fixes. (Bug#34749) # Conflicts: # etc/NEWS # lisp/url/url-handlers.el
This commit is contained in:
commit
1fc6afbdf1
13 changed files with 338 additions and 54 deletions
|
|
@ -1573,14 +1573,16 @@ similar to an entry in `package-alist'. Save the cached copy to
|
|||
(member name package-unsigned-archives))
|
||||
;; If we don't care about the signature, save the file and
|
||||
;; we're done.
|
||||
(progn (write-region content nil local-file nil 'silent)
|
||||
(progn (let ((coding-system-for-write 'utf-8))
|
||||
(write-region content nil local-file nil 'silent))
|
||||
(package--update-downloads-in-progress archive))
|
||||
;; If we care, check it (perhaps async) and *then* write the file.
|
||||
(package--check-signature
|
||||
location file content async
|
||||
;; This function will be called after signature checking.
|
||||
(lambda (&optional good-sigs)
|
||||
(write-region content nil local-file nil 'silent)
|
||||
(let ((coding-system-for-write 'utf-8))
|
||||
(write-region content nil local-file nil 'silent))
|
||||
;; Write out good signatures into archive-contents.signed file.
|
||||
(when good-sigs
|
||||
(write-region (mapconcat #'epg-signature-to-string good-sigs "\n")
|
||||
|
|
@ -3438,6 +3440,9 @@ short description."
|
|||
;; Generate the Package Menu.
|
||||
(let ((buf (get-buffer-create "*Packages*")))
|
||||
(with-current-buffer buf
|
||||
;; Since some packages have their descriptions include non-ASCII
|
||||
;; characters...
|
||||
(setq buffer-file-coding-system 'utf-8)
|
||||
(package-menu-mode)
|
||||
|
||||
;; Fetch the remote list of packages.
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue