ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 13:28:12 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: astyle: Install header file, too.

Browse source 
* gnu/packages/code.scm(astyle)[arguments]<phases>{install-libs}: Also
  install header file.
This commit is contained in:
Hartmut Goebel 2019-11-06 22:50:31 +01:00
parent 62b8ae1a91
commit 0c6ab52243
No known key found for this signature in database
GPG key ID: 634A8DFFD3F631DF
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gnu/packages/code.scm
View file

@ -607,8 +607,9 @@ (define-public astyle
(lambda _ (chdir "build/gcc") #t)) (lambda _ (chdir "build/gcc") #t))
(add-after 'install 'install-libs (add-after 'install 'install-libs
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
;; Libraries are not installed by default ;; Libraries and includes are not installed by default
(let* ((output (assoc-ref outputs "out")) (let* ((output (assoc-ref outputs "out"))
(incdir (string-append output "/include"))
(libdir (string-append output "/lib"))) (libdir (string-append output "/lib")))
(define (make-so-link sofile strip-pattern) (define (make-so-link sofile strip-pattern)
(symlink (symlink
@ -616,6 +617,9 @@ (define (make-so-link sofile strip-pattern)
(regexp-substitute #f (regexp-substitute #f
(string-match strip-pattern sofile) (string-match strip-pattern sofile)
'pre))) 'pre)))
(mkdir-p incdir)
(copy-file "../../src/astyle.h"
(string-append incdir "/astyle.h"))
(mkdir-p libdir) (mkdir-p libdir)
(for-each (lambda (l) (for-each (lambda (l)
(copy-file (copy-file