From 4b0f2ef743b47d8eab492151db3ae0541e808854 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 27 Jun 2015 21:37:50 +0200 Subject: [PATCH] gnu: qt-4: Remove reference from "out" to "doc". * gnu/packages/qt.scm (qt-4)[arguments]: Remove '-docdir' configure flag. Add 'move-doc' phase. --- gnu/packages/qt.scm | 22 ++++++++++++++++++++-- 1 file changed, 20 insertions(+), 2 deletions(-) diff --git a/gnu/packages/qt.scm b/gnu/packages/qt.scm index 0040b5f62e..208e2ba23a 100644 --- a/gnu/packages/qt.scm +++ b/gnu/packages/qt.scm @@ -264,7 +264,9 @@ developers using C++ or QML, a CSS & JavaScript like language.") "./configure" "-verbose" "-prefix" out - "-docdir" (string-append doc "/share/doc/qt-" ,version) + ;; Note: Don't pass '-docdir' since 'qmake' and + ;; libQtCore would record its value, thereby defeating + ;; the whole point of having a separate output. "-datadir" (string-append out "/share/qt-" ,version "/data") "-importdir" (string-append out "/lib/qt-4" @@ -296,7 +298,23 @@ developers using C++ or QML, a CSS & JavaScript like language.") "-no-sse4.1" "-no-sse4.2" "-no-avx" - "-no-neon")))))))))) + "-no-neon"))))) + (add-after + 'install 'move-doc + (lambda* (#:key outputs #:allow-other-keys) + ;; Because of qt4-documentation-path.patch, documentation ends up + ;; being installed in OUT. Move it to the right place. + (let* ((out (assoc-ref outputs "out")) + (doc (assoc-ref outputs "doc")) + (olddoc (string-append out "/doc")) + (docdir (string-append doc "/share/doc/qt-" ,version))) + (mkdir-p (dirname docdir)) + + ;; Note: We can't use 'rename-file' here because OUT and DOC are + ;; different "devices" due to bind-mounts. + (copy-recursively olddoc docdir) + (delete-file-recursively olddoc) + #t)))))))) (define-public python-sip (package