diff options
-rw-r--r-- | .guix-authorizations | 4 | ||||
-rw-r--r-- | .guix-channel | 3 | ||||
-rw-r--r-- | .guix/emacs-exiftool-package.scm | 40 | ||||
l--------- | guix.scm | 1 |
4 files changed, 48 insertions, 0 deletions
diff --git a/.guix-authorizations b/.guix-authorizations new file mode 100644 index 0000000..a8ef8be --- /dev/null +++ b/.guix-authorizations @@ -0,0 +1,4 @@ +(authorizations + (version 0) + (("7F73 0343 F2F0 9F3C 77BF 79D3 2E25 EE8B 6180 2BB3" + (name "arunisaac")))) diff --git a/.guix-channel b/.guix-channel new file mode 100644 index 0000000..35e181f --- /dev/null +++ b/.guix-channel @@ -0,0 +1,3 @@ +(channel + (version 0) + (directory ".guix")) diff --git a/.guix/emacs-exiftool-package.scm b/.guix/emacs-exiftool-package.scm new file mode 100644 index 0000000..007a323 --- /dev/null +++ b/.guix/emacs-exiftool-package.scm @@ -0,0 +1,40 @@ +;;; exiftool.el --- Elisp wrapper around ExifTool +;;; Copyright © 2023 Arun Isaac <arunisaac@systemreboot.net> +;;; +;;; This file is part of exiftool.el. +;;; +;;; exiftool.el is free software: you can redistribute it and/or +;;; modify it under the terms of the GNU General Public License as +;;; published by the Free Software Foundation, either version 3 of the +;;; License, or (at your option) any later version. +;;; +;;; exiftool.el is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +;;; General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with exiftool.el. If not, see +;;; <https://www.gnu.org/licenses/>. + +(define-module (emacs-exiftool-package) + #:use-module ((gnu packages emacs-xyz) #:prefix guix:) + #:use-module (guix gexp) + #:use-module (guix git-download) + #:use-module (guix packages) + #:use-module (guix utils)) + +(define-public emacs-exiftool + (package + (inherit guix:emacs-exiftool) + (source (local-file ".." + "emacs-exiftool-checkout" + #:recursive? #t + #:select? (or (git-predicate (dirname (current-source-directory))) + (const #t)))) + (arguments + (substitute-keyword-arguments (package-arguments guix:emacs-exiftool) + ((#:test-command _ #~'()) + #~(list "make")))))) + +emacs-exiftool diff --git a/guix.scm b/guix.scm new file mode 120000 index 0000000..44553c7 --- /dev/null +++ b/guix.scm @@ -0,0 +1 @@ +.guix/emacs-exiftool-package.scm
\ No newline at end of file |