about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorelioat <hi@eli.li>2023-07-10 16:20:25 -0400
committerelioat <hi@eli.li>2023-07-10 16:20:25 -0400
commit2b84e331669936318bed1a6ea2cb470bb1fa8303 (patch)
tree19cb9b70ab4f4754e5f28a88bb18900f3dbd4905
parentfe8db346cbef45f33d50acabbaa2885fc1e8bd12 (diff)
downloadtour-2b84e331669936318bed1a6ea2cb470bb1fa8303.tar.gz
*
-rw-r--r--janet/fedi-playground/.gitignore2
-rw-r--r--janet/fedi-playground/play.janet90
-rw-r--r--janet/fedi-playground/project.janet6
3 files changed, 96 insertions, 2 deletions
diff --git a/janet/fedi-playground/.gitignore b/janet/fedi-playground/.gitignore
new file mode 100644
index 0000000..4bbe471
--- /dev/null
+++ b/janet/fedi-playground/.gitignore
@@ -0,0 +1,2 @@
+jpm_tree
+jpm_tree/*
\ No newline at end of file
diff --git a/janet/fedi-playground/play.janet b/janet/fedi-playground/play.janet
index f0a9cc5..55e1472 100644
--- a/janet/fedi-playground/play.janet
+++ b/janet/fedi-playground/play.janet
@@ -1,4 +1,5 @@
-(use spork) 
+(use spork)
+(use judge)
 
 # a utility script used to explore my fediverse followers
 
@@ -31,4 +32,89 @@
   a)
 
 (def follower-accounts
-  (select-by-key "acct" all-followers))
\ No newline at end of file
+  (select-by-key "acct" all-followers))
+
+(def follower-usernames
+  (select-by-key "username" all-followers))
+
+(test (select-by-key "acct" all-followers)
+  @["brendan@merveilles.town"
+    "balrogboogie@mastodon.art"
+    "mstange@mastodon.social"
+    "mario_afk@merveilles.town"
+    "hanbruder@ecoevo.social"
+    "angelo@social.droppedbits.com"
+    "akkartik@lethallava.land"
+    "kategenevieve@assemblag.es"
+    "kidskylark"
+    "saltimbanque@mamot.fr"
+    "dcreager@dcreager.net"
+    "computersandblues@post.lurk.org"
+    "tamberg@quite.social"
+    "hs0ucy@jasette.facil.services"
+    "prahou@merveilles.town"
+    "nix@merveilles.town"
+    "cidney@social.city-of-glass.net"
+    "alyssa@cloudisland.nz"
+    "hastur@hackers.town"
+    "cian@post.lurk.org"
+    "ben@a11y.info"
+    "jeremy@boles.social"
+    "pkra@bonn.social"
+    "typeable@mastodon.social"
+    "nocko@kolektiva.social"
+    "ioezg@emacs.ch"
+    "jleightcap@treehouse.systems"
+    "arcade@catcatnya.com"
+    "illegaldaydream@kolektiva.social"
+    "maro@merveilles.town"
+    "halfflat@calckey.social"
+    "julienxx@nein.club"
+    "required@zero.parts"
+    "lior@mastodon.social"
+    "Amirography@fosstodon.org"
+    "decentral1se@varia.zone"
+    "mirth@mastodon.sdf.org"
+    "tbsp@merveilles.town"
+    "plexus@toot.cat"
+    "cblgh@merveilles.town"
+    "spiralganglion@mastodon.social"
+    "booters@kolektiva.social"
+    "thegr8whoopdini@bookwyrm.social"
+    "pixx@merveilles.town"
+    "angelo@social.lol"
+    "HarneyB@decept.org"
+    "woozong@post.lurk.org"
+    "sieve@hachyderm.io"
+    "amszmidt@mastodon.social"
+    "karlinfox@mastodon.cloud"
+    "resoluxe@mastodon.art"
+    "idlestate@toot.cat"
+    "fmflake@mastodon.social"
+    "raychill@aus.social"
+    "selmakovich@eldritch.cafe"
+    "bartgo@fosstodon.org"
+    "GoodClover@en.osm.town"
+    "levibeach@merveilles.town"
+    "celebrion@mastodon.online"
+    "benji@fosstodon.org"
+    "nilmethod@pleroma.destroyallmachines.net"
+    "nikken@post.lurk.org"
+    "lobo@merveilles.town"
+    "ophiuchoid@indieweb.social"
+    "mu@merveilles.town"
+    "kieranmcguire@mastodon.online"
+    "yagaruma@mastodon.social"
+    "dook@post.lurk.org"
+    "wilfredh@mastodon.social"
+    "Jetengineweasel@hackers.town"
+    "DrTCombs@transportation.social"
+    "jy4m@matapacos.dog"
+    "ivmirx@mas.to"
+    "vanja@tech.lgbt"
+    "abuseofnotation@mathstodon.xyz"
+    "jes5199@mastodon.social"
+    "ouro@social.snircle.space"
+    "typeswitch@gamedev.lgbt"
+    "Ronkjeffries@mastodon.social"
+    "bogmon@mstdn.social"])
\ No newline at end of file
diff --git a/janet/fedi-playground/project.janet b/janet/fedi-playground/project.janet
new file mode 100644
index 0000000..a8629ce
--- /dev/null
+++ b/janet/fedi-playground/project.janet
@@ -0,0 +1,6 @@
+(declare-project
+  :dependencies [
+    {:url "https://github.com/ianthehenry/judge.git"
+     :tag "v2.6.1"}
+    {:url "https://github.com/janet-lang/spork.git"}
+  ])
\ No newline at end of file