;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017 Nikita <nikita@n0.is>
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; 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 fvwm)
  #:use-module ((guix licenses) #:select (gpl2+))
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system gnu)
  #:use-module (gnu packages fribidi)
  #:use-module (gnu packages gnome)
  #:use-module (gnu packages image)
  #:use-module (gnu packages perl)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages readline)
  #:use-module (gnu packages xml)
  #:use-module (gnu packages xorg))

(define-public fvwm
  (package
    (name "fvwm")
    (version "2.6.9")
    (source (origin
              (method url-fetch)
              (uri (string-append
                    "https://github.com/fvwmorg/fvwm/releases/download/"
                    version "/fvwm-" version ".tar.gz"))
              (sha256
               (base32
                "1bliqcnap7vb3m2rn8wvxyfhbf35h9x34s41fl4301yhrkrlrihv"))))
    (build-system gnu-build-system)
    (arguments
     `(#:phases
       (modify-phases %standard-phases
         (add-after 'install 'install-xsession
           (lambda* (#:key outputs #:allow-other-keys)
             (let* ((out (assoc-ref outputs "out"))
                    (xsessions (string-append out "/share/xsessions")))
               (mkdir-p xsessions)
               (make-desktop-entry-file
                 (string-append xsessions "/fvwm2.desktop")
                 #:name "FVWM"
                 #:exec (string-append out "/bin/" ,name)
                 #:comment '("FVWM")))
             #t)))))
    (native-inputs
     `(("perl" ,perl)
       ("pkg-config" ,pkg-config)
       ("xsltproc" ,libxslt)))
    (inputs
     (list fribidi
           libpng
           librsvg
           libxcursor
           libxext
           libxft
           libxinerama
           libxpm
           libxt
           readline))
    (synopsis "Virtual window manager for X11")
    (description
     "FVWM is an extremely powerful ICCCM-compliant multiple virtual desktop
window manager for the X Window system.")
    (home-page "https://www.fvwm.org/")
    (license gpl2+)))
td></tr>
<tr><td><span title='2021-10-12 17:46:23 +0000'>2021-10-12</span></td><td><a href='/guix/commit/tests/opam.scm?id=a1eca979fb8da842e73c42f4f53be29b169810f2'>Merge remote-tracking branch 'origin/master' into core-updates-frozen.</a></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2021-09-18 19:37:44 +0200'>2021-09-18</span></td><td><a href='/guix/commit/tests/opam.scm?id=358ad74f41a59b177c9961abf49753a7ce3f41a0'>tests: Allow opam test to run without networking.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes a regression introduced in
fc29c80b9635ff490bcc768c774442043cb1e231, where, since
'get-opam-repository' was no longer mocked, the test would try to access
the actual OPAM repository through a call to 'http-fetch/cached'; this
would lead to a test failure when networking is unavailable.

* tests/opam.scm ("opam-&gt;guix-package"): Mock 'get-opam-repository'
again.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-09-07 14:19:08 +0200'>2021-09-07</span></td><td><a href='/guix/commit/tests/opam.scm?id=d9dfbf886ddbb92dfdaa118bb9765e78aad5c53a'>Merge branch 'master' into core-updates-frozen</a></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-08-21 00:05:21 +0200'>2021-08-21</span></td><td><a href='/guix/commit/tests/opam.scm?id=fc29c80b9635ff490bcc768c774442043cb1e231'>guix: opam: More flexibility in the importer.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/scripts/import/opam.scm: Pass all instances of --repo as a list
  to the importer.
* guix/import/opam.scm (opam-fetch): Stop expecting "expanded"
  repositories and call get-opam-repository instead to keep values
  "symbolic" as long as possible and factorize.
  (get-opam-repository): Use the same repository source as CLI opam does
  (i.e. HTTP-served index.tar.gz instead of git repositories).
  (find-latest-version): Be more flexible on the repositories structure
  instead of expecting packages/PACKAGE-NAME/PACKAGE-NAME.VERSION/.
* tests/opam.scm: Update the call to opam-&gt;guix-package since repo is
  now expected to be a list and remove the mocked get-opam-repository
  deprecated by the support for local folders by the actual
  implementation.
* doc/guix.texi: Document the new semantics and valid arguments for the
  --repo option.

Signed-off-by: Julien Lepiller &lt;julien@lepiller.eu&gt;
</span></span></td><td>Alice BRENON</td></tr>
<tr><td><span title='2021-07-20 23:43:29 +0200'>2021-07-20</span></td><td><a href='/guix/commit/tests/opam.scm?id=3d5a36c45755d8ca2b5978eb3769cba4809a68f1'>import: opam: Emit new-style package inputs.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/import/opam.scm (opam-&gt;guix-package): Wrap INPUTS and
NATIVE-INPUTS in 'list' instead of 'quasiquote'.
(dependency-list-&gt;inputs): Return a list of symbols.
* tests/opam.scm ("opam-&gt;guix-package"): Adjust accordingly.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Sarah Morgensen</td></tr>
<tr><td><span title='2021-05-28 11:36:03 +0200'>2021-05-28</span></td><td><a href='/guix/commit/tests/opam.scm?id=3f5bc6cbb34e1b57829ce3bf482310c49f03d3c3'>import: opam: Generate license for package.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/import/opam.scm (opam-&gt;guix-package): Generate license for the
‘license’ field.
* tests/opam.scm (test-opam-file): Update accordingly.
("opam-&gt;guix-package"): Likewise.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Xinglu Chen</td></tr>
<tr><td><span title='2020-12-08 22:58:37 +0100'>2020-12-08</span></td><td><a href='/guix/commit/tests/opam.scm?id=799f066768bacb321ebad84c75b2bbfd269e7cd8'>import: opam: Adjust test to latest 'opam-&gt;guix-package' changes.</a><span class='msg-avail'>...<span class='msg-tooltip'>This is a followup to a8dccd4bdc1e58219d4ba08fe1649bf0b8325f44, which
broke the test.

* guix/import/opam.scm (get-opam-repository): Prevent inlining.
* tests/opam.scm ("opam-&gt;guix-package"): Mock 'get-opam-repository'.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-12-08 16:40:30 +0100'>2020-12-08</span></td><td><a href='/guix/commit/tests/opam.scm?id=15ee1b8317adeb74938f3bb7f0c7cb635a818292'>guix: opam: Pass default repository to recursive importer.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/import/opam.scm (opam-&gt;guix-package): Rename #:repository key
to #:repo.
(opam-recursive-import): Pass #:repo keyword.
* tests/opam.scm (opam-&gt;guix-package): Rename #:repository to #:repo.
</span></span></td><td>Julien Lepiller</td></tr>