[bug#39300] [PATCH] gnu: Add mscgen.

[Alexander Krotov]

* gnu/packages/mscgen.scm: New file.
* gnu/packages/mscgen.scm (mscgen): New variable.
* gnu/local.mk (GNU_SYSTEM_MODULES): Add mscgen.
---
 gnu/local.mk            |  1 +
 gnu/packages/mscgen.scm | 52 +++++++++++++++++++++++++++++++++++++++++
 2 files changed, 53 insertions(+)
 create mode 100644 gnu/packages/mscgen.scm

diff --git a/gnu/local.mk b/gnu/local.mk
index bc011c09fb..9c0b626fca 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -352,6 +352,7 @@ GNU_SYSTEM_MODULES =                                \
   %D%/packages/mpd.scm                         \
   %D%/packages/mp3.scm                         \
   %D%/packages/mpi.scm                         \
+  %D%/packages/mscgen.scm                      \
   %D%/packages/multiprecision.scm              \
   %D%/packages/music.scm                       \
   %D%/packages/musl.scm                                \
diff --git a/gnu/packages/mscgen.scm b/gnu/packages/mscgen.scm
new file mode 100644
index 0000000000..787d186e50
--- /dev/null
+++ b/gnu/packages/mscgen.scm
@@ -0,0 +1,52 @@
+;;; GNU Guix --- Functional package management for GNU
+;;; Copyright © 2020 Alexander Krotov <address@hidden>
+;;;
+;;; 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 <http://www.gnu.org/licenses/>.
+
+(define-module (gnu packages mscgen)
+  #:use-module (guix licenses)
+  #:use-module (guix packages)
+  #:use-module (guix download)
+  #:use-module (guix build-system gnu)
+  #:use-module (gnu packages gd))
+
+(define-public mscgen
+  (package
+    (name "mscgen")
+    (version "0.20")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append 
"http://www.mcternan.me.uk/mscgen/software/mscgen-src-";
+                           version
+                           ".tar.gz"))
+       (sha256
+        (base32
+         "08yw3maxhn5fl1lff81gmcrpa4j9aas4mmby1g9w5qcr0np82d1w"))))
+    (build-system gnu-build-system)
+    (inputs
+     `(("gd" ,gd)))
+    (home-page "http://www.mcternan.me.uk/mscgen/";)
+    (synopsis "Message Sequence Chart Generator")
+    (description "Mscgen is a small program that parses Message Sequence Chart
+descriptions and produces PNG, SVG, EPS or server side image maps (ismaps) as
+the output. Message Sequence Charts (MSCs) are a way of representing entities
+and interactions over some time period and are often used in combination with
+SDL. MSCs are popular in Telecoms to specify how protocols operate although
+MSCs need not be complicated to create or use. Mscgen aims to provide a simple
+text language that is clear to create, edit and understand, which can also be
+transformed into common image formats for display or printing.")
+    (license gpl2+)))
-- 
2.25.0