summaryrefslogtreecommitdiff
path: root/elenq/documentation.scm
blob: 993f21c3c04265f010aee91dd40baa2d1b40b518 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
(define-module (elenq documentation)
  #:use-module (elenq graphics)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix build-system copy)
  #:use-module (guix gexp)
  #:use-module (guix git-download)
  #:use-module (guix packages)
  #:use-module (gnu packages haskell-xyz))

(define-public pandoc-templates
  (let ((revision "1")
        (commit "8bc6f1eab3288c3a6ae15a050c8d9fd84aacbf47"))
    (package
      (name "pandoc-templates")
      (version (git-version "0.0.0" revision commit))
      (source
        (origin
          (method git-fetch)
          (uri (git-reference
                 (url "git://git.elenq.tech/pandoc-templates")
                 (commit commit)))
          (sha256
            (base32 "0yyyyjq5022qisbf5yxxd65hjg79y6bkz32qv8xas40riv9sghzd"))))
      (build-system copy-build-system)
      (inputs (list elenq-logos))
      (arguments
        (list
          #:install-plan ''(("pandoc" "/share/pandoc"))
          #:phases
          #~(modify-phases %standard-phases
             (add-before 'install 'set-url
               (lambda _
                 (for-each
                   (lambda (f)
                     (substitute* f
                       (("\\$elenq-directory\\$")
                        (string-append #$elenq-logos "/share/elenq/"))))
                   (list "pandoc/templates/elenq-article.latex"
                         "pandoc/templates/elenq-book.latex")))))))
      (native-search-paths
        (list (search-path-specification
                (variable "XDG_DATA_DIRS") ;; Not supported by pandoc _yet_
                (files '("share")))))
      (home-page "http://git.elenq.tech/pandoc-templates")
      (synopsis "Pandoc templates for ElenQ Technology")
      (description "A set of well configured Pandoc templates for ElenQ
Technology's documents.")
      (license license:asl2.0))))


(define-public elenqdoc
  (let ((revision "1")
        (commit "1cb21742a69f681e6452a7ddd0adc9543aefd72a"))
    (package
      (name "elenqdoc")
      (version (git-version "0.0.0" revision commit))
      (source
       (origin
         (method git-fetch)
         (uri (git-reference
               (url "git://git.elenq.tech/elenqdoc")
               (commit commit)))
         (sha256
          (base32 "0fdxskf3h14vdr9w5pi18svrz40p9qkbwcn4c4rp1b1azpbfsa6s"))))
      (build-system copy-build-system)
      (inputs (list pandoc-templates))
      (propagated-inputs (list pandoc))
      (arguments
       (list
        #:install-plan ''(("elenqdoc" "/bin/elenqdoc"))
        #:phases #~(modify-phases %standard-phases
                     (add-after 'install 'wrap
                       (lambda _
                         (wrap-program (string-append #$output "/bin/elenqdoc")
                           `("ELENQDOC_DATADIR" =
                             (,(string-append #$pandoc-templates
                                              "/share/pandoc/")))))))))
      (home-page "http://git.elenq.tech/")
      (synopsis "Simplified pandoc wrapper for ElenQ documents")
      (description "Provides `elenqdoc` command.")
      (license license:asl2.0))))