mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-20 21:31:32 +03:00
23 lines
504 B
Plaintext
23 lines
504 B
Plaintext
:: %clay browser
|
|
::
|
|
:::: /hook/hymn/dirs/fab/pub
|
|
::
|
|
/= gas /$ fuel
|
|
/= rut /$ |= [a=beam path] ^- [p=path q=path]
|
|
[(tope a(s ~)) (flop (slag 1 s.a))]
|
|
!:
|
|
:::: ~pittyp-pittyp
|
|
::
|
|
=+ pax=`path`(flop but.gas)
|
|
=+ cot=(trip ;;(,@ (fall (file (welp p.rut pax)) 'No such file')))
|
|
=+ js="""
|
|
window.location = "/gen/main{<q.rut>}/" + pax.value
|
|
"""
|
|
;html
|
|
;head:title:"{<pax>}"
|
|
;body
|
|
;input#pax(onchange js, value (slag 1 <pax>));
|
|
;pre:"{cot}"
|
|
==
|
|
==
|