From e7b8e836709528bde663bff454d97cc3e1ec3994 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Wed, 7 Sep 2022 15:55:20 +0200 Subject: [PATCH] search-paths: Remove redundant uses of 'define-public'. * guix/search-paths.scm ($GUIX_EXTENSIONS_PATH, $SSL_CERT_DIR, $SSL_CERT_FILE): Use 'define', not 'define-public'. --- guix/search-paths.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/guix/search-paths.scm b/guix/search-paths.scm index 5a0cddac8f..9177a791e3 100644 --- a/guix/search-paths.scm +++ b/guix/search-paths.scm @@ -74,7 +74,7 @@ (define $PATH (variable "PATH") (files '("bin" "sbin")))) -(define-public $GUIX_EXTENSIONS_PATH +(define $GUIX_EXTENSIONS_PATH ;; 'GUIX_EXTENSIONS_PATH' is used by Guix to locate extension commands. ;; Like 'PATH', it's not attached to any package, so that users don't have ;; to install the 'guix' package (which is not supposed to be installed, @@ -94,13 +94,13 @@ (define-public $GUIX_EXTENSIONS_PATH ;; Additionally, the 'native-search-paths' field is not thunked, ;; so doing (package-native-search-paths openssl) ;; could cause import cycle issues. -(define-public $SSL_CERT_DIR +(define $SSL_CERT_DIR (search-path-specification (variable "SSL_CERT_DIR") (separator #f) ;single entry (files '("etc/ssl/certs")))) -(define-public $SSL_CERT_FILE +(define $SSL_CERT_FILE (search-path-specification (variable "SSL_CERT_FILE") (file-type 'regular)