1 files changed, 12 insertions, 0 deletions
diff --git a/module/git.scm b/module/git.scm
new file mode 100644
index 00000000..dfb60526
--- /dev/null
+++ b/module/git.scm
@@ -0,0 +1,12 @@
+(define-module (git)
+  :use-module (util)
+  :use-module ((ice-9 rdelim) :select (read-line))
+  :use-module ((ice-9 popen) :select (open-input-pipe))
+  :export (get-git-version))
+
+(define (get-git-version)
+  (-> "git rev-parse HEAD"
+      open-input-pipe
+      read-line))
+
+