osc copypac from project:devel:languages:haskell:ghc-8.10.x package:ghc-dbus revision:8, using keep-link

OBS-URL: https://build.opensuse.org/package/show/devel:languages:haskell/ghc-dbus?expand=0&rev=36
This commit is contained in:
Peter Simons 2020-05-06 13:42:09 +00:00 committed by Git OBS Bridge
parent 1c7f4b6a10
commit b5f606d7d5
4 changed files with 12 additions and 23 deletions

View File

@ -1,3 +0,0 @@
version https://git-lfs.github.com/spec/v1
oid sha256:6840fc562207f611e450cd82199363e279a7496f4f47f1e5749a860d8015ae6c
size 78163

3
dbus-1.2.14.tar.gz Normal file
View File

@ -0,0 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:28e7fa7e06054759dc1f0eb196df314948d9a48c1a7ff37d6d20b18d84246070
size 78005

View File

@ -1,18 +1,7 @@
------------------------------------------------------------------- -------------------------------------------------------------------
Wed Apr 1 12:37:25 UTC 2020 - psimons@suse.com Wed May 6 06:54:12 UTC 2020 - psimons@suse.com
- Update dbus to version 1.2.13. - Update dbus to version 1.2.14.
Upstream does not provide a change log file.
-------------------------------------------------------------------
Sat Mar 28 10:59:36 UTC 2020 - Ondřej Súkup <mimi.vx@gmail.com>
- remove workaround for dep constraints
-------------------------------------------------------------------
Tue Mar 24 08:07:18 UTC 2020 - psimons@suse.com
- Update dbus to version 1.2.12.
Upstream does not provide a change log file. Upstream does not provide a change log file.
------------------------------------------------------------------- -------------------------------------------------------------------

View File

@ -19,7 +19,7 @@
%global pkg_name dbus %global pkg_name dbus
%bcond_with tests %bcond_with tests
Name: ghc-%{pkg_name} Name: ghc-%{pkg_name}
Version: 1.2.13 Version: 1.2.14
Release: 0 Release: 0
Summary: A client library for the D-Bus IPC system Summary: A client library for the D-Bus IPC system
License: Apache-2.0 License: Apache-2.0
@ -76,14 +76,14 @@ Example: connect to the session bus, and get a list of active names.
import Data.List (sort) import DBus import DBus.Client import Data.List (sort) import DBus import DBus.Client
main = do &#x20; client <- connectSession &#x20; // &#x20; -- Request a list of main = do &#x20; client <- connectSession &#x20; &#x20; -- Request a list of
connected clients from the bus &#x20; reply <- call_ client (methodCall connected clients from the bus &#x20; reply <- call_ client (methodCall
"/org/freedesktop/DBus" "org.freedesktop.DBus" "ListNames") &#x20; &#x7b; "/org/freedesktop/DBus" "org.freedesktop.DBus" "ListNames") &#x20; &#x7b;
methodCallDestination = Just "org.freedesktop.DBus" &#x20; &#x7d; &#x20; // methodCallDestination = Just "org.freedesktop.DBus" &#x20; &#x7d; &#x20; &#x20;
&#x20; -- org.freedesktop.DBus.ListNames() returns a single value, which is -- org.freedesktop.DBus.ListNames() returns a single value, which is &#x20; --
&#x20; -- a list of names (here represented as [String]) &#x20; let Just names a list of names (here represented as [String]) &#x20; let Just names =
= fromVariant (methodReturnBody reply !! 0) &#x20; // &#x20; -- Print each name fromVariant (methodReturnBody reply !! 0) &#x20; &#x20; -- Print each name on a
on a line, sorted so reserved names are below &#x20; -- temporary names. line, sorted so reserved names are below &#x20; -- temporary names.
&#x20; mapM_ putStrLn (sort names) ' &#x20; mapM_ putStrLn (sort names) '
>$ ghc --make list-names.hs >$ ./list-names >:1.0 >:1.1 >:1.10 >:1.106 >:1.109 >$ ghc --make list-names.hs >$ ./list-names >:1.0 >:1.1 >:1.10 >:1.106 >:1.109