[bot] "built_in_updates" Thu Dec 30 17:38:33 UTC 2021 (#15229)
This commit is contained in:
parent
8034e471b5
commit
295b86e57a
|
@ -232,7 +232,7 @@ is used instead."
|
|||
(cl-flet ((match (regexp separator tag)
|
||||
(let* ((version-string (and (string-match regexp tag)
|
||||
(match-string 1 tag)))
|
||||
(version-seperator separator)
|
||||
(version-separator separator)
|
||||
(version (ignore-errors (version-to-list version-string))))
|
||||
(when (and version (version-list-<= (cdr ret) version))
|
||||
(setq ret (cons tag version))))))
|
||||
|
|
|
@ -1812,7 +1812,12 @@ So here we replace that with `insert-file-contents' for non-tar files."
|
|||
(lambda (file)
|
||||
(if (string-match "\\.tar\\'" file)
|
||||
(funcall insert-file-contents-literally-orig file)
|
||||
(insert-file-contents file)))))
|
||||
(insert-file-contents file))))
|
||||
(kill-buffer-orig (symbol-function 'kill-buffer))
|
||||
((symbol-function 'kill-buffer)
|
||||
(lambda (&rest args)
|
||||
(set-buffer-modified-p nil)
|
||||
(apply kill-buffer-orig args))))
|
||||
(package-install-file file))
|
||||
(package-install-file file)))
|
||||
|
||||
|
|
Loading…
Reference in a new issue