me/guix
Archived
1
0
Fork 0
Code Activity

gnu: fvwm: Use make-desktop-entry-file.

Browse source 
* gnu/packages/fvwm.scm (fvwm)[arguments]: Adjust 'install-xsession to
  use make-desktop-entry-file.
This commit is contained in:
Efraim Flashner 2020-08-19 16:31:59 +03:00
parent 678fdbb37a
commit c0153167e8
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 5 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
gnu/packages/fvwm.scm
View file

@ -54,18 +54,11 @@
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(xsessions (string-append out "/share/xsessions"))) (xsessions (string-append out "/share/xsessions")))
(mkdir-p xsessions) (mkdir-p xsessions)
(with-output-to-file (make-desktop-entry-file
(string-append xsessions "/fvwm2.desktop") (string-append xsessions "/fvwm2.desktop")
(lambda _ #:name "FVWM"
(format #t #:exec (string-append out "/bin/" ,name)
"[Desktop Entry]~@ #:comment '("FVWM")))
Name=FVWM~@
Comment=FVWM~@
Exec=~a/bin/fvwm~@
TryExec=~@*~a/bin/fvwm~@
Icon=~@
Type=Application~%"
out))))
#t))))) #t)))))
(native-inputs (native-inputs
`(("perl" ,perl) `(("perl" ,perl)