wrote a little #gauche #scheme script to quickly check for the nodeinfo on a site
% fedi.scm -w mastodon.social
((links . #(((rel . http://nodeinfo.diaspora.software/ns/schema/2.0) (href . https://mastodon.social/nodeinfo/2.0)))))
wrote a Gauche #Scheme script to query a #mastodon instance blocklist and save it out to an importable file
(define (blocks domain)
(json-link #"https://~|domain|/api/v1/instance/domain_blocks"))
(define (blocklist domain file)
(call-with-output-file file
(lambda (out)
(for-each (lambda (block)
(write-string (cdr (assoc "domain" block)) out)
(newline out))
(vector->list (blocks domain))))))
The best WebAssembly lispy language is released. Guile Hoot 0.6.0 is in the wild now.
The most exciting update for me is an implementation of macroexpander, which means eval is around the corner and we can start working on Hoot support for Arei/Ares Guile Scheme IDE soon.
https://spritely.institute/news/guile-hoot-0-6-0-released.html
I have a #Scheme script for public #mastodon api queries
fedi.scm -tags pc.cafe
#(((id . 1) (name . mastodon) (url . https://pc.cafe/tags/mastodon) (history . #(((day . 1752537600) (accounts . 9) (uses . 10)) ((day . 1752451200) (accounts . 4) (uses . 4)) ((day . 1752364800) (accounts . 11) (uses . 16)) ((day . 1752278400) (accounts . 7) (uses . 13)) ((day . 1752192000) (accounts . 14) (uses . 19)) ((day . 1752105600) (accounts . 13) (uses . 19)) ((day . 1752019200) (accounts . 7) (uses . 7))))))
webfinger from Gauche #Scheme
wf.scm -u pc@pc.cafe
((subject . acct:pc@pc.cafe) (aliases . #(https://pc.cafe/@pc https://pc.cafe/users/pc)) (links . #(((rel . http://webfinger.net/rel/profile-page) (type . text/html) (href . https://pc.cafe/@pc)) ((rel . self) (type . application/activity+json) (href . https://pc.cafe/users/pc)) ((rel . http://ostatus.org/schema/1.0/subscribe) (template . https://pc.cafe/authorize_interaction?uri={uri})) ((rel . http://webfinger.net/rel/avatar) (type . image/jpeg) (href . https://cdn.masto.host/pccafe/accounts/avatars/112/456/826/964/866/774/original/11834150fa19073e.jpeg)))))
wrote a Gauche #Scheme script to track down missing localizations in Localizable.xcstrings
% loccheck.scm -l it
missing in instance.limits.maxProfileFieldNameChars %lld
missing in instance.stats.comments %lld
missing in neo.tv.seasons %lld
source language: en
strings: 609
https://codeberg.org/technicat/schematic/src/branch/master/loccheck.scm
running a #scheme script to check missing localizations
% loccheck.scm -l fr
missing fr in vo.account.avatar.text %@
missing fr in vo.account.avatarname %@ %@
missing fr in vo.account.bio %@
missing fr in vo.account.field %@ %@
missing fr in vo.account.following.since %@
missing fr in vo.account.header.text %@
missing fr in vo.account.name.display %@
missing fr in vo.neo.description %@
missing fr in vo.post.revision.view
missing fr in vo.post.summary %@ %@ %@ %@
found: 521 / 531
