summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorAndreas Enge <andreas@enge.fr>2025-07-19 12:27:38 +0200
committerAndreas Enge <andreas@enge.fr>2025-07-19 12:28:55 +0200
commit2dc9927258bc9f31cb4225eedf36f8f011982608 (patch)
tree73f308d8dcf6389af95efd7d42acf578d68ec2fc /gnu
parent0bae6e35861e8a8d7d4ab90bdcadcf03ad9734fc (diff)
gnu: perl-dbd-mysql: Fix build with gcc@14.
* gnu/packages/databases.scm (perl-dbd-mysql)[arguments]<#:phases>: {'add-cflags}: New phase. {'skip-library-detection}: Drop #t. Change-Id: I07e98481d9b9dc8bdc4e3bdf24c9c7b7d63d2bcf
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/databases.scm37
1 files changed, 22 insertions, 15 deletions
diff --git a/gnu/packages/databases.scm b/gnu/packages/databases.scm
index 2e2fe25221e..51b2224ad90 100644
--- a/gnu/packages/databases.scm
+++ b/gnu/packages/databases.scm
@@ -2630,21 +2630,28 @@ automatically set update and create date and time based fields in a table.")
(base32 "0y4djb048i09dk19av7mzfb3khr72vw11p3ayw2p82jsy4gm8j2g"))))
(build-system perl-build-system)
(arguments
- `(#:phases
- (modify-phases %standard-phases
- (add-before 'configure 'skip-library-detection
- ;; Avoid dependencies on perl-devel-checklib, openssl, and zlib. They
- ;; are really only needed for the test suite; their absence does not
- ;; affect the build or the end result.
- (lambda _
- (substitute* "Makefile.PL"
- (("use Devel::CheckLib;" match)
- (string-append "# " match))
- (("assert_lib")
- "print"))
- #t)))
- ;; Tests require running MySQL server.
- #:tests? #f))
+ (list
+ ;; Tests require running MySQL server.
+ #:tests? #f
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'configure 'add-cflags
+ (lambda _
+ (substitute* "Makefile"
+ (("OPTIMIZE = -O2")
+ (string-append "OPTIMIZE = -O2 "
+ "-Wno-error=incompatible-pointer-types "
+ "-Wno-error=implicit-function-declaration")))))
+ (add-before 'configure 'skip-library-detection
+ ;; Avoid dependencies on perl-devel-checklib, openssl, and zlib. They
+ ;; are really only needed for the test suite; their absence does not
+ ;; affect the build or the end result.
+ (lambda _
+ (substitute* "Makefile.PL"
+ (("use Devel::CheckLib;" match)
+ (string-append "# " match))
+ (("assert_lib")
+ "print")))))))
(propagated-inputs
`(("perl-dbi" ,perl-dbi)
("mysql" ,mariadb "lib")