gnu: Add sng.

* gnu/packages/images (sng): New variable.
* gnu/packages/package-management (diffoscope)[native-inputs]: Add sng.
master
Vagrant Cascadian 2019-09-06 16:48:40 -07:00 committed by Vagrant Cascadian
parent 68fea604b0
commit d54ca1cd4d
No known key found for this signature in database
GPG Key ID: DC518FC87F9716AA
2 changed files with 40 additions and 0 deletions

View File

@ -1836,3 +1836,42 @@ identical visual appearance.")
to the standard output. It works well together with grim.")
;; MIT license.
(license license:expat)))
(define-public sng
(package
(name "sng")
(version "1.1.0")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://sourceforge/sng/sng-"
version ".tar.gz"))
(sha256
(base32 "06a6ydvx9xb3vxvrzdrg3hq0rjwwj9ibr7fyyxjxq6qx1j3mb70i"))))
(build-system gnu-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(add-before 'check 'link-pngsuite
;; tests expect pngsuite in source dir
(lambda* (#:key inputs #:allow-other-keys)
(symlink (assoc-ref inputs "pngsuite") "pngsuite")
#t)))
#:configure-flags
(list (string-append "--with-rgbtxt="
(assoc-ref %build-inputs "xorg-rgb")
"/share/X11/rgb.txt"))))
(inputs `(("xorg-rgb" ,xorg-rgb)
("libpng" ,libpng)))
(native-inputs `(("pngsuite" ,pngsuite)))
(home-page "http://sng.sourceforge.net")
(synopsis "Markup language for representing PNG contents")
(description "SNG (Scriptable Network Graphics) is a minilanguage designed
specifically to represent the entire contents of a PNG (Portable Network
Graphics) file in an editable form. Thus, SNGs representing elaborate
graphics images and ancillary chunk data can be readily generated or modified
using only text tools.
SNG is implemented by a compiler/decompiler called sng that
losslessly translates between SNG and PNG.")
(license license:zlib)))

View File

@ -660,6 +660,7 @@ transactions from C or Python.")
("openssh" ,openssh)
("poppler" ,poppler)
("rpm" ,rpm)
("sng" ,sng)
("sqlite" ,sqlite)
("squashfs-tools" ,squashfs-tools)
("tcpdump" ,tcpdump)