[bug#28381] [PATCH] gnu: emacs-skewer-mode: Install html and js files.

[Oleg Pykhalov <go.wigust@gmail.com>]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: [PATCH] gnu: emacs-skewer-mode: Install html and js files. --]
[-- Type: text/x-patch, Size: 1564 bytes --]

From 1cc40f4a0088cbed1ae9f6ca0efdf89a52bf01a5 Mon Sep 17 00:00:00 2001
From: Oleg Pykhalov <go.wigust@gmail.com>
Date: Thu, 7 Sep 2017 15:03:31 +0300
Subject: [PATCH] gnu: emacs-skewer-mode: Install html and js files.

* gnu/packages/emacs.scm (emacs-skewer-mode): Install html and js files.
---
 gnu/packages/emacs.scm | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm
index 9c0f9bc89..a7ec0b146 100644
--- a/gnu/packages/emacs.scm
+++ b/gnu/packages/emacs.scm
@@ -1967,6 +1967,21 @@ serve files and directory listings.")
     (propagated-inputs
      `(("emacs-simple-httpd" ,emacs-simple-httpd)
        ("emacs-js2-mode" ,emacs-js2-mode)))
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'install 'install-html-js
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((skewer-mode (string-append (assoc-ref outputs "out")
+                                               "/share/emacs/site-lisp/guix.d"
+                                               "/skewer-mode-"
+                                               ,version)))
+               (for-each (lambda (file)
+                           (install-file file skewer-mode))
+                         '("example.html"
+                           "skewer-everything.user.js"
+                           "skewer.js")))
+             #t)))))
     (home-page "https://github.com/skeeto/skewer-mode")
     (synopsis "Live web development in Emacs")
     (description
-- 
2.14.1