;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2019 Arun Isaac ;;; ;;; This file is part of GNU Guix. ;;; ;;; GNU Guix is free software; you can redistribute it and/or modify it ;;; under the terms of the GNU General Public License as published by ;;; the Free Software Foundation; either version 3 of the License, or (at ;;; your option) any later version. ;;; ;;; GNU Guix is distributed in the hope that it will be useful, but ;;; WITHOUT ANY WARRANTY; without even the implied warranty of ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;;; GNU General Public License for more details. ;;; ;;; You should have received a copy of the GNU General Public License ;;; along with GNU Guix. If not, see . (define-module (gnu packages logo) #:use-module (gnu packages qt) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix download) #:use-module (guix packages) #:use-module (guix build-system gnu)) (define-public qlogo (package (name "qlogo") (version "0.92") (source (origin (method url-fetch) (uri (string-append "https://qlogo.org/assets/sources/QLogo-" version ".tgz")) (sha256 (base32 "0cpyj1ji6hjy7zzz05672f0j6fr0mwpc1y3sq36hhkv2fkpidw22")))) (build-system gnu-build-system) (inputs `(("qtbase" ,qtbase))) (arguments `(#:phases (modify-phases %standard-phases (replace 'configure (lambda* (#:key outputs #:allow-other-keys) (substitute* "QLogo.pro" (("target\\.path = /usr/bin") (string-append "target.path = " (assoc-ref outputs "out") "/bin"))) (invoke "qmake" "QLogo.pro"))) ;; The check phase rebuilds the source for tests. So, it needs to be ;; run after the install phase has installed the outputs of the build ;; phase. (delete 'check) (add-after 'install 'check (lambda _ ;; Clean files created by the build phase. (invoke "make" "clean") ;; QLogo tries to create its "dribble file" in the home ;; directory. So, set HOME. (setenv "HOME" "/tmp") ;; Build and run tests. (invoke "qmake" "TestQLogo.pro") (invoke "make" "-j" (number->string (parallel-job-count))) (invoke "./testqlogo")))))) (home-page "https://qlogo.org") (synopsis "Logo interpreter using Qt and OpenGL") (description "QLogo is an interpreter for the Logo language written in C++ using Qt and OpenGL. Specifically, it mimics, as reasonably as possible, the UCBLogo interpreter.") (license license:gpl2+))) 27e6d0d672bfdaaf85d45a70f5f&showmsg=1'>Expand)Author 2021-08-29Migrate to the new 'targets' field of bootloader-configuration....The old 'target' field is deprecated; adjust the sources to use the new 'targets' one instead. * doc/guix-cookbook.texi<target>: Replace by 'targets'. * gnu/bootloader/grub.scm: Likewise. * gnu/installer/parted.scm: Likewise. * gnu/machine/digital-ocean.scm: Likewise. * gnu/system/examples/asus-c201.tmpl: Likewise * gnu/system/examples/bare-bones.tmpl: Likewise * gnu/system/examples/bare-hurd.tmpl: Likewise * gnu/system/examples/beaglebone-black.tmpl: Likewise * gnu/system/examples/desktop.tmpl: Likewise * gnu/system/examples/docker-image.tmpl: Likewise * gnu/system/examples/lightweight-desktop.tmpl: Likewise * gnu/system/examples/vm-image.tmpl: Likewise * gnu/system/examples/yggdrasil.tmpl: Likewise * gnu/system/hurd.scm: Likewise * gnu/system/images/hurd.scm: Likewise * gnu/system/images/novena.scm: Likewise * gnu/system/images/pine64.scm: Likewise * gnu/system/images/pinebook-pro.scm: Likewise * gnu/system/images/rock64.scm: Likewise * gnu/system/install.scm: Likewise * gnu/system/vm.scm: Likewise * gnu/tests.scm: Likewise * gnu/tests/ganeti.scm: Likewise * gnu/tests/install.scm: Likewise * gnu/tests/nfs.scm: Likewise * gnu/tests/telephony.scm: Likewise * tests/boot-parameters.scm: Likewise * tests/system.scm: Likewise Maxim Cournoyer 2020-06-08system: bare-bones: Remove dependency to X libraries....Use "openssh-sans-x" to prevent the inclusion of X libraries to the bare-bones system closure. * gnu/system/examples/bare-bones.tmpl (operating-system)[services]: Use openssh-sans-x instead of openssh. Mathieu Othacehe