diff options
| author | Marius Bakke <mbakke@fastmail.com> | 2019-07-04 16:29:53 +0200 |
|---|---|---|
| committer | Marius Bakke <mbakke@fastmail.com> | 2019-07-04 16:29:53 +0200 |
| commit | 2cb827b38ede254f87d3ce745a95f51f238c4373 (patch) | |
| tree | 32850a63d48f99fc5db3dc73f9dab48db423853d /gnu/packages/video.scm | |
| parent | 5ab605b9520e28657a1cdb8444c1ddc2b0731ada (diff) | |
| parent | 42dcfca4cc424aa790d8fb62eb327782fd08aad7 (diff) | |
| download | guix-2cb827b38ede254f87d3ce745a95f51f238c4373.tar.gz | |
Merge branch 'staging' into core-updates
Diffstat (limited to 'gnu/packages/video.scm')
| -rw-r--r-- | gnu/packages/video.scm | 22 |
1 files changed, 21 insertions, 1 deletions
diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index 2b6d9f5b7e..995f7fab15 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -1549,7 +1549,27 @@ YouTube.com and many more sites.") (string-append "os.path.join('" (assoc-ref %outputs "out") "', 'share'"))) - #t))))) + #t)) + (add-after 'install 'create-desktop-file + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (applications (string-append out "/share/applications"))) + (mkdir-p applications) + (call-with-output-file + (string-append applications "/youtube-dl-gui.desktop") + (lambda (file) + (format + file + "[Desktop Entry]~@ + Name=Youtube-dl GUI~@ + Comment=Graphical interface to download video with youtube-dl~@ + Exec=youtube-dl-gui~@ + TryExec=youtube-dl-gui~@ + Terminal=false~@ + Icon=youtube-dl-gui~@ + Type=Application~@ + Categories=AudioVideo;Audio;Video;Network~%"))) + #t)))))) (inputs `(("python2-wxpython" ,python2-wxpython) ("youtube-dl" ,youtube-dl))) |