1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
From: =?utf-8?b?VG9tbWkgSMO2eW7DpGzDpG5tYWE=?= <tommi.hoynalanmaa@iki.fi>
Date: Sat, 21 Oct 2023 18:29:24 +0300
Subject: get-library-path-from-env
---
cairo/config.scm.in | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/cairo/config.scm.in b/cairo/config.scm.in
index ab008fb..22b21fc 100644
--- a/cairo/config.scm.in
+++ b/cairo/config.scm.in
@@ -25,5 +25,9 @@
:export (*cairo-lib-path*
*cairo-documentation-path*))
-(define *cairo-lib-path* "@cairolibpath@")
+(define *cairo-lib-path*
+ (let ((str-path (getenv "GUILE_CAIRO_LIB_PATH")))
+ (if str-path
+ str-path
+ "@cairolibpath@")))
(define *cairo-documentation-path* "@cairodocumentationpath@")
|
