ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-19 09:22:05 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: kdoctools: Use G-expressions.

Browse source 
* gnu/packages/kde-frameworks.scm (kdoctools)[arguments]:
Rewrite as G-expressions.

Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
This commit is contained in:
Zheng Junjie 2023-07-12 14:09:15 +08:00 committed by 宋文武
parent 16bea255c7
commit e6d22dfbe9
No known key found for this signature in database
GPG key ID: D415BF253B515976
1 changed files with 24 additions and 22 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

46
gnu/packages/kde-frameworks.scm
View file

@ -1705,28 +1705,30 @@ (define-public kdoctools
perl-uri perl-uri
qtbase-5)) qtbase-5))
(arguments (arguments
`(#:phases (list
(modify-phases %standard-phases #:phases
(add-after 'unpack 'cmake-find-docbook #~(modify-phases %standard-phases
(lambda* (#:key inputs #:allow-other-keys) (add-after 'unpack 'cmake-find-docbook
(substitute* (find-files "cmake" "\\.cmake$") (lambda* (#:key inputs #:allow-other-keys)
(("CMAKE_SYSTEM_PREFIX_PATH") (substitute* (find-files "cmake" "\\.cmake$")
"CMAKE_PREFIX_PATH")) (("CMAKE_SYSTEM_PREFIX_PATH")
(substitute* "cmake/FindDocBookXML4.cmake" "CMAKE_PREFIX_PATH"))
(("^.*xml/docbook/schema/dtd.*$") (substitute* "cmake/FindDocBookXML4.cmake"
"xml/dtd/docbook\n")) (("^.*xml/docbook/schema/dtd.*$")
(substitute* "cmake/FindDocBookXSL.cmake" "xml/dtd/docbook\n"))
(("^.*xml/docbook/stylesheet.*$") (substitute* "cmake/FindDocBookXSL.cmake"
(string-append "xml/xsl/docbook-xsl-" (("^.*xml/docbook/stylesheet.*$")
,(package-version docbook-xsl) "\n"))))) (string-append "xml/xsl/docbook-xsl-"
(add-after 'install 'add-symlinks #$(package-version docbook-xsl)
;; Some package(s) (e.g. kdelibs4support) refer to this locale by a "\n")))))
;; different spelling. (add-after 'install 'add-symlinks
(lambda* (#:key outputs #:allow-other-keys) ;; Some package(s) (e.g. kdelibs4support) refer to this locale by a
(let ((xsl (string-append (assoc-ref outputs "out") ;; different spelling.
"/share/kf5/kdoctools/customization/xsl/"))) (lambda* (#:key outputs #:allow-other-keys)
(symlink (string-append xsl "pt_br.xml") (let ((xsl (string-append (assoc-ref outputs "out")
(string-append xsl "pt-BR.xml")))))))) "/share/kf5/kdoctools/customization/xsl/")))
(symlink (string-append xsl "pt_br.xml")
(string-append xsl "pt-BR.xml"))))))))
(home-page "https://community.kde.org/Frameworks") (home-page "https://community.kde.org/Frameworks")
(synopsis "Create documentation from DocBook") (synopsis "Create documentation from DocBook")
(description "Provides tools to generate documentation in various format (description "Provides tools to generate documentation in various format