diff options
Diffstat (limited to 'gnu/packages/golang-build.scm')
| -rw-r--r-- | gnu/packages/golang-build.scm | 33 |
1 files changed, 4 insertions, 29 deletions
diff --git a/gnu/packages/golang-build.scm b/gnu/packages/golang-build.scm index 70d99a41a77..d49aab3c8f5 100644 --- a/gnu/packages/golang-build.scm +++ b/gnu/packages/golang-build.scm | |||
| @@ -1555,17 +1555,9 @@ Go programming language.") | |||
| 1555 | (file-name (git-file-name name version)) | 1555 | (file-name (git-file-name name version)) |
| 1556 | (sha256 | 1556 | (sha256 |
| 1557 | (base32 "0sjvngpahkb5x573i855fjlb1fdmr6n269nmb5xxnbabjb27mnvg")) | 1557 | (base32 "0sjvngpahkb5x573i855fjlb1fdmr6n269nmb5xxnbabjb27mnvg")) |
| 1558 | (modules '((guix build utils) | 1558 | (modules '((guix build utils))) |
| 1559 | (ice-9 ftw) | ||
| 1560 | (srfi srfi-26))) | ||
| 1561 | (snippet | 1559 | (snippet |
| 1562 | #~(begin | 1560 | #~(begin |
| 1563 | (define (delete-all-but directory . preserve) | ||
| 1564 | (with-directory-excursion directory | ||
| 1565 | (let* ((pred (negate (cut member <> | ||
| 1566 | (cons* "." ".." preserve)))) | ||
| 1567 | (items (scandir "." pred))) | ||
| 1568 | (for-each (cut delete-file-recursively <>) items)))) | ||
| 1569 | (delete-all-but "go" "expect") | 1561 | (delete-all-but "go" "expect") |
| 1570 | (delete-all-but "." "go"))))) | 1562 | (delete-all-but "." "go"))))) |
| 1571 | (build-system go-build-system) | 1563 | (build-system go-build-system) |
| @@ -1595,17 +1587,9 @@ Go source code (including go.mod and go.work files) as test expectations.") | |||
| 1595 | (file-name (git-file-name name version)) | 1587 | (file-name (git-file-name name version)) |
| 1596 | (sha256 | 1588 | (sha256 |
| 1597 | (base32 "0sjvngpahkb5x573i855fjlb1fdmr6n269nmb5xxnbabjb27mnvg")) | 1589 | (base32 "0sjvngpahkb5x573i855fjlb1fdmr6n269nmb5xxnbabjb27mnvg")) |
| 1598 | (modules '((guix build utils) | 1590 | (modules '((guix build utils))) |
| 1599 | (ice-9 ftw) | ||
| 1600 | (srfi srfi-26))) | ||
| 1601 | (snippet | 1591 | (snippet |
| 1602 | #~(begin | 1592 | #~(begin |
| 1603 | (define (delete-all-but directory . preserve) | ||
| 1604 | (with-directory-excursion directory | ||
| 1605 | (let* ((pred (negate (cut member <> | ||
| 1606 | (cons* "." ".." preserve)))) | ||
| 1607 | (items (scandir "." pred))) | ||
| 1608 | (for-each (cut delete-file-recursively <>) items)))) | ||
| 1609 | (delete-all-but "go" "packages") | 1593 | (delete-all-but "go" "packages") |
| 1610 | (delete-all-but "go/packages" "packagestest") | 1594 | (delete-all-but "go/packages" "packagestest") |
| 1611 | (delete-all-but "." "go"))))) | 1595 | (delete-all-but "." "go"))))) |
| @@ -1638,18 +1622,9 @@ tools on.") | |||
| 1638 | (file-name (git-file-name name version)) | 1622 | (file-name (git-file-name name version)) |
| 1639 | (sha256 | 1623 | (sha256 |
| 1640 | (base32 "1blk22apy424j9v58lfy4pxnrgh93yqchqhxsnf78dmx4vx5yi9r")) | 1624 | (base32 "1blk22apy424j9v58lfy4pxnrgh93yqchqhxsnf78dmx4vx5yi9r")) |
| 1641 | (modules '((guix build utils) | 1625 | (modules '((guix build utils))) |
| 1642 | (ice-9 ftw) | ||
| 1643 | (srfi srfi-26))) | ||
| 1644 | (snippet | 1626 | (snippet |
| 1645 | #~(begin | 1627 | #~(begin (delete-all-but "." "godoc"))))) |
| 1646 | (define (delete-all-but directory . preserve) | ||
| 1647 | (with-directory-excursion directory | ||
| 1648 | (let* ((pred (negate (cut member <> | ||
| 1649 | (cons* "." ".." preserve)))) | ||
| 1650 | (items (scandir "." pred))) | ||
| 1651 | (for-each (cut delete-file-recursively <>) items)))) | ||
| 1652 | (delete-all-but "." "godoc"))))) | ||
| 1653 | (build-system go-build-system) | 1628 | (build-system go-build-system) |
| 1654 | (arguments | 1629 | (arguments |
| 1655 | (list | 1630 | (list |