me/guix
Archived
1
0
Fork 0
Code Activity

gnu: libreoffice: Add 'libreoffice' symlink.

Browse source 
* gnu/packages/libreoffice.scm (libreoffice)[arguments]: Adjust
'bin-install' phase to make 'libreoffice' symlink along with 'soffice'.

Co-authored-by: ng0 <ng0@libertad.pw>
This commit is contained in:
Alex Kost 2016-12-08 12:25:18 +03:00
parent a9c61335c9
commit cb72d34348
No known key found for this signature in database
GPG key ID: 82460C082A0EE98F
1 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gnu/packages/libreoffice.scm
View file

@ -820,14 +820,16 @@ and to return information on pronunciations, meanings and synonyms.")
(("./configure") "$(CONFIG_SHELL) ./configure" )) (("./configure") "$(CONFIG_SHELL) ./configure" ))
#t))) #t)))
(add-after 'install 'bin-install (add-after 'install 'bin-install
;; Create a symlink bin/soffice to the executable script. ;; Create 'soffice' and 'libreoffice' symlinks to the executable
;; script.
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin"))) (bin (string-append out "/bin"))
(soffice (string-append
out "/lib/libreoffice/program/soffice")))
(mkdir bin) (mkdir bin)
(symlink (symlink soffice (string-append bin "/soffice"))
(string-append out "/lib/libreoffice/program/soffice") (symlink soffice (string-append bin "/libreoffice")))
(string-append bin "/soffice")))
#t))) #t)))
#:configure-flags #:configure-flags
(list (list