summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--.guix-channel11
-rw-r--r--rodion/blogs.scm44
2 files changed, 54 insertions, 1 deletions
diff --git a/.guix-channel b/.guix-channel
index 7cfb3a9..9bae090 100644
--- a/.guix-channel
+++ b/.guix-channel
@@ -1,3 +1,12 @@
(channel
(version 0)
- (url "https://git.goritskov.com/rodion/blogs.git")) \ No newline at end of file
+ (url "https://git.goritskov.com/rodion/blogs.git")
+ (dependencies
+ (channel
+ (name little-guix-channel)
+ (url "https://git.goritskov.com/rodion/little-guix-channel.git")
+ (introduction
+ (channel-introduction
+ (version 0)
+ (commit "cfee0a86d4bdc74abcf03c47715a382d7ba93be8")
+ (signer "37F5 3D87 DFB3 EE32 393D 24B2 3A07 1A95 2839 DB19")))))) \ No newline at end of file
diff --git a/rodion/blogs.scm b/rodion/blogs.scm
new file mode 100644
index 0000000..18a4840
--- /dev/null
+++ b/rodion/blogs.scm
@@ -0,0 +1,44 @@
+(define-module (rodion blogs)
+ #:use-module (guix packages)
+ #:use-module (guix build-system copy)
+ #:use-module (guix build-system cmake)
+ #:use-module (guix git-download)
+ #:use-module (guix gexp)
+ #:use-module (guix utils)
+ #:use-module (gnu packages version-control)
+ #:use-module (gnu packages emacs)
+ #:use-module (guix search-paths)
+ #:use-module ((guix licenses) #:prefix license:)
+ #:use-module (rodion packages emacs))
+
+(define baldeagle-source-checkout
+ (let ((vcs-file? (or (git-predicate
+ (string-append (current-source-directory)
+ "/../baldeagle"))
+ (const #t))))
+ (local-file "../baldeagle" "baldeagle-checkout"
+ #:recursive? #t
+ #:select? vcs-file?)))
+
+(define %baldeagle-version "1.0.0-git")
+
+(define-public baldeagle
+ (package
+ (name "baldeagle")
+ (version %baldeagle-version)
+ (build-system copy-build-system)
+ (home-page "https://git.goritskov.com/rodion/blogs.git")
+ (source baldeagle-source-checkout)
+ (native-inputs (list emacs-minimal git emacs-ox-gemini/latest))
+ (arguments
+ (list #:phases
+ #~(modify-phases %standard-phases
+ (add-before 'install 'build-library
+ (lambda* (#:key inputs #:allow-other-keys)
+ (setenv "HOME" "/tmp")
+ (invoke "emacs" "--quick" "--batch" "--script" "publish.el"))))
+ #:install-plan ''(("baldeagle-public/" "share/baldeagle/")
+ ("baldeagle-gemini/" "share/baldeagle-gemini/"))))
+ (license license:expat)
+ (description "Baldeagle.me blog")
+ (synopsis "Baldeagle blog.")))