From mboxrd@z Thu Jan 1 00:00:00 1970 From: David Craven Subject: [PATCH 7/7] gnu: Add virt-viewer. Date: Sat, 23 Jul 2016 15:18:59 +0200 Message-ID: <20160723131859.13525-7-david@craven.ch> References: <20160723131859.13525-1-david@craven.ch> Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:34113) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bQwpy-0004Jg-AT for guix-devel@gnu.org; Sat, 23 Jul 2016 09:19:29 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bQwpw-0004Ld-2X for guix-devel@gnu.org; Sat, 23 Jul 2016 09:19:25 -0400 Received: from so254-10.mailgun.net ([198.61.254.10]:54873) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bQwpu-0004Fr-SX for guix-devel@gnu.org; Sat, 23 Jul 2016 09:19:24 -0400 In-Reply-To: <20160723131859.13525-1-david@craven.ch> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org Cc: David Craven * gnu/packages/spice.scm: Add it. --- gnu/packages/spice.scm | 45 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 45 insertions(+) diff --git a/gnu/packages/spice.scm b/gnu/packages/spice.scm index 182e76b..7bbe0a1 100644 --- a/gnu/packages/spice.scm +++ b/gnu/packages/spice.scm @@ -9,6 +9,7 @@ #:use-module (gnu packages image) #:use-module (gnu packages libusb) #:use-module (gnu packages linux) + #:use-module (gnu packages perl) #:use-module (gnu packages pkg-config) #:use-module (gnu packages pulseaudio) #:use-module (gnu packages python) @@ -16,6 +17,7 @@ #:use-module (gnu packages xorg) #:use-module (gnu packages xdisorg) #:use-module (gnu packages xiph) + #:use-module (gnu packages xml) #:use-module (guix build-system gnu) #:use-module (guix download) #:use-module (guix packages) @@ -224,3 +226,46 @@ Internet and from a wide variety of machine architectures.") scaling on graphical console window resize.") (home-page "http://www.spice-space.org") (license license:gpl2))) + +(define-public virt-viewer + (package + (name "virt-viewer") + (version "4.0") + (source (origin + (method url-fetch) + (uri (string-append + "https://virt-manager.org/download/sources/virt-viewer/" + "virt-viewer-" version ".tar.gz")) + (sha256 + (base32 + "07zsi1fqg05mag1ayniaqj25fzb6dxg76d4ka5196lq4l477nhhw")))) + (build-system gnu-build-system) + (inputs + `(("gtk+" ,gtk+) + ("libcap" ,libcap) + ("libxml2" ,libxml2) + ("openssl" ,openssl) + ("perl" ,perl) + ("spice-gtk" ,spice-gtk))) + (native-inputs + `(("glib:bin" ,glib "bin") + ("intltool" ,intltool) + ("pkg-config" ,pkg-config))) + (arguments + `(#:configure-flags + '("--with-spice-gtk") + #:phases + (modify-phases %standard-phases + (add-after + 'install 'wrap-remote-viewer + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out")) + (gst-plugin-path (getenv "GST_PLUGIN_SYSTEM_PATH"))) + (wrap-program (string-append out "/bin/remote-viewer") + `("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path)))) + #t))))) + (synopsis "Graphical console client for virtual machines") + (description "Graphical console client for virtual machines using spice or +vnc.") + (home-page "https://virt-manager.org") + (license license:gpl2))) -- 2.9.0