diff options
| author | Masaya Tojo <masaya@tojo.tokyo> | 2020-07-15 05:51:01 +0900 | 
|---|---|---|
| committer | Masaya Tojo <masaya@tojo.tokyo> | 2020-07-15 05:51:01 +0900 | 
| commit | 1321b087545c721766690086e08be4c88e95102b (patch) | |
| tree | 9866beff3c9f304742ac6debeb8ab572f5630e21 /qkbox | |
| parent | d561025b6c686d279df491d2e898c827d8c180ab (diff) | |
qkbox: toot: Export identifiers.
Diffstat (limited to 'qkbox')
| -rw-r--r-- | qkbox/toot.scm | 62 | 
1 files changed, 61 insertions, 1 deletions
| diff --git a/qkbox/toot.scm b/qkbox/toot.scm index f2602ea..0043fb8 100644 --- a/qkbox/toot.scm +++ b/qkbox/toot.scm @@ -38,7 +38,67 @@                  #:select (foldt))    #:use-module ((sxml xpath)                  #:select (sxpath)) -  #:use-module (rnrs io ports)) +  #:use-module (rnrs io ports) +  #:export (;; config +            current-mastodon-host +            current-mastodon-access-token + +            ;; get +            fetch-status +            fetch-account +            fetch-home-timeline +            fetch-public-timeline + +            ;; post +            post +            favourite +            unfavourite +            reblog +            unreblog + +            ;; streaming +            streaming-user +            streaming-public +             +            ;; status +            status? +            status-id +            status-emojis +            status-reblog +            status-account +            status-content +            status-public? +            status-sensitive? +            status-visibility +            status-spoiler-text +            status-creation-time +            status-in-reply-to-id +            status-in-reply-to-account-id +            display-status + +            ;; notification +            notification? +            notification-id +            notification-type +            notification-status +            notification-account +            notification-creation-time +            display-notification + +            ;; emoji +            emoji? +            emoji-shortcode +            emoji-static-url +            emoji-visible-in-picker? + +            ;; account +            account? +            account-id +            account-acct +            account-emojis +            account-display-name +            account-avatar-static +            ))  (define-syntax-rule (and/nil test expr)    (if test | 
