     (dolist (hook skewer-response-hook)
       (funcall hook result))))
 
-(defservlet skewer/demo text/html ()
+(defservlet skewer/demo "text/html; charset=UTF-8" ()
   (insert-file-contents (expand-file-name "example.html" skewer-data-root)))
 
 ;; Minibuffer display


;; Servlets

(defservlet skewer text/javascript ()
  (insert-file-contents (expand-file-name "skewer.js" skewer-data-root))
  (goto-char (point-max))
  (run-hooks 'skewer-js-hook))

                 (lambda (_) (message "%s loaded" buffer-name))
                 :type "script")))

(defservlet skewer/script "text/javascript; charset=UTF-8" (path)
  (let ((id (string-to-number (nth 3 (split-string path "/")))))
    (insert (cache-table-get id skewer-hosted-scripts ""))))

