me
/
guix
Archived
1
0
Fork 0
Code

gnu: clipmenu: Re-indent. 

* gnu/packages/xdisorg.scm (clipmenu): Re-indent

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
master
Damien Cassou 2020-03-21 17:42:07 +01:00 committed by Ludovic Courtès
parent e69b8bbae9
commit 08df188ea8
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 53 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

106
gnu/packages/xdisorg.scm
View File

@ -2170,58 +2170,58 @@ tools to complement clipnotify.")
(let ((commit "a495bcc7a4ab125182a661c5808364f66938a87c") (let ((commit "a495bcc7a4ab125182a661c5808364f66938a87c")
(revision "1")) (revision "1"))
(package (package
(name "clipmenu") (name "clipmenu")
(version (string-append "5.6.0-" (version (string-append "5.6.0-"
revision "." (string-take commit 7))) revision "." (string-take commit 7)))
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/cdown/clipnotify.git") (url "https://github.com/cdown/clipnotify.git")
(commit commit))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"12vvircdhl4psqi51cnfd6bqy85v2vwfcmdq1mimjgng727nwzys")))) "12vvircdhl4psqi51cnfd6bqy85v2vwfcmdq1mimjgng727nwzys"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases `(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'fix-hardcoded-paths (add-after 'unpack 'fix-hardcoded-paths
(lambda _ (lambda _
(substitute* "clipmenud" (substitute* "clipmenud"
(("has_clipnotify=0") (("has_clipnotify=0")
"has_clipnotify=1") "has_clipnotify=1")
(("command -v clipnotify >/dev/null 2>&1 && has_clipnotify=1") (("command -v clipnotify >/dev/null 2>&1 && has_clipnotify=1")
"") "")
(("clipnotify \\|\\| .*") (("clipnotify \\|\\| .*")
(string-append (which "clipnotify") "\n")) (string-append (which "clipnotify") "\n"))
(("xsel --logfile") (("xsel --logfile")
(string-append (which "xsel") " --logfile"))) (string-append (which "xsel") " --logfile")))
(substitute* "clipmenu" (substitute* "clipmenu"
(("xsel --logfile") (("xsel --logfile")
(string-append (which "xsel") " --logfile"))) (string-append (which "xsel") " --logfile")))
#t)) #t))
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin")) (bin (string-append out "/bin"))
(doc (string-append %output "/share/doc/" (doc (string-append %output "/share/doc/"
,name "-" ,version))) ,name "-" ,version)))
(install-file "clipdel" bin) (install-file "clipdel" bin)
(install-file "clipmenu" bin) (install-file "clipmenu" bin)
(install-file "clipmenud" bin) (install-file "clipmenud" bin)
(install-file "README.md" doc) (install-file "README.md" doc)
#t)))) #t))))
#:tests? #f)) #:tests? #f))
(inputs (inputs
`(("clipnotify" ,clipnotify) `(("clipnotify" ,clipnotify)
("xsel" ,xsel))) ("xsel" ,xsel)))
(home-page "https://github.com/cdown/clipmenu") (home-page "https://github.com/cdown/clipmenu")
(synopsis "Simple clipboard manager using dmenu or rofi and xsel") (synopsis "Simple clipboard manager using dmenu or rofi and xsel")
(description "Start @command{clipmenud}, then run @command{clipmenu} to (description "Start @command{clipmenud}, then run @command{clipmenu} to
select something to put on the clipboard. select something to put on the clipboard.
When @command{clipmenud} detects changes to the clipboard contents, it writes When @command{clipmenud} detects changes to the clipboard contents, it writes
@ -2229,4 +2229,4 @@ them out to the cache directory. @command{clipmenu} reads the cache directory
to find all available clips and launches @command{dmenu} (or @command{rofi}, to find all available clips and launches @command{dmenu} (or @command{rofi},
depending on the value of @code{CM_LAUNCHER}) to let the user select a clip. depending on the value of @code{CM_LAUNCHER}) to let the user select a clip.
After selection, the clip is put onto the PRIMARY and CLIPBOARD X selections.") After selection, the clip is put onto the PRIMARY and CLIPBOARD X selections.")
(license license:public-domain)))) (license license:public-domain))))