[bug#52094] [PATCH] gnu: Add speedometer.

[Foo Chuan Wei]

* gnu/packages/networking.scm (speedometer): New variable.
---
 gnu/packages/networking.scm | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)

diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm
index b583d2531f..2e0ccf62bb 100644
--- a/gnu/packages/networking.scm
+++ b/gnu/packages/networking.scm
@@ -44,6 +44,7 @@
 ;;; Copyright © 2021 Justin Veilleux <terramorpha@cock.li>
 ;;; Copyright © 2021 Vinicius Monego <monego@posteo.net>
 ;;; Copyright © 2021 Milkey Mouse <milkeymouse@meme.institute>
+;;; Copyright © 2021 Foo Chuan Wei <chuanwei.foo@hotmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -4208,6 +4209,35 @@ on hub/switched networks.  It is based on @acronym{ARP} 
packets, it will send
    (home-page "https://github.com/netdiscover-scanner/netdiscover";)
    (license license:gpl3+)))
 
+(define-public speedometer
+  (package
+    (name "speedometer")
+    (version "2.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (pypi-uri "Speedometer" version))
+       (sha256
+        (base32 "0qgpjmahy0wlfszqxg0067ck2xab5k6j42d0ifxg1j281yqnm9bx"))))
+    (build-system python-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'fix-script
+           (lambda _
+             (substitute* "setup.py"
+               (("'scripts': \\['speedometer.py'\\],")
+                "'packages': ['.'],")))))
+       #:python ,python-2))
+    (propagated-inputs
+     `(("python2-urwid" ,python2-urwid)))
+    (home-page "https://excess.org/speedometer/";)
+    (synopsis "Measure and display the rate of data across a network 
connection")
+    (description
+     "Console monitor of the rate of data across a network connection or data
+being stored in a file.")
+    (license license:lgpl2.1+)))
+
 (define-public putty
   (package
     (name "putty")

base-commit: 4fd6aabeaabae9184407276f3ae2436284bbcf63
-- 
2.25.1