diff options
Diffstat (limited to 'src/scm/webid-oidc/client/gui/clock.scm')
| -rw-r--r-- | src/scm/webid-oidc/client/gui/clock.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/scm/webid-oidc/client/gui/clock.scm b/src/scm/webid-oidc/client/gui/clock.scm index efb7ce8..87d6b48 100644 --- a/src/scm/webid-oidc/client/gui/clock.scm +++ b/src/scm/webid-oidc/client/gui/clock.scm @@ -20,7 +20,10 @@ #:use-module (gi util) #:use-module (ice-9 atomic) #:use-module (webid-oidc client gui application-hooks) + #:use-module (webid-oidc client application) + #:use-module ((webid-oidc client gui settings) #:prefix settings:) #:declarative? #t + #:duplicates (merge-generics) #:export (wait)) (use-typelibs ("GLib" "2.0")) @@ -37,6 +40,8 @@ (if (eq? old (atomic-box-compare-and-swap! pending-ops old '())) (begin (for-each (lambda (f) (f)) (reverse old)) + (settings:application-state + (join (settings:application-state))) #t) (run)))) |