Subject: [PATCH] gnu: Remove tegaki package leftovers.

From: [email-masked]
Date: Thu, 5 Jan 2023 12:38:23 +0000

From: Bruno Victal <[email-masked]>

Leftovers from ed3c97f53ef5d60f103b93d15ccce5db052bfad1.

* gnu/packages/languages.scm (tegaki-release-uri)
(remove-pre-compiled-files)
(remove-pre-compiled-files-modules): Delete variables.
---
 gnu/packages/language.scm | 23 -----------------------
 1 file changed, 23 deletions(-)

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 @@ (define-public perl-text-german
 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")

base-commit: dc7eb6f07ae982b4c9d083cfb10f72cb031c0424
-- 
2.38.1