self: Remove leftover export. - guix - Wojtek's customized Guix

diff options

author	Ludovic Courtès <ludo@gnu.org>	2019-01-22 10:22:33 +0100
committer	Ludovic Courtès <ludo@gnu.org>	2019-01-22 23:04:05 +0100
commit	567f0d2590ede190ff8700d2fc3e2b4d4b72bcbe (patch)
tree	71ec805d3505e87847c2d9c553baa70969f34d22 /gnu/packages/wicd.scm
parent	323f250da7f74e331688775c1b9a951c4171d607 (diff)
download	guix-567f0d2590ede190ff8700d2fc3e2b4d4b72bcbe.tar.gz guix-567f0d2590ede190ff8700d2fc3e2b4d4b72bcbe.zip

self: Remove leftover export.

* guix/self.scm: Remove 'reload-guix' export.

Diffstat (limited to 'gnu/packages/wicd.scm')

0 files changed, 0 insertions, 0 deletions

n "converter/pbm") (drop "spottopgm" in "converter/pgm") (drop "ppmtopjxl" in "converter/ppm") ;; Remove timestamps from the generated code. (substitute* "buildtools/makepointerman" (("gmctime[(][)]") "\"Thu Jan 1 00:00:00 1970\"")) (substitute* "buildtools/stamp-date" (("^DATE=.*") "DATE=\"Thu Jan 01 00:00:00+0000 1970\"\n") (("^USER=.*") "USER=Guix\n")) #t)))) (build-system gnu-build-system) (inputs `(("ghostscript" ,ghostscript) ("libjpeg" ,libjpeg-turbo) ("libpng" ,libpng) ("libtiff" ,libtiff) ("libxml2" ,libxml2) ("xorg-rgb" ,xorg-rgb) ("zlib" ,zlib))) (native-inputs `(("flex" ,flex) ("perl" ,perl) ("pkg-config" ,pkg-config) ("python" ,python-wrapper))) (arguments `(#:modules ((guix build gnu-build-system) (guix build utils) (ice-9 match)) #:phases (modify-phases %standard-phases (replace 'configure (lambda* (#:key inputs outputs #:allow-other-keys) (copy-file "config.mk.in" "config.mk") (chmod "config.mk" #o664) (let ((f (open-file "config.mk" "a"))) (display "CC=gcc\n" f) (display "CFLAGS_SHLIB += -fPIC\n" f) (display "TIFFLIB = libtiff.so\n" f) (display "JPEGLIB = libjpeg.so\n" f) (display "ZLIB = libz.so\n" f) (display (string-append "LDFLAGS += -Wl,-rpath=" %output "/lib") f) (close-port f)) (let ((rgb (search-input-file inputs "/share/X11/rgb.txt"))) (substitute* "config.mk" (("/usr/share/netpbm/rgb.txt") rgb)) ;; Our Ghostscript no longer provides the 'gs' command, only ;; 'gsc', so look for that instead. (substitute* "converter/other/pstopnm.c" (("\"%s/gs\"") "\"%s/gsc\"") (("/usr/bin/gs") (search-input-file inputs "/bin/gsc")))))) (add-before 'check 'setup-check (lambda _ ;; install temporarily into /tmp/netpbm (invoke "make" "package") ;; remove test requiring X (substitute* "test/all-in-place.test" (("pamx") "")) ;; do not worry about non-existing file (substitute* "test/all-in-place.test" (("^rm ") "rm -f ")) ;; remove four tests that fail for unknown reasons (substitute* "test/Test-Order" (("all-in-place.test") "") (("pnmpsnr.test") "") (("pnmremap1.test") "") (("gif-roundtrip.test") "") ;; These two tests fail on powerpc-linux. ,@(if (target-ppc32?) `((("pbmtog3\\.test") "") (("g3-roundtrip\\.test") "")) '()) ;; These two tests started failing in netpbm-10.78.3. (("jpeg-roundtrip.test") "") (("pbmtext.test") "") ;; Skip tests that use nonfree programs that we don't build. (("ps-alt-roundtrip.test") "" ) (("pbm-misc-converters.test") "")) #t)) (replace 'install (lambda* (#:key outputs make-flags #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) (apply invoke "make" "package" (string-append "pkgdir=" out) make-flags) ;; Remove superfluous files. (with-directory-excursion out (for-each delete-file-recursively '("config_template" "pkginfo" "README" "VERSION" "link/" "misc/")) ;; Install the required ‘libnetpbm.so’ link. ;; See <https://issues.guix.gnu.org/issue/40376>. (with-directory-excursion "lib" (symlink (match (find-files "." "^libnetpbm\\.so\\.[^.]*\\.[^.]*$") ((head _ ...) head)) "libnetpbm.so")) #t))))))) (synopsis "Toolkit for manipulation of images") (description "Netpbm is a toolkit for the manipulation of graphic images, including the conversion of images between a variety of different formats. There are over 300 separate tools in the package including converters for about 100 graphics formats.") (license gpl2) (home-page "https://netpbm.sourceforge.net/")))


context:
space:
mode: