@@ 75,97 75,6 @@
#:use-module (gnu packages xorg)
#:use-module (srfi srfi-1))
-(define-public cawbird
- (package
- (name "cawbird")
- (version "1.4.2")
- (source
- (origin
- (method git-fetch)
- (uri (git-reference
- (url "https://github.com/IBBoard/cawbird")
- (commit (string-append "v"version))))
- (file-name (git-file-name name version))
- (sha256
- (base32 "17575cp5qcgsqf37y3xqg3vr6l2j8bbbkmy2c1l185rxghfacida"))))
- (build-system meson-build-system)
- (arguments
- `(#:glib-or-gtk? #t
- #:configure-flags
- ;; Cawbirds's default key and secret for OAuth process with twitter.
- (list
- "-Dconsumer_key_base64=VmY5dG9yRFcyWk93MzJEZmhVdEk5Y3NMOA=="
- "-Dconsumer_secret_base64=MThCRXIxbWRESDQ2Y0podzVtVU13SGUyVGlCRXhPb3BFRHhGYlB6ZkpybG5GdXZaSjI=")
- #:phases
- (modify-phases %standard-phases
- (add-after 'unpack 'disable-failing-tests
- (lambda _
- ;; These tests require networking.
- (substitute* "tests/meson.build"
- (("[ \t]*.*avatardownload.*$") "")
- (("[ \t]*.*filters.*$") "")
- (("[ \t]*.*friends.*$") "")
- (("[ \t]*.*inlinemediadownloader.*$") "")
- (("[ \t]*.*tweetparsing.*$") "")
- (("[ \t]*.*usercounter.*$") ""))))
- (delete 'check)
- (add-after 'install 'custom-check
- (lambda* (#:key outputs tests? #:allow-other-keys)
- (when tests?
- ;; Tests require a running X server.
- (system "Xvfb :1 +extension GLX &")
- (setenv "DISPLAY" ":1")
- ;; Tests write to $HOME.
- (setenv "HOME" (getcwd))
- ;; Tests look for gsettings-schemas installed by the package.
- (setenv "XDG_DATA_DIRS"
- (string-append (getenv "XDG_DATA_DIRS")
- ":" (assoc-ref outputs "out") "/share"))
- (invoke "meson" "test"))))
- (add-after 'glib-or-gtk-wrap 'wrap-paths
- (lambda* (#:key outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out"))
- (bin (string-append out "/bin/"))
- (gst-plugin-path (getenv "GST_PLUGIN_SYSTEM_PATH"))
- (gi-typelib-path (getenv "GI_TYPELIB_PATH")))
- (wrap-program (string-append bin "cawbird")
- `("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path))
- `("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)))))))))
- (native-inputs
- `(("gettext" ,gettext-minimal)
- ("glib:bin" ,glib "bin")
- ("gobject-introspection" ,gobject-introspection)
- ("gtk+:bin" ,gtk+ "bin")
- ("pkg-config" ,pkg-config)
- ("vala" ,vala)
- ("xmllint" ,libxml2)
- ("xorg-server" ,xorg-server-for-tests)))
- (inputs
- `(("bash" ,bash-minimal) ; for wrap-program
- ("glib" ,glib)
- ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
- ("gspell" ,gspell)
- ("gstreamer" ,gstreamer)
- ("gst-libav" ,gst-libav)
- ("gst-plugins-bad" ,gst-plugins-bad)
- ("gst-plugins-base" ,gst-plugins-base)
- ("gst-plugins-good" ,gst-plugins-good)
- ("gtk+" ,gtk+)
- ("json-glib" ,json-glib)
- ("liboauth" ,liboauth)
- ("libsoup" ,libsoup)
- ("rest" ,rest)
- ("sqlite" ,sqlite)
- ("x11" ,libx11)))
- (propagated-inputs
- (list dconf))
- (synopsis "Client for Twitter")
- (description "Cawbird is a Twitter client built with GTK and Vala.
-It supports all features except non-mention notifications, polls, threads and
-cards.")
- (home-page "https://ibboard.co.uk/cawbird/")
- (license license:gpl3+)))
-
(define-public giara
(package
(name "giara")