[nongnu] elpa/hyperdrive 0ee751c591 14/26: Fix: (h/write-buffer) Fix charset in entry type

[ELPA Syncer]

branch: elpa/hyperdrive
commit 0ee751c59128b576e3f1074e82d8e1ace0fc656d
Author: Joseph Turner <joseph@ushin.org>
Commit: Joseph Turner <joseph@ushin.org>

    Fix: (h/write-buffer) Fix charset in entry type
---
 hyperdrive.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/hyperdrive.el b/hyperdrive.el
index 12a35eba60..7ea7f0a3bf 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -550,7 +550,9 @@ For non-interactive use, see `hyperdrive-write'."
                          (point-max) 'approximate coding-system))
                   ;; FIXME: Will entry type ever be anything besides 
text/plain?
                   ;;        /.well-known/host-meta.json ?
-                  (setf (he/type entry) "text/plain; charset=utf-8")
+                  (setf (he/type entry)
+                        (format "text/plain; charset=%s"
+                                (coding-system-base coding-system)))
                   (setq-local h/current-entry entry)
                   (setf buffer-file-name nil)
                   (unless (eq orig-buffer buffer-visiting-entry)