diff options
Diffstat (limited to 'vkraus/packages')
-rw-r--r-- | vkraus/packages/disfluid.scm | 54 |
1 files changed, 21 insertions, 33 deletions
diff --git a/vkraus/packages/disfluid.scm b/vkraus/packages/disfluid.scm index 8cf6dec..6ef4066 100644 --- a/vkraus/packages/disfluid.scm +++ b/vkraus/packages/disfluid.scm @@ -35,17 +35,17 @@ (define-public disfluid (package (name "disfluid") - (version "0.0.4-76-g5ecfa87") + (version "0.0.4-77-g66e9d84") (source (origin (method git-fetch) (uri (git-reference (url "https://labo.planete-kraus.eu/disfluid.git") (commit - "5ecfa87d6089a8a6ada4a1927b4e933756e79c7f"))) + "66e9d84aa0a20b4709e9aac13094fb4d6bc42851"))) (sha256 (base32 - "1g5a8zzmscm19ivxskwsl1syv900rllbkjq72imp8h3qvjbww7g7")))) + "0h0wklla13m7w5yg1g5wdl5q0n9vmw9kfafcarlwgzsnh8i77cr3")))) (build-system gnu-build-system) (arguments `(#:phases @@ -55,31 +55,19 @@ 'unpack 'fix-mtime (lambda _ - (use-modules (ice-9 ftw)) - (let ((disfluid-commit-date 1665915688)) - (let ((enter? (lambda (name stat result) #t)) - (leaf (lambda (name stat result) - (utime name - disfluid-commit-date - disfluid-commit-date))) - (down (lambda (name stat result) result)) - (up (lambda (name stat result) result)) - (skip (lambda (name stat result) result)) - (error (lambda (name stat errno result) result))) - (file-system-fold - enter? - leaf - down - up - skip - error - #t - "."))))) + (let ((disfluid-mtimes + '(("doc/disfluid.texi" . 1665915688)))) + (for-each + (lambda (fix-mtime) + (utime (car fix-mtime) + (cdr fix-mtime) + (cdr fix-mtime))) + disfluid-mtimes)))) (add-before 'bootstrap 'fix-hall.scm (lambda _ - (let ((disfluid-version "0.0.4-76-g5ecfa87")) + (let ((disfluid-version "0.0.4-77-g66e9d84")) (substitute* "hall.scm" (("SNAPSHOT") disfluid-version))))) @@ -177,15 +165,15 @@ "DISTCHECK_CONFIGURE_FLAGS=SHELL=~a" (search-input-file inputs "/bin/bash")))) (copy-file - "disfluid-0.0.4-76-g5ecfa87.tar.gz" - "/tmp/disfluid-0.0.4-76-g5ecfa87.tar.gz") + "disfluid-0.0.4-77-g66e9d84.tar.gz" + "/tmp/disfluid-0.0.4-77-g66e9d84.tar.gz") (with-directory-excursion "/tmp" (invoke "tar" "xf" - "disfluid-0.0.4-76-g5ecfa87.tar.gz") - (delete-file "disfluid-0.0.4-76-g5ecfa87.tar.gz") + "disfluid-0.0.4-77-g66e9d84.tar.gz") + (delete-file "disfluid-0.0.4-77-g66e9d84.tar.gz") (invoke "tar" "--sort=name" @@ -195,11 +183,11 @@ "--numeric-owner" "--pax-option=exthdr.name=%d/PaxHeaders/%f,delete=atime,delete=ctime" "-cf" - "disfluid-0.0.4-76-g5ecfa87.tar.gz" - "disfluid-0.0.4-76-g5ecfa87")) + "disfluid-0.0.4-77-g66e9d84.tar.gz" + "disfluid-0.0.4-77-g66e9d84")) (copy-file - "/tmp/disfluid-0.0.4-76-g5ecfa87.tar.gz" - "disfluid-0.0.4-76-g5ecfa87.tar.gz"))) + "/tmp/disfluid-0.0.4-77-g66e9d84.tar.gz" + "disfluid-0.0.4-77-g66e9d84.tar.gz"))) (add-after 'install 'install-complete-corresponding-source @@ -207,7 +195,7 @@ (let ((out (assoc-ref outputs "out"))) (mkdir-p (string-append out "/share/disfluid")) (copy-file - "disfluid-0.0.4-76-g5ecfa87.tar.gz" + "disfluid-0.0.4-77-g66e9d84.tar.gz" (string-append out "/share/disfluid/complete-corresponding-source.tar.gz")))))))) |