diff options
| -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) |