From c2f47c968ea46051353a82af7cade23cb3b32219 Mon Sep 17 00:00:00 2001
From: Bruno Victal <mirai@makinata.eu>
Date: Thu, 5 Jan 2023 12:38:23 +0000
Subject: gnu: Remove tegaki package leftovers.
Leftovers from ed3c97f53ef5d60f103b93d15ccce5db052bfad1.
* gnu/packages/languages.scm (tegaki-release-uri)
(remove-pre-compiled-files)
(remove-pre-compiled-files-modules): Delete variables.
Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
---
gnu/packages/language.scm | 23 -----------------------
1 file changed, 23 deletions(-)
(limited to 'gnu')
diff --git a/gnu/packages/language.scm b/gnu/packages/language.scm
index 937954a1ad..b29ed9c013 100644
--- a/gnu/packages/language.scm
+++ b/gnu/packages/language.scm
@@ -835,29 +835,6 @@ string can be easily inferred by a human just by reading the identifier.")
done by Gudrun Putze-Meier.")
(license license:perl-license)))
-(define* (tegaki-release-uri proj version
- #:optional (ext "tar.gz"))
- (string-append "https://github.com/tegaki/tegaki/releases/download"
- "/v" version "/" proj "-" version "." ext))
-
-(define remove-pre-compiled-files
- (lambda exts
- "Return snippet for removing pre-compiled files matching one of the
-extensions in EXTS."
- `(begin (for-each delete-file
- (find-files "."
- (lambda (name _)
- (any (cut string-suffix? <> name)
- (map (cut string-append "." <>)
- ',exts)))))
- #t)))
-
-;;; modules required for the above snippet
-(define remove-pre-compiled-files-modules
- '((guix build utils)
- (srfi srfi-1)
- (srfi srfi-26)))
-
(define-public link-grammar
(package
(name "link-grammar")
--
cgit v1.2.3