summaryrefslogtreecommitdiff
path: root/.guix/tamil-computing-website.scm
blob: 8f623baa5fc7c573beee275e43c5c23bb630a548 (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
(define-module (tamil-computing-website)
  #:use-module ((gnu packages base) #:select (glibc make-glibc-utf8-locales))
  #:use-module ((gnu packages emacs) #:select (emacs-minimal))
  #:use-module (guix gexp)
  #:use-module (guix git-download)
  #:use-module (guix utils))

(define tamil-computing-website-source
  (local-file ".."
              "tamil-computing-website-checkout"
              #:recursive? #t
              #:select? (or (git-predicate (dirname (current-source-directory)))
                            (const #t))))

(define tamil-computing-website-gexp
  (with-imported-modules '((guix build utils))
    #~(begin
        (use-modules (guix build utils))

        ;; Set a Tamil locale to support Tamil filenames.
        (setenv "GUIX_LOCPATH" #$(file-append (make-glibc-utf8-locales
                                               glibc
                                               #:locales (list "ta_IN")
                                               #:name "glibc-tamil-locales")
                                              "/lib/locale"))
        (setlocale LC_ALL "ta_IN.utf8")
        (setenv "LC_ALL" "ta_IN.utf8")
        
        (copy-recursively #$tamil-computing-website-source
                          (getcwd))
        (setenv "HOME" "/tmp")
        (invoke #$(file-append emacs-minimal "/bin/emacs")
                "--script" "build.el")
        (copy-recursively "site" #$output))))

(define-public tamil-computing-website
  (computed-file "tamil-computing-website" tamil-computing-website-gexp))

tamil-computing-website