diff --git a/Socialmetrica.package/Nitter.class/README.md b/Socialmetrica.package/Nitter.class/README.md new file mode 100644 index 0000000..e69de29 diff --git a/Socialmetrica.package/Nitter.class/class/instanceRows.st b/Socialmetrica.package/Nitter.class/class/instanceRows.st new file mode 100644 index 0000000..e8bda32 --- /dev/null +++ b/Socialmetrica.package/Nitter.class/class/instanceRows.st @@ -0,0 +1,6 @@ +accessing +instanceRows + ^ (self instances at: 'hosts') collect: [:rawRow | | newRow | + newRow := OrderedCollection new. + newRow add: (rawRow at: 'url') + ]. \ No newline at end of file diff --git a/Socialmetrica.package/Nitter.class/class/instances.st b/Socialmetrica.package/Nitter.class/class/instances.st new file mode 100644 index 0000000..f9bb202 --- /dev/null +++ b/Socialmetrica.package/Nitter.class/class/instances.st @@ -0,0 +1,4 @@ +accessing +instances + + ^ STONJSON fromString: 'https://status.d420.de/api/v1/instances' asUrl retrieveContents \ No newline at end of file diff --git a/Socialmetrica.package/Nitter.class/class/viewInstancesFor..st b/Socialmetrica.package/Nitter.class/class/viewInstancesFor..st new file mode 100644 index 0000000..ded03bd --- /dev/null +++ b/Socialmetrica.package/Nitter.class/class/viewInstancesFor..st @@ -0,0 +1,10 @@ +accessing +viewInstancesFor: aView + + | columnedList | + self instances isEmptyOrNil ifTrue: [ ^ aView empty]. + columnedList := aView columnedList + title: 'Instances'; + items: [ self instanceRows ]; + priority: 80. + ^ columnedList \ No newline at end of file diff --git a/Socialmetrica.package/Nitter.class/properties.json b/Socialmetrica.package/Nitter.class/properties.json new file mode 100644 index 0000000..ebf6599 --- /dev/null +++ b/Socialmetrica.package/Nitter.class/properties.json @@ -0,0 +1,11 @@ +{ + "commentStamp" : "", + "super" : "Object", + "category" : "Socialmetrica", + "classinstvars" : [ ], + "pools" : [ ], + "classvars" : [ ], + "instvars" : [ ], + "name" : "Nitter", + "type" : "normal" +} \ No newline at end of file