diff options
| author | Bruno Victal <mirai@makinata.eu> | 2023-02-27 00:11:44 +0000 |
|---|---|---|
| committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-04-12 08:29:21 -0400 |
| commit | 0141e00b1481b1a672facff58fd971d0077edb51 (patch) | |
| tree | bebbb88efa470a26d43d93c8a6e723d89f70e142 /guix | |
| parent | a1fa23014718a63dca400f5db7800b72024cee28 (diff) | |
packages: Remove 'origin-sha256' procedure.
* guix/packages.scm (origin-sha256): Remove procedure.
* tests/import-utils.scm (test-import-utils)
[alist->package with explicit source]: Use content-hash-value.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'guix')
| -rw-r--r-- | guix/packages.scm | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/guix/packages.scm b/guix/packages.scm index 4c0c194652..2d33212f44 100644 --- a/guix/packages.scm +++ b/guix/packages.scm @@ -74,7 +74,6 @@ origin-uri origin-method origin-hash - origin-sha256 ;deprecated origin-file-name origin-actual-file-name origin-patches @@ -346,14 +345,6 @@ as base32. Otherwise, it must be a bytevector." specifications to 'hash'." (origin-compatibility-helper (fields ...) ())) -(define-deprecated (origin-sha256 origin) - origin-hash - (let ((hash (origin-hash origin))) - (unless (eq? (content-hash-algorithm hash) 'sha256) - (raise (condition (&message - (message (G_ "no SHA256 hash for origin")))))) - (content-hash-value hash))) - (define (print-origin origin port) "Write a concise representation of ORIGIN to PORT." (match origin |