From 295b86e57a74899102aa0f7ef6d55881b7d5568c Mon Sep 17 00:00:00 2001 From: SpacemacsBot <86630153+SpacemacsBot@users.noreply.github.com> Date: Thu, 30 Dec 2021 21:15:33 +0200 Subject: [PATCH] [bot] "built_in_updates" Thu Dec 30 17:38:33 UTC 2021 (#15229) --- core/libs/package-build.el | 2 +- core/libs/quelpa.el | 7 ++++++- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/core/libs/package-build.el b/core/libs/package-build.el index 2bb886cb2..9d472fa08 100644 --- a/core/libs/package-build.el +++ b/core/libs/package-build.el @@ -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)))))) diff --git a/core/libs/quelpa.el b/core/libs/quelpa.el index 637aa9257..918fab90d 100644 --- a/core/libs/quelpa.el +++ b/core/libs/quelpa.el @@ -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)))