From 6193d9871767694541a5f86e6a8fbcc520812186 Mon Sep 17 00:00:00 2001
From: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Date: Mon, 26 Sep 2022 20:01:30 -0400
Subject: gnu: opendjk11: Improve regular expressions.
* gnu/packages/java.scm (openjdk11)
[phases]{strip-archive-timestamps}: Replace '.*.' with '\\.' in regexps.
---
gnu/packages/java.scm | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
(limited to 'gnu/packages/java.scm')
diff --git a/gnu/packages/java.scm b/gnu/packages/java.scm
index 79b73a19e3..424ccc5862 100644
--- a/gnu/packages/java.scm
+++ b/gnu/packages/java.scm
@@ -1946,7 +1946,7 @@ (define (icedtea-or-openjdk? path)
(invoke "unzip" archive))
(delete-file archive)
(for-each (compose repack-archive canonicalize-path)
- (find-files dir "(ct.sym|.*.jar)$"))
+ (find-files dir "(ct.sym|\\.jar)$"))
(let ((reset-file-timestamp
(lambda (file)
(let ((s (lstat file)))
@@ -1959,9 +1959,9 @@ (define (icedtea-or-openjdk? path)
(let ((files (find-files "." ".*" #:directories? #t)))
(apply invoke "zip" "-0" "-X" archive files)))))))
(for-each repack-archive
- (find-files #$output:doc ".*.zip$"))
+ (find-files #$output:doc "\\.zip$"))
(for-each repack-archive
- (find-files #$output:jdk ".*.(zip|jar|diz)$"))
+ (find-files #$output:jdk "\\.(zip|jar|diz)$"))
(repack-archive (string-append #$output:jdk "/lib/ct.sym"))
(let ((repack-jmod
(lambda (file-name)
@@ -1992,7 +1992,7 @@ (define (icedtea-or-openjdk? path)
file temp-file
(stat:size (stat temp-file)) 0)))))))))))))
(for-each repack-jmod
- (find-files #$output:jdk ".*.jmod$"))))))
+ (find-files #$output:jdk "\\.jmod$"))))))
(add-after 'install 'remove-timestamp-from-api-summary
(lambda _
(substitute* (string-append #$output:doc
--
cgit v1.2.3