From 77aff2b5d201a68542684aefb1fcf83b4d17490a Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Sun, 29 Jan 2023 01:00:00 +0100
Subject: gnu: papirus-icon-theme: Harden links before cache generation.

Output is identical.  This just feels moar correct.

* gnu/packages/gnome-xyz.scm (papirus-icon-theme)[arguments]: Run the
'halve-inode-consumption phase before the 'install one.
---
 gnu/packages/gnome-xyz.scm | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/gnome-xyz.scm b/gnu/packages/gnome-xyz.scm
index e1d0e5ec07..f25cf446d7 100644
--- a/gnu/packages/gnome-xyz.scm
+++ b/gnu/packages/gnome-xyz.scm
@@ -217,21 +217,20 @@ simple and consistent.")
          (delete 'bootstrap)
          (delete 'configure)
          (delete 'build)
-         (add-after 'install 'halve-inode-consumption
+         (add-before 'install 'halve-inode-consumption
            ;; This package uses over 100K inodes, which is a lot.  We can easily
            ;; halve that number by using (hard) links, to no ill effect.
            ;; See <https://logs.guix.gnu.org/guix/2023-01-31.log#171227>.
            ;; However, the source checkout will still use the full amount!
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let ((out (assoc-ref outputs "out"))
-                   (symlink? (lambda (_ stat)
+           (lambda _
+             (let ((symlink? (lambda (_ stat)
                                (eq? 'symlink (stat:type stat)))))
                (for-each (lambda (file)
                            (let ((target (canonicalize-path file)))
                              (when (eq? 'regular (stat:type (stat target)))
                                (delete-file file)
                                (link target file))))
-                         (find-files out symlink?))))))))
+                         (find-files "." symlink?))))))))
     (native-inputs
      (list `(,gtk+ "bin")))
     (home-page "https://git.io/papirus-icon-theme")
-- 
cgit v1.2.3

rch'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=da73727f1a1c49bd0b834d2d4da48d578062b0ae'>root</a>/<a href='/guix/log/configure.ac?id=da73727f1a1c49bd0b834d2d4da48d578062b0ae'>configure.ac</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/configure.ac?id=da73727f1a1c49bd0b834d2d4da48d578062b0ae&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2021-06-01 23:26:07 +0200'>2021-06-01</span></td><td><a href='/guix/commit/configure.ac?id=82d8ab01f5cb6d479e3b82c08067e2442ee7cad8'>maint: Require Guile 3.0.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-05-03 09:29:44 -0400'>2021-05-03</span></td><td><a href='/guix/commit/configure.ac?id=a23789bbbdd23b1130f0f2521ee8d68872b7fc2c'>nls: Do not update po files on first make invocation.</a><span class='msg-avail'>...</span></td><td>Julien Lepiller</td></tr>
<tr><td><span title='2021-04-25 14:34:09 +0200'>2021-04-25</span></td><td><a href='/guix/commit/configure.ac?id=c59cc2383d6620f6ebbed80ce1feecae41a64d69'>import: Remove Nix importer.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-04-23 23:39:33 -0400'>2021-04-23</span></td><td><a href='/guix/commit/configure.ac?id=ee990899bd54e5c7c9193a75b8f713831b979e9f'>build: Add a check for Guile-Lib.</a><span class='msg-avail'>...</span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2021-03-17 12:03:23 +0100'>2021-03-17</span></td><td><a href='/guix/commit/configure.ac?id=62a091368df3bab499142d06f5114a73915c71f2'>maint: Check whether Guile-zlib is recent enough.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-02-04 09:23:39 +0100'>2021-02-04</span></td><td><a href='/guix/commit/configure.ac?id=55daad123e896c0e83361496cf49625289ee3571'>build: Add '--with-channel-commit' and related configure flags.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-12-27 17:12:06 +0100'>2020-12-27</span></td><td><a href='/guix/commit/configure.ac?id=a016a451c41486d8f8277742d47157cc2597d5bc'>maint: Remove unused '--with-nix-prefix' configure option.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-12-19 23:25:01 +0100'>2020-12-19</span></td><td><a href='/guix/commit/configure.ac?id=4f621a2b003e85d480999e4d0630e9dc3de85bc3'>maint: Require Guile &gt;= 2.2.6.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-12-11 19:06:53 +0100'>2020-12-11</span></td><td><a href='/guix/commit/configure.ac?id=dbdae9f96f11a006993b659e0e7fd5cbf467f844'>maint: Avoid macros obsolete in Autoconf 2.70.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-11-29 19:22:05 +0100'>2020-11-29</span></td><td><a href='/guix/commit/configure.ac?id=35a32fefb4695442265809805145b7a262ae4988'>Make "guile-avahi" dependency optional.</a><span class='msg-avail'>...</span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2020-11-29 15:08:26 +0100'>2020-11-29</span></td><td><a href='/guix/commit/configure.ac?id=375cc7dea20da7117c9459e4a4d15144095e015b'>Add Avahi support.</a><span class='msg-avail'>...</span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2020-10-22 17:10:25 +0200'>2020-10-22</span></td><td><a href='/guix/commit/configure.ac?id=59bb1ae3a9aeae75a75b20090253613a7a8800d8'>git: Require Guile-Git 0.3.0 or later.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>