* gnu/packages/admin.scm (nmrpflash)[source]: Remove '.git' from URI. * gnu/packages/aidc.scm (zxing-cpp), * gnu/packages/assembly.scm (mbuild), * gnu/packages/audio.scm (opensles, wildmidi, tinyalsa), * gnu/packages/browser-extensions.scm (ublock-origin-chromium), * gnu/packages/check.scm (mutest), * gnu/packages/compression.scm (unshield), * gnu/packages/coq.scm (subset), * gnu/packages/dictionaries.scm (translate-shell), * gnu/packages/disk.scm (memkind), * gnu/packages/documentation.scm (latex2html), * gnu/packages/emacs-xyz.scm (emacs-chronometrist, emacs-flycheck-ledger, emacs-counsel-notmuch, emacs-spaceline, emacs-org-generate), * gnu/packages/embedded.scm (ebusd, ebusd-configuration), * gnu/packages/enchant.scm (nuspell), * gnu/packages/fontutils.scm (woff2), * gnu/packages/geo.scm (memphis), * gnu/packages/gimp.scm (mrg), * gnu/packages/gnome-xyz.scm (gnome-shell-extension-appindicator), * gnu/packages/gnome.scm (parlatype), * gnu/packages/golang.scm (go-github-com-tv42-httpunix, go-github-com-ayufan-golang-kardianos-service), * gnu/packages/graphics.scm (eglexternalplatform, egl-wayland, mmm, directfb, flux), * gnu/packages/gstreamer.scm (openni2, ccextractor, libvisual, graphene), * gnu/packages/guile-xyz.scm (guile-srfi-180, guile-torrent), * gnu/packages/image.scm (openjpeg-data), * gnu/packages/java.scm (javacc), * gnu/packages/language.scm (liblouis, liblouisutdml), * gnu/packages/linux.scm (pamela, ttyebus), * gnu/packages/lxqt.scm (lxqt-connman-applet), * gnu/packages/mail.scm (libetpan), * gnu/packages/man.scm (ronn), * gnu/packages/music.scm (tascam-gtk, artyfx), * gnu/packages/networking.scm (srt, lksctp-tools, nng, nanomsg), * gnu/packages/python-crypto.scm (pure-python-otr), * gnu/packages/qt.scm (qtspell), * gnu/packages/raspberry-pi.scm (raspi-gpio, raspi-open-firmware), * gnu/packages/rdp.scm (freerdp), * gnu/packages/ruby.scm (ruby-prawn-templates, ruby-treetop, ruby-gimme, ruby-standard, ruby-rubocop-ast, ruby-rexml, ruby-range-compressor, ruby-regexp-property-values, ruby-regexp-parser, ruby-rubocop, ruby-pdf-reader, ruby-pdf-inspector, ruby-prawn), * gnu/packages/syncthing.scm (syncthing-gtk), * gnu/packages/video.scm (svt-hevc, mediasdk, libvideogfx, libde265, tslib), * gnu/packages/xml.scm (libxmlb, libxmlplusplus)[source]: Same.
		
			
				
	
	
		
			341 lines
		
	
	
	
		
			13 KiB
		
	
	
	
		
			Scheme
		
	
	
	
	
	
			
		
		
	
	
			341 lines
		
	
	
	
		
			13 KiB
		
	
	
	
		
			Scheme
		
	
	
	
	
	
;;; GNU Guix --- Functional package management for GNU
 | 
						|
;;; Copyright © 2012, 2014, 2015, 2017, 2018 Ludovic Courtès <ludo@gnu.org>
 | 
						|
;;; Copyright © 2014 David Thompson <dthompson2@worcester.edu>
 | 
						|
;;; Copyright © 2015, 2016 Ricardo Wurmus <rekado@elephly.net>
 | 
						|
;;; Copyright © 2015 Alex Kost <alezost@gmail.com>
 | 
						|
;;; Copyright © 2015, 2016, 2020 Efraim Flashner <efraim@flashner.co.il>
 | 
						|
;;; Copyright © 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
 | 
						|
;;; Copyright © 2018, 2019 Rutger Helling <rhelling@mykolab.com>
 | 
						|
;;; Copyright © 2018, 2019 Marius Bakke <mbakke@fastmail.com>
 | 
						|
;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
 | 
						|
;;;
 | 
						|
;;; 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 man)
 | 
						|
  #:use-module ((guix licenses) #:prefix license:)
 | 
						|
  #:use-module (guix git-download)
 | 
						|
  #:use-module (guix download)
 | 
						|
  #:use-module (guix packages)
 | 
						|
  #:use-module (guix build-system gnu)
 | 
						|
  #:use-module (guix build-system ruby)
 | 
						|
  #:use-module (gnu packages dbm)
 | 
						|
  #:use-module (gnu packages flex)
 | 
						|
  #:use-module (gnu packages gawk)
 | 
						|
  #:use-module (gnu packages groff)
 | 
						|
  #:use-module (gnu packages less)
 | 
						|
  #:use-module (gnu packages perl)
 | 
						|
  #:use-module (gnu packages pkg-config)
 | 
						|
  #:use-module (gnu packages linux)
 | 
						|
  #:use-module (gnu packages xml))
 | 
						|
 | 
						|
(define-public xmltoman
 | 
						|
  (package
 | 
						|
    (name "xmltoman")
 | 
						|
    (version "0.4")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri
 | 
						|
        (string-append "https://sourceforge.net/projects/xmltoman/files/"
 | 
						|
                       "xmltoman/xmltoman-" version ".tar.gz/xmltoman-"
 | 
						|
                       version ".tar.gz/download"))
 | 
						|
       (sha256
 | 
						|
        (base32 "1c0lvzr7kdy63wbn1jv6s126ds7add3pxqb0vlxd3v5a2sir91wl"))))
 | 
						|
    (build-system gnu-build-system)
 | 
						|
    (arguments
 | 
						|
     `(#:tests? #f                      ; No tests
 | 
						|
       #:make-flags
 | 
						|
       (list
 | 
						|
        (string-append "PREFIX="
 | 
						|
                       (assoc-ref %outputs "out")))
 | 
						|
       #:phases
 | 
						|
       (modify-phases %standard-phases
 | 
						|
         (delete 'configure))))
 | 
						|
    (propagated-inputs
 | 
						|
     `(("perl" ,perl)
 | 
						|
       ("perl-xml-parser" ,perl-xml-parser)))
 | 
						|
    (synopsis "XML to Man converter")
 | 
						|
    (description "XMLtoMan and XMLMantoHTML are two small scripts to convert xml
 | 
						|
to man pages in groff format or html.  It features the usual man page items such
 | 
						|
as description, options, see also, etc.")
 | 
						|
    (home-page "http://xmltoman.sourceforge.net/")
 | 
						|
    (license license:gpl2+)))
 | 
						|
 | 
						|
(define-public ronn
 | 
						|
  (package
 | 
						|
    (name "ronn")
 | 
						|
    (version "0.7.3")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method git-fetch)
 | 
						|
       (uri
 | 
						|
        (git-reference
 | 
						|
         (url "https://github.com/rtomayko/ronn")
 | 
						|
         (commit version)))
 | 
						|
       (file-name
 | 
						|
        (git-file-name name version))
 | 
						|
       (sha256
 | 
						|
        (base32 "0fkniz7j1jp8v3i05m6hks3nsh6rzvjfi0ichpi7h4gwk5byxb94"))))
 | 
						|
    (build-system ruby-build-system)
 | 
						|
    (arguments
 | 
						|
     `(#:tests? #f))                   ; Library hpricot not available
 | 
						|
    (synopsis "Manual authoring tool")
 | 
						|
    (description "Ronn builds manuals.  It converts simple, human readable
 | 
						|
textfiles to roff for terminal display, and also to HTML for the web.")
 | 
						|
    (home-page "https://rtomayko.github.io/ronn/")
 | 
						|
    (license license:expat)))
 | 
						|
 | 
						|
(define-public libpipeline
 | 
						|
  (package
 | 
						|
    (name "libpipeline")
 | 
						|
    (version "1.5.3")
 | 
						|
    (source (origin
 | 
						|
              (method url-fetch)
 | 
						|
              (uri (string-append
 | 
						|
                    "mirror://savannah/libpipeline/libpipeline-"
 | 
						|
                    version ".tar.gz"))
 | 
						|
              (sha256
 | 
						|
               (base32
 | 
						|
                "1c5dl017xil2ssb6a5vg927bnsbc9vymfgi9ahvqbb8gypx0igsx"))))
 | 
						|
    (build-system gnu-build-system)
 | 
						|
    (home-page "http://libpipeline.nongnu.org/")
 | 
						|
    (synopsis "C library for manipulating pipelines of subprocesses")
 | 
						|
    (description
 | 
						|
     "libpipeline is a C library for manipulating pipelines of subprocesses in
 | 
						|
a flexible and convenient way.")
 | 
						|
    (license license:gpl3+)))
 | 
						|
 | 
						|
(define-public man-db
 | 
						|
  (package
 | 
						|
    (name "man-db")
 | 
						|
    (version "2.9.3")
 | 
						|
    (source (origin
 | 
						|
              (method url-fetch)
 | 
						|
              (uri (string-append "mirror://savannah/man-db/man-db-"
 | 
						|
                                  version ".tar.xz"))
 | 
						|
              (sha256
 | 
						|
               (base32
 | 
						|
                "1f4palf5bdyf3f8sa0981cqxn9cjcr2pz53ngrrsybb9n0da2nps"))))
 | 
						|
    (build-system gnu-build-system)
 | 
						|
    (arguments
 | 
						|
     `(#:phases
 | 
						|
       (modify-phases %standard-phases
 | 
						|
         (add-after 'patch-source-shebangs 'patch-test-shebangs
 | 
						|
           (lambda* (#:key outputs #:allow-other-keys)
 | 
						|
             ;; Patch shebangs in test scripts.
 | 
						|
             (let ((out (assoc-ref outputs "out")))
 | 
						|
               (for-each (lambda (file)
 | 
						|
                           (substitute* file
 | 
						|
                             (("#! /bin/sh")
 | 
						|
                              (string-append "#!" (which "sh")))))
 | 
						|
                         (remove file-is-directory?
 | 
						|
                                 (find-files "src/tests" ".*")))
 | 
						|
               #t)))
 | 
						|
         (add-after 'unpack 'patch-absolute-paths
 | 
						|
           (lambda* (#:key inputs #:allow-other-keys)
 | 
						|
             (substitute* "src/man.c"
 | 
						|
               (("\"iconv\"")
 | 
						|
                (string-append "\"" (which "iconv") "\"")))
 | 
						|
             ;; Embed an absolute reference to "preconv", otherwise it
 | 
						|
             ;; falls back to searching in PATH and ultimately fails
 | 
						|
             ;; to render unicode data (see <https://bugs.gnu.org/30785>).
 | 
						|
             (substitute* "lib/encodings.c"
 | 
						|
               (("groff_preconv = NULL")
 | 
						|
                (string-append "groff_preconv = \""
 | 
						|
                               (assoc-ref inputs "groff-minimal")
 | 
						|
                               "/bin/preconv\"")))
 | 
						|
             #t)))
 | 
						|
       #:configure-flags
 | 
						|
       (let ((groff (assoc-ref %build-inputs "groff"))
 | 
						|
             (groff-minimal (assoc-ref %build-inputs "groff-minimal"))
 | 
						|
             (less  (assoc-ref %build-inputs "less"))
 | 
						|
             (gzip  (assoc-ref %build-inputs "gzip"))
 | 
						|
             (bzip2 (assoc-ref %build-inputs "bzip2"))
 | 
						|
             (xz    (assoc-ref %build-inputs "xz"))
 | 
						|
             (util  (assoc-ref %build-inputs "util-linux")))
 | 
						|
         ;; Invoke groff, less, gzip, bzip2, and xz directly from the store.
 | 
						|
         (append (list ;; Disable setuid man user.
 | 
						|
                       "--disable-setuid"
 | 
						|
                       ;; Don't constrain ownership of system-wide cache files.
 | 
						|
                       ;; Otherwise creating the manpage database fails with
 | 
						|
                       ;; man-db > 2.7.5.
 | 
						|
                       "--disable-cache-owner"
 | 
						|
                       (string-append "--with-pager=" less "/bin/less")
 | 
						|
                       (string-append "--with-gzip=" gzip "/bin/gzip")
 | 
						|
                       (string-append "--with-bzip2=" bzip2 "/bin/gzip")
 | 
						|
                       (string-append "--with-xz=" xz "/bin/xz")
 | 
						|
                       (string-append "--with-col=" util "/bin/col")
 | 
						|
                       ;; The default systemd directories ignore --prefix.
 | 
						|
                       (string-append "--with-systemdsystemunitdir="
 | 
						|
                                      %output "/lib/systemd/system")
 | 
						|
                       (string-append "--with-systemdtmpfilesdir="
 | 
						|
                                      %output "/lib/tmpfiles.d"))
 | 
						|
                 (map (lambda (prog)
 | 
						|
                        (string-append "--with-" prog "=" groff-minimal
 | 
						|
                                       "/bin/" prog))
 | 
						|
                      '("nroff" "eqn" "neqn" "tbl" "refer" "pic"))))
 | 
						|
 | 
						|
       ;; At run time we should refer to GROFF-MINIMAL, not GROFF (the latter
 | 
						|
       ;; pulls in Perl.)
 | 
						|
       #:disallowed-references (,groff)
 | 
						|
 | 
						|
       #:modules ((guix build gnu-build-system)
 | 
						|
                  (guix build utils)
 | 
						|
                  (srfi srfi-1))))
 | 
						|
    (native-inputs
 | 
						|
     `(("pkg-config" ,pkg-config)
 | 
						|
       ("flex" ,flex)
 | 
						|
       ("groff" ,groff)))   ;needed at build time (troff, grops, soelim, etc.)
 | 
						|
    (inputs
 | 
						|
     `(("gdbm" ,gdbm)
 | 
						|
       ("groff-minimal" ,groff-minimal)
 | 
						|
       ("less" ,less)
 | 
						|
       ("libpipeline" ,libpipeline)
 | 
						|
       ;; FIXME: 4.8 and later can use libseccomp, but it causes test
 | 
						|
       ;; failures in the build chroot.
 | 
						|
       ;;("libseccomp" ,libseccomp)
 | 
						|
       ("util-linux" ,util-linux)))
 | 
						|
    (native-search-paths
 | 
						|
     (list (search-path-specification
 | 
						|
            (variable "MANPATH")
 | 
						|
            (files '("share/man")))))
 | 
						|
    (home-page "http://man-db.nongnu.org/")
 | 
						|
    (synopsis "Standard Unix documentation system")
 | 
						|
    (description
 | 
						|
     "Man-db is an implementation of the standard Unix documentation system
 | 
						|
accessed using the man command.  It uses a Berkeley DB database in place of
 | 
						|
the traditional flat-text whatis databases.")
 | 
						|
    (license license:gpl2+)))
 | 
						|
 | 
						|
(define-public man-pages
 | 
						|
  (package
 | 
						|
    (name "man-pages")
 | 
						|
    (version "5.09")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method url-fetch)
 | 
						|
       (uri
 | 
						|
        (list (string-append "mirror://kernel.org/linux/docs/man-pages/"
 | 
						|
                             "man-pages-" version ".tar.xz")
 | 
						|
              (string-append "mirror://kernel.org/linux/docs/man-pages/Archive/"
 | 
						|
                             "man-pages-" version ".tar.xz")))
 | 
						|
       (sha256
 | 
						|
        (base32 "1whbxim4diyan97y9pz9k4ck16rmjalw5i1m0dg6ycv3pxv386nz"))))
 | 
						|
    (build-system gnu-build-system)
 | 
						|
    (arguments
 | 
						|
     '(#:phases (modify-phases %standard-phases (delete 'configure))
 | 
						|
 | 
						|
       ;; The 'all' target depends on three targets that directly populate
 | 
						|
       ;; $(MANDIR) based on its current contents.  Doing that in parallel
 | 
						|
       ;; leads to undefined behavior (see <http://bugs.gnu.org/18701>.)
 | 
						|
       #:parallel-build? #f
 | 
						|
 | 
						|
       #:tests? #f
 | 
						|
       #:make-flags (list (string-append "MANDIR="
 | 
						|
                                         (assoc-ref %outputs "out")
 | 
						|
                                         "/share/man"))))
 | 
						|
    (home-page "https://www.kernel.org/doc/man-pages/")
 | 
						|
    (synopsis "Development manual pages from the Linux project")
 | 
						|
    (description
 | 
						|
     "This package provides traditional Unix \"man pages\" documenting the
 | 
						|
Linux kernel and C library interfaces employed by user-space programs.")
 | 
						|
 | 
						|
    ;; Each man page has its own license; some are GPLv2+, some are MIT/X11.
 | 
						|
    (license license:gpl2+)))
 | 
						|
 | 
						|
(define-public help2man
 | 
						|
  (package
 | 
						|
    (name "help2man")
 | 
						|
    (version "1.47.13")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
      (method url-fetch)
 | 
						|
      (uri (string-append "mirror://gnu/help2man/help2man-"
 | 
						|
                          version ".tar.xz"))
 | 
						|
      (sha256
 | 
						|
       (base32
 | 
						|
        "08q5arxz4j4pyx5q4712c2rn7p7dw7as9xg38yvmsh1c3ynvpy5p"))))
 | 
						|
    (build-system gnu-build-system)
 | 
						|
    (arguments `(;; There's no `check' target.
 | 
						|
                 #:tests? #f))
 | 
						|
    (inputs
 | 
						|
     `(("perl" ,perl)
 | 
						|
       ;; TODO: Add these optional dependencies.
 | 
						|
       ;; ("perl-LocaleGettext" ,perl-LocaleGettext)
 | 
						|
       ;; ("gettext" ,gettext-minimal)
 | 
						|
       ))
 | 
						|
    (native-inputs
 | 
						|
     `(("perl" ,perl)))
 | 
						|
    (home-page "https://www.gnu.org/software/help2man/")
 | 
						|
    (synopsis "Automatically generate man pages from program --help")
 | 
						|
    (description
 | 
						|
     "GNU help2man is a program that converts the output of standard
 | 
						|
\"--help\" and \"--version\" command-line arguments into a manual page
 | 
						|
automatically.")
 | 
						|
    (license license:gpl3+)))
 | 
						|
 | 
						|
(define-public scdoc
 | 
						|
  (package
 | 
						|
   (name "scdoc")
 | 
						|
   (version "1.10.1")
 | 
						|
   (source
 | 
						|
    (origin
 | 
						|
     (method url-fetch)
 | 
						|
     (uri (string-append "https://git.sr.ht/%7Esircmpwn/scdoc/archive/" version
 | 
						|
                         ".tar.gz"))
 | 
						|
     (file-name (string-append name "-" version ".tar.gz"))
 | 
						|
     (sha256
 | 
						|
      (base32
 | 
						|
       "13x7g1r56bshvfmlvapvz35ywnbgsh337kywb5kcv8nc6b3j3q40"))))
 | 
						|
   (build-system gnu-build-system)
 | 
						|
   (arguments
 | 
						|
    `(#:make-flags
 | 
						|
      (list "CC=gcc" (string-append "PREFIX=" (assoc-ref %outputs "out")))
 | 
						|
      #:phases
 | 
						|
      (modify-phases %standard-phases
 | 
						|
        (delete 'configure))))
 | 
						|
   (home-page "https://git.sr.ht/~sircmpwn/scdoc")
 | 
						|
   (synopsis "Simple man page generator")
 | 
						|
   (description "scdoc is a simple man page generator written for POSIX systems
 | 
						|
in C99.")
 | 
						|
   ;; MIT license, see /share/doc/scdoc-1.6.0/COPYING.
 | 
						|
   (license license:expat)))
 | 
						|
 | 
						|
(define-public txt2man
 | 
						|
  (package
 | 
						|
    (name "txt2man")
 | 
						|
    (version "1.6.0")
 | 
						|
    (source
 | 
						|
     (origin
 | 
						|
       (method git-fetch)
 | 
						|
       (uri (git-reference
 | 
						|
              (url "https://github.com/mvertes/txt2man")
 | 
						|
              (commit (string-append "txt2man-" version))))
 | 
						|
       (file-name (git-file-name name version))
 | 
						|
       (sha256
 | 
						|
        (base32
 | 
						|
         "1razjpvlcp85hqli77mwr9nmn5jnv3lm1fxbbqjpx1brv3h1lvm5"))))
 | 
						|
    (build-system gnu-build-system)
 | 
						|
    (arguments
 | 
						|
     `(#:tests? #f ; no "check" target
 | 
						|
       #:make-flags (list (string-append "prefix=" (assoc-ref %outputs "out")))
 | 
						|
       #:phases (modify-phases %standard-phases (delete 'configure))))
 | 
						|
    (inputs
 | 
						|
     `(("gawk" ,gawk)))
 | 
						|
    (home-page "https://github.com/mvertes/txt2man")
 | 
						|
    (synopsis "Convert text to man page")
 | 
						|
    (description "Txt2man converts flat ASCII text to man page format.")
 | 
						|
    (license license:gpl2+)))
 |