announce-gen: Fix bug when accessing symlinks.

* build-aux/announce-gen (sizes): Pass the option -L to 'du'.

diff --git a/ChangeLog b/ChangeLog
index 9662b37341c54fb714b416a758d1d8184db2f868..6aee1568e870f8c2c13c09f871a08f8290ac304c 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2024-12-01  Bruno Haible  <bruno@clisp.org>
+
+       announce-gen: Fix bug when accessing symlinks.
+       * build-aux/announce-gen (sizes): Pass the option -L to 'du'.
+
 2024-11-26  Bruno Haible  <bruno@clisp.org>
 
        fpurge: Improve configure test.

diff --git a/build-aux/announce-gen b/build-aux/announce-gen
index 4b7ba07165a57755d37e517c9de79a143a1b3854..be17541c8954d1cdabb8edd4dad12365b6ca5082 100755 (executable)
--- a/build-aux/announce-gen
+++ b/build-aux/announce-gen
@@ -124,7 +124,7 @@ sub sizes (@)
   my %res;
   foreach my $f (@file)
     {
-      my $cmd = "du -h $f";
+      my $cmd = "du -h -L $f";
       my $t = `$cmd`;
       # FIXME-someday: give a better diagnostic, a la $PROCESS_STATUS
       $@