guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

02/03: gnu: sharutils: Remove false comment.


From: Efraim Flashner
Subject: 02/03: gnu: sharutils: Remove false comment.
Date: Sat, 10 Nov 2018 13:19:12 -0500 (EST)

efraim pushed a commit to branch core-updates
in repository guix.

commit 211db9caf7ffdaa9f2abc7d6216f239f96312545
Author: Efraim Flashner <address@hidden>
Date:   Sat Nov 10 20:14:36 2018 +0200

    gnu: sharutils: Remove false comment.
    
    This is a follow-up to b50d58b3445a85bf4395e2b767da10c2e3438902.
    
    * gnu/packages/compression.scm (sharutils)[source]: This snippet is, in
    fact, a snippet.
---
 gnu/packages/compression.scm | 29 +++++++++++++----------------
 1 file changed, 13 insertions(+), 16 deletions(-)

diff --git a/gnu/packages/compression.scm b/gnu/packages/compression.scm
index aa47fef..5b09cb5 100644
--- a/gnu/packages/compression.scm
+++ b/gnu/packages/compression.scm
@@ -598,22 +598,19 @@ decompressors when faced with corrupted input.")
       (sha256
        (base32
         "16isapn8f39lnffc3dp4dan05b7x6mnc76v6q5nn8ysxvvvwy19b"))
-             (modules '((guix build utils)))
-             (snippet
-              '(begin
-                 ;; Adjust the bundled gnulib to work with glibc 2.28.  See 
e.g.
-                 ;; "m4-gnulib-libio.patch".  This is a phase rather than patch
-                 ;; or snippet to work around <https://bugs.gnu.org/32347>.
-                 (substitute* (find-files "lib" "\\.c$")
-                   (("#if defined _IO_ftrylockfile")
-                    "#if defined _IO_EOF_SEEN"))
-                 (substitute* "lib/stdio-impl.h"
-                   (("^/\\* BSD stdio derived implementations")
-                    (string-append "#if !defined _IO_IN_BACKUP && defined 
_IO_EOF_SEEN\n"
-                                   "# define _IO_IN_BACKUP 0x100\n"
-                                   "#endif\n\n"
-                                   "/* BSD stdio derived implementations")))
-                 #t))))
+      (modules '((guix build utils)))
+      (snippet
+       '(begin
+          (substitute* (find-files "lib" "\\.c$")
+            (("#if defined _IO_ftrylockfile")
+             "#if defined _IO_EOF_SEEN"))
+          (substitute* "lib/stdio-impl.h"
+            (("^/\\* BSD stdio derived implementations")
+             (string-append "#if !defined _IO_IN_BACKUP && defined 
_IO_EOF_SEEN\n"
+                            "# define _IO_IN_BACKUP 0x100\n"
+                            "#endif\n\n"
+                            "/* BSD stdio derived implementations")))
+          #t))))
     (build-system gnu-build-system)
     (inputs
      `(("which" ,which)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]