01/02: gnu: Add kgraphviewer.

[guix-commits]

ngz pushed a commit to branch master
in repository guix.

commit 5a402e0302d96bce5f18ff28ed5cac54cbacd29c
Author: Alexandros Theodotou <alex@zrythm.org>
AuthorDate: Fri Feb 26 16:54:20 2021 +0000

    gnu: Add kgraphviewer.
    
    * gnu/packages/kde-frameworks.scm (kgraphviewer): New variable.
    
    Signed-off-by: Nicolas Goaziou <mail@nicolasgoaziou.fr>
---
 gnu/packages/kde-frameworks.scm | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

diff --git a/gnu/packages/kde-frameworks.scm b/gnu/packages/kde-frameworks.scm
index 5482400..ef47a91 100644
--- a/gnu/packages/kde-frameworks.scm
+++ b/gnu/packages/kde-frameworks.scm
@@ -8,6 +8,7 @@
 ;;; Copyright © 2019 Ricardo Wurmus <rekado@elephly.net>
 ;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
 ;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
+;;; Copyright © 2021 Alexandros Theodotou <alex@zrythm.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -55,6 +56,7 @@
   #:use-module (gnu packages gnupg)
   #:use-module (gnu packages gperf)
   #:use-module (gnu packages graphics)
+  #:use-module (gnu packages graphviz)
   #:use-module (gnu packages gstreamer)
   #:use-module (gnu packages image)
   #:use-module (gnu packages kerberos)
@@ -695,6 +697,36 @@ such as printers, to be discovered without any user 
intervention or centralized
 infrastructure.")
     (license license:lgpl2.1+)))
 
+(define-public kgraphviewer
+  (package
+    (name "kgraphviewer")
+    (version "2.4.3")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "mirror://kde/stable/kgraphviewer/"
+                    version "/" name "-" version ".tar.xz"))
+              (sha256
+               (base32
+                "1h6pgg89gvxl8gw7wmkabyqqrzad5pxyv5lsmn1fl4ir8lcc5q2l"))))
+    (build-system cmake-build-system)
+    (inputs
+     `(("qtbase" ,qtbase)
+       ("boost" ,boost)
+       ("graphviz" ,graphviz)
+       ("kiconthemes" ,kiconthemes)
+       ("kparts" ,kparts)
+       ("qtsvg" ,qtsvg)))
+    (native-inputs
+     `(("pkg-config" ,pkg-config)
+       ("extra-cmake-modules" ,extra-cmake-modules)
+       ("kdoctools" ,kdoctools)))
+    (home-page "https://apps.kde.org/en/kgraphviewer";)
+    (synopsis "Graphviz dot graph viewer for KDE")
+    (description "KGraphViewer is a Graphviz DOT graph file viewer, aimed to
+replace the other outdated Graphviz tools.")
+    (license license:gpl2+)))
+
 (define-public kguiaddons
   (package
     (name "kguiaddons")