amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: lepton-eda: Update to 1.9.9-20191003.

Browse source 
* gnu/packages/engineering.scm (lepton-eda): Update to 1.9.9-20191003.
[inputs]: Do not inherit from geda-gaf; replace guile-2.0 with guile-2.2.
[arguments]: Add phase to compile Scheme files.
This commit is contained in:
Ricardo Wurmus 2019-12-20 09:27:49 +01:00
parent 0e773da02d
commit ef0ef831bc
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 21 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

24
gnu/packages/engineering.scm
View file

@ -248,14 +248,14 @@ utilities.")
(package (package
(inherit geda-gaf) (inherit geda-gaf)
(name "lepton-eda") (name "lepton-eda")
(version "1.9.5-20180820") (version "1.9.9-20191003")
(home-page "https://github.com/lepton-eda/lepton-eda") (home-page "https://github.com/lepton-eda/lepton-eda")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (url home-page) (commit version))) (uri (git-reference (url home-page) (commit version)))
(sha256 (sha256
(base32 (base32
"1ayaccvw18zh4g7a4x5jf6yxkphi5xafb0hpc732g59qkgwfcmlr")) "08cc3zfk84qq9mrkc9pp4r9jlavvm01wwy0yd9frql68w2zw6mip"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(native-inputs (native-inputs
`(("autoconf" ,autoconf) `(("autoconf" ,autoconf)
@ -266,7 +266,14 @@ utilities.")
("groff" ,groff) ("groff" ,groff)
("which" ,which) ("which" ,which)
,@(package-native-inputs geda-gaf))) ,@(package-native-inputs geda-gaf)))
;; For now it's Guile 2.0, not 2.2. (inputs
`(("glib" ,glib)
("gtk" ,gtk+-2)
("guile" ,guile-2.2)
("desktop-file-utils" ,desktop-file-utils)
("shared-mime-info" ,shared-mime-info)
("m4" ,m4)
("pcb" ,pcb)))
(arguments (arguments
(substitute-keyword-arguments (package-arguments geda-gaf) (substitute-keyword-arguments (package-arguments geda-gaf)
((#:configure-flags flags ''()) ((#:configure-flags flags ''())
@ -300,6 +307,17 @@ utilities.")
,(string-take version ,(string-take version
(string-index version #\-))) (string-index version #\-)))
(format port "#define PACKAGE_GIT_COMMIT \"cabbag3\"~%"))) (format port "#define PACKAGE_GIT_COMMIT \"cabbag3\"~%")))
#t))
(add-after 'install 'compile-scheme-files
(lambda* (#:key outputs #:allow-other-keys)
(invoke "make" "precompile")
(for-each (lambda (program)
(wrap-program program
`("GUILE_LOAD_COMPILED_PATH" ":" prefix
(,(string-append (assoc-ref outputs "out")
"/share/lepton-eda/ccache/")))))
(find-files (string-append (assoc-ref outputs "out") "/bin")
".*"))
#t)))))) #t))))))
(description (description
"Lepton EDA ia an @dfn{electronic design automation} (EDA) tool set "Lepton EDA ia an @dfn{electronic design automation} (EDA) tool set