~ruther/guix-local: gnu: tzdata: Fix dangling symbolic link.

12b85b378777393bda24edb30cd974e4a0591e0f — John Darrington 9 years ago 1d8de18

gnu: tzdata: Fix dangling symbolic link.

* gnu/packages/base.scm (tzdata)[arguments]: Replace dangling symbolic link
with the correct path.

patch browse .tar.gz

1 files changed, 3 insertions(+), 3 deletions(-)

M gnu/packages/base.scm

M gnu/packages/base.scm => gnu/packages/base.scm +3 -3

@@ 960,11 960,11 @@ command.")
          (lambda* (#:key outputs #:allow-other-keys)
            ;; Move data in the right place.
            (let ((out (assoc-ref outputs "out")))
-             (copy-recursively (string-append out "/share/zoneinfo-posix")
-                               (string-append out "/share/zoneinfo/posix"))
+             (symlink (string-append out "/share/zoneinfo")
+                      (string-append out "/share/zoneinfo/posix"))
+             (delete-file-recursively (string-append out "/share/zoneinfo-posix"))
              (copy-recursively (string-append out "/share/zoneinfo-leaps")
                                (string-append out "/share/zoneinfo/right"))
-             (delete-file-recursively (string-append out "/share/zoneinfo-posix"))
              (delete-file-recursively (string-append out "/share/zoneinfo-leaps"))))
          (alist-delete 'configure %standard-phases)))))
     (inputs `(("tzcode" ,(origin