| 1 | |
| 2 | |
| 3 | |
| 4 | |
| 5 | |
| 6 | |
| 7 | |
| 8 | |
| 9 | |
| 10 | |
| 11 | |
| 12 | |
| 13 | |
| 14 | |
| 15 | |
| 16 | |
| 17 | |
| 18 | |
| 19 |
|
| 20 | (define-module (gnu packages tv)
|
| 21 | #:use-module (guix packages)
|
| 22 | #:use-module (guix download)
|
| 23 | #:use-module (guix build-system gnu)
|
| 24 | #:use-module ((guix licenses) #:prefix license:)
|
| 25 | #:use-module (gnu packages)
|
| 26 | #:use-module (gnu packages compression)
|
| 27 | #:use-module (gnu packages fontutils)
|
| 28 | #:use-module (gnu packages image)
|
| 29 | #:use-module (gnu packages linux)
|
| 30 | #:use-module (gnu packages pkg-config)
|
| 31 | #:use-module (gnu packages xml)
|
| 32 | #:use-module (gnu packages xorg))
|
| 33 |
|
| 34 | (define-public tvtime
|
| 35 | (package
|
| 36 | (name "tvtime")
|
| 37 | (version "1.0.11")
|
| 38 | (source (origin
|
| 39 | (method url-fetch)
|
| 40 | (uri (string-append
|
| 41 | "https://linuxtv.org/downloads/tvtime/tvtime-"
|
| 42 | version ".tar.gz"))
|
| 43 | (sha256
|
| 44 | (base32
|
| 45 | "1367rl3n6qxwf30lqyz234zpb43s9xjhig3hrvbg7cbqcl8g4fs0"))))
|
| 46 | (build-system gnu-build-system)
|
| 47 | (arguments
|
| 48 | '(#:phases
|
| 49 | (modify-phases %standard-phases
|
| 50 | (add-after 'unpack 'fix-glibc-compatability
|
| 51 | (lambda _
|
| 52 | (substitute* "src/get_media_devices.c"
|
| 53 | (("<sys/stat.h>")
|
| 54 | "<sys/stat.h>\n#include <sys/sysmacros.h>"))
|
| 55 | #t)))))
|
| 56 | (inputs
|
| 57 | (list alsa-lib
|
| 58 | libx11
|
| 59 | libxext
|
| 60 | libxt
|
| 61 | libxtst
|
| 62 | libxinerama
|
| 63 | libxv
|
| 64 | libxxf86vm
|
| 65 | libpng
|
| 66 | libxml2
|
| 67 | freetype
|
| 68 | zlib))
|
| 69 | (native-inputs
|
| 70 | (list pkg-config))
|
| 71 | (home-page "https://tvtime.sourceforge.net")
|
| 72 | (synopsis "Television viewer")
|
| 73 | (description
|
| 74 | "Tvtime processes the input from your video capture card and
|
| 75 | displays it on a monitor. It focuses on a high visual quality.")
|
| 76 | (license license:gpl2+)))
|