gnu: synergy: Fix minor problems with the package definitions.

* gnu/packages/synergy.scm (synergy)[source]: Return #t in the snippet.
[arguments]: Let build phases return #t; fix typo in comment.
[home-page]: Change to redirection target.
[description]: Fix typo.
This commit is contained in:
Ricardo Wurmus 2017-11-10 15:16:54 +01:00
parent 177475cfb5
commit ae451b9dc2
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 16 additions and 12 deletions

View File

@ -47,13 +47,15 @@
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
;; Remove ~14MB of unnecessary bundled source and binaries ;; Remove ~14MB of unnecessary bundled source and binaries
'(for-each delete-file-recursively '(begin
(for-each delete-file-recursively
`("ext/bonjour" `("ext/bonjour"
"ext/LICENSE (OpenSSL)" "ext/LICENSE (OpenSSL)"
,@(find-files "ext" "openssl-.*\\.tar\\.gz") ,@(find-files "ext" "openssl-.*\\.tar\\.gz")
"ext/openssl-osx" "ext/openssl-osx"
"ext/openssl-win32" "ext/openssl-win32"
"ext/openssl-win64"))))) "ext/openssl-win64"))
#t))))
(build-system cmake-build-system) (build-system cmake-build-system)
(native-inputs `(("unzip" ,unzip))) (native-inputs `(("unzip" ,unzip)))
(inputs (inputs
@ -78,9 +80,10 @@
(for-each (for-each
(lambda (f) (lambda (f)
(system* unzip "-d" f (string-append f ".zip"))) (system* unzip "-d" f (string-append f ".zip")))
'("gmock-1.6.0" "gtest-1.6.0")))))) '("gmock-1.6.0" "gtest-1.6.0"))))
#t))
(replace 'check (replace 'check
;; Don't run "integtests" as it requires network and X an display. ;; Don't run "integtests" as it requires network and an X display.
(lambda _ (lambda _
(zero? (system* (string-append srcdir "/bin/unittests"))))) (zero? (system* (string-append srcdir "/bin/unittests")))))
(replace 'install (replace 'install
@ -103,11 +106,12 @@
(install-file (string-append srcdir "/doc/" e) ex)) (install-file (string-append srcdir "/doc/" e) ex))
'("synergy.conf.example" '("synergy.conf.example"
"synergy.conf.example-advanced" "synergy.conf.example-advanced"
"synergy.conf.example-basic")))))))))) "synergy.conf.example-basic"))))
(home-page "http://symless.com/") #t))))))
(home-page "https://symless.com/synergy")
(synopsis "Mouse and keyboard sharing utility") (synopsis "Mouse and keyboard sharing utility")
(description (description
"Synergy brings your computers together in one cohesive experience; its "Synergy brings your computers together in one cohesive experience; it's
software for sharing one mouse and keyboard between multiple computers on your software for sharing one mouse and keyboard between multiple computers on your
desk.") desk.")
(license gpl2))) (license gpl2)))