gnu: libgpg-error: Update to 1.61.

* gnu/packages/gnupg.scm (libgpg-error): Update to 1.61.
[arguments]: Fix indent.

Change-Id: I292440ac19bc08a770a6dd40e6e81756bf22c7d1

1 files changed, 44 insertions, 44 deletions

diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm
index ffbf07972eb..ca43c5e763e 100644
--- a/gnu/packages/gnupg.scm
+++ b/gnu/packages/gnupg.scm
@@ -102,7 +102,7 @@
 (define-public libgpg-error
   (package
     (name "libgpg-error")
-    (version "1.51")
+    (version "1.61")
     (source
      (origin
       (method url-fetch)
@@ -110,55 +110,55 @@
                           version ".tar.bz2"))
       (sha256
        (base32
-        "1cp64xa58977fysj1z1rgj60qxbjkzqpkpww6raysgmrnqnin3xy"))))
+        "14sw73317735xq991sz0x5jqkr12y6572aw3mbwg8m635czl31bs"))))
     (build-system gnu-build-system)
     (arguments
      (list
       #:configure-flags #~(list "--enable-install-gpg-error-config")
       #:phases
       #~(modify-phases %standard-phases
-      #$@(cond
-          ((%current-target-system)
-           ;; If this is left out, some generated header
-           ;; files will be sprinkled with ‘\c’, which
-           ;; the compiler won't like.
-           #~((add-after 'unpack 'fix-gen-lock-obj.sh
-                (lambda _
-                  (substitute* "src/gen-lock-obj.sh"
-                    (("if test -n `echo -n`") "if ! test -n `echo -n`"))))
-              ;; When cross-compiling, some platform specific properties cannot
-              ;; be detected. Create a symlink to the appropriate platform
-              ;; file if required. Note that these platform files depend on
-              ;; both the operating system and architecture!
-              ;;
-              ;; See Cross-Compiling section at:
-              ;; https://github.com/gpg/libgpg-error/blob/master/README
-              (add-after 'unpack 'cross-symlinks
-                (lambda _
-                  (define (link triplet source)
-                    (symlink (string-append "lock-obj-pub." triplet ".h")
-                             (string-append "src/syscfg/lock-obj-pub."
-                                            source ".h")))
-                  #$(let ((target (%current-target-system)))
-                      (cond ((target-linux? target)
-                             (match (string-take target
-                                                 (string-index target #\-))
-                                    ("armhf"
-                                     `(link "arm-unknown-linux-gnueabi" "linux-gnu"))
-                                    ("mips64el"
-                                     `(link "mips-unknown-linux-gnu" "linux-gnu"))
-                                    ;; Don't always link to the "linux-gnu"
-                                    ;; configuration, as this is not correct for
-                                    ;; all architectures.
-                                    (_ #t)))
-                            (#t #t)))))))
-          ((system-hurd?)
-           #~((add-after 'unpack 'skip-tests
-                (lambda _
-                  (substitute* "tests/t-syserror.c"
-                    (("(^| )main *\\(.*" all)
-                     (string-append all "{\n  exit (77);//")))))))
-          (else #~())))))
+          #$@(cond
+              ((%current-target-system)
+               ;; If this is left out, some generated header
+               ;; files will be sprinkled with ‘\c’, which
+               ;; the compiler won't like.
+               #~((add-after 'unpack 'fix-gen-lock-obj.sh
+                    (lambda _
+                      (substitute* "src/gen-lock-obj.sh"
+                        (("if test -n `echo -n`") "if ! test -n `echo -n`"))))
+                  ;; When cross-compiling, some platform specific properties cannot
+                  ;; be detected. Create a symlink to the appropriate platform
+                  ;; file if required. Note that these platform files depend on
+                  ;; both the operating system and architecture!
+                  ;;
+                  ;; See Cross-Compiling section at:
+                  ;; https://github.com/gpg/libgpg-error/blob/master/README
+                  (add-after 'unpack 'cross-symlinks
+                    (lambda _
+                      (define (link triplet source)
+                        (symlink (string-append "lock-obj-pub." triplet ".h")
+                                 (string-append "src/syscfg/lock-obj-pub."
+                                                source ".h")))
+                      #$(let ((target (%current-target-system)))
+                          (cond ((target-linux? target)
+                                 (match (string-take target
+                                                     (string-index target #\-))
+                                   ("armhf"
+                                    `(link "arm-unknown-linux-gnueabi" "linux-gnu"))
+                                   ("mips64el"
+                                    `(link "mips-unknown-linux-gnu" "linux-gnu"))
+                                   ;; Don't always link to the "linux-gnu"
+                                   ;; configuration, as this is not correct for
+                                   ;; all architectures.
+                                   (_ #t)))
+                                (#t #t)))))))
+              ((system-hurd?)
+               #~((add-after 'unpack 'skip-tests
+                    (lambda _
+                      (substitute* "tests/t-syserror.c"
+                        (("(^| )main *\\(.*" all)
+                         (string-append all "{\n  exit (77);//")))))))
+              (else #~())))))
     (native-inputs (list gettext-minimal))
     (home-page "https://gnupg.org")
     (synopsis "Library of error values for GnuPG components")