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'.
This commit is contained in:
Ludovic Courtès 2022-09-07 15:55:20 +02:00
parent 38e8373830
commit e7b8e83670
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -74,7 +74,7 @@ (define $PATH
(variable "PATH") (variable "PATH")
(files '("bin" "sbin")))) (files '("bin" "sbin"))))
(define-public $GUIX_EXTENSIONS_PATH (define $GUIX_EXTENSIONS_PATH
;; 'GUIX_EXTENSIONS_PATH' is used by Guix to locate extension commands. ;; '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 ;; 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, ;; 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, ;; Additionally, the 'native-search-paths' field is not thunked,
;; so doing (package-native-search-paths openssl) ;; so doing (package-native-search-paths openssl)
;; could cause import cycle issues. ;; could cause import cycle issues.
(define-public $SSL_CERT_DIR (define $SSL_CERT_DIR
(search-path-specification (search-path-specification
(variable "SSL_CERT_DIR") (variable "SSL_CERT_DIR")
(separator #f) ;single entry (separator #f) ;single entry
(files '("etc/ssl/certs")))) (files '("etc/ssl/certs"))))
(define-public $SSL_CERT_FILE (define $SSL_CERT_FILE
(search-path-specification (search-path-specification
(variable "SSL_CERT_FILE") (variable "SSL_CERT_FILE")
(file-type 'regular) (file-type 'regular)