on main help sign in
add monkey patch for groups
commitfa58580a0b1138c14e9c66c8649d6a5bda3e74de authorJohn Hyde <johnhydefour@gmail.com> dateThu 9 Mar 2023, 16:51 (4 years ago) parent24c43ab
3 files changed+33−2
desk/app/astrolabe.hoon+11−1 desk/desk.docket-0+1−1 desk/lib/astrolabe.hoon+21
desk/app/astrolabe.hoon+11−1
@@ -31,7 +31,9 @@
3131 ?> ?=(%4 -.new)
3232 =/ cards=(list card)
3333 =/ ug-vase !>([/astrolabe '/apps/astrolabe/#'])
34− [%pass /monkey-ug %agent [our.bowl %monkey] %poke [%bind-ug ug-vase]]~
34+ :~ [%pass /monkey-ug %agent [our.bowl %monkey] %poke [%bind-ug ug-vase]]
35+ groups-link-patch-card:hc
36+ ==
3537 =. cards (weld cards-01 cards)
3638 [cards this(state new)]
3739++ on-poke on-poke:def
@@ -308,6 +310,14 @@
308310 (pdata:smel (pmeta:smel gal npoint) ~)
309311 s+(crip :(weld "[" gal-data main-data "]"))
310312::
313+::
314+++ groups-link-patch-card
315+ =/ catch [%cord '/apps/groups/desk.js']
316+ =/ hatch [%before "."]
317+ =/ patch [/apps/astrolabe catch hatch groups-link-thatch]
318+ =/ patch-kit-vase !>([/groups/astrolabe/link patch])
319+ [%pass /monkey/patch/groups/link %agent [our.bowl %monkey] %poke [%patch patch-kit-vase]]
320+::
311321++ read-doc
312322 |= =path
313323 =/ doc-path=^path :(weld /doc/usr path /udon)
desk/desk.docket-0+1−1
@@ -4,7 +4,7 @@
44 image+'https://raw.githubusercontent.com/johnhyde/astrolabe/main/ui/src/assets/astrolabe-tile.svg'
55 glob-http+['https://s3.us-east-2.amazonaws.com/warkgnall.com/urbit/astrolabe/globs/glob-0v4.88rt1.guqn5.nnatp.lca68.ej9aj.glob' 0v4.88rt1.guqn5.nnatp.lca68.ej9aj]
66 base+'astrolabe'
7− version+[1 0 0]
7+ version+[1 0 1]
88 website+'https://github.com/johnhyde/astrolabe'
99 license+'MIT'
1010==
desk/lib/astrolabe.hoon+21
@@ -203,4 +203,25 @@
203203 ^- $-(json [%share ship])
204204 (of share+(su ;~(pfix sig fed:ag)) ~)
205205 --
206+::
207+::
208+++ groups-link-thatch
209+'''
210+setInterval(() => {
211+ const spans = document.querySelectorAll('section > div > div > div > span > span:first-child');
212+ spans.forEach((span) => {
213+ if (span.innerHTML !== '~') return;
214+ let c = span.parentElement.parentElement;
215+ if (c.children.length > 1) return;
216+ let patp = c.innerText;
217+ let b = document.createElement('a');
218+ b.innerHTML = "View in Astrolabe";
219+ b.className = 'button ml-4';
220+ b.href = 'web+urbitgraph://astrolabe/ship/' + patp;
221+ b.target = '_blank';
222+ b.style.backgroundColor = "navy";
223+ c.appendChild(b);
224+ });
225+}, 100);
226+'''
206227--