diff options
| author | Marius Bakke <mbakke@fastmail.com> | 2018-03-18 01:09:25 +0100 |
|---|---|---|
| committer | Marius Bakke <mbakke@fastmail.com> | 2018-03-18 01:09:25 +0100 |
| commit | 7ace97395feedc4b3ec23be65f2ed63f29aac9a9 (patch) | |
| tree | 768956fa30fc7b21e4e4715eafbb10dab32b2847 /gnu/packages/fvwm.scm | |
| parent | a248a9ac6a67213b177ab5ba9ec270638c9dd002 (diff) | |
| parent | be5ed142135e939cd23fcfe88c553fd28b32ac53 (diff) | |
| download | guix-7ace97395feedc4b3ec23be65f2ed63f29aac9a9.tar guix-7ace97395feedc4b3ec23be65f2ed63f29aac9a9.tar.gz | |
Merge branch 'master' into staging
Diffstat (limited to 'gnu/packages/fvwm.scm')
| -rw-r--r-- | gnu/packages/fvwm.scm | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/gnu/packages/fvwm.scm b/gnu/packages/fvwm.scm index 5ff3d5e4f2..a4c31aefc6 100644 --- a/gnu/packages/fvwm.scm +++ b/gnu/packages/fvwm.scm @@ -45,6 +45,27 @@ (base32 "0wzghjgy65pkn31rgl14fngizw7nbkzbxsfa670xmrndpmd4sr81")))) (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) + (with-output-to-file + (string-append xsessions "/fvwm2.desktop") + (lambda _ + (format #t + "[Desktop Entry]~@ + Name=FVWM~@ + Comment=FVWM~@ + Exec=~a/bin/fvwm~@ + TryExec=~@*~a/bin/fvwm~@ + Icon=~@ + Type=Application~%" + out)))) + #t))))) (native-inputs `(("perl" ,perl) ("pkg-config" ,pkg-config) |