src/forgejo/orgs.sgl — sigil-forgejo

1;;; (forgejo orgs) - Forgejo organization API.

2;;;

3;;; List organization repositories and information.

5(define-library (forgejo orgs)

6 (import (sigil core)

7 (sigil string)

8 (forgejo client))

10 (export forgejo-get-org

11 forgejo-list-org-repos)

13 (begin

15 ;;; Get organization information.

16 (define (forgejo-get-org base-url token org)

17 (forgejo-get/json token

18 (forgejo-api-url base-url "orgs" org)))

20 ;;; List repositories in an organization.

21 ;;;

22 ;;; Returns an array of repository objects.

23 (define (forgejo-list-org-repos base-url token org)

24 (forgejo-get/json token

25 (string-append (forgejo-api-url base-url "orgs" org "repos")

26 "?limit=50")))

28 ))