ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-03 14:37:05 +03:00
Code Issues Packages Projects Releases Wiki Activity

Change prompt to ++tape.

Browse Source
This commit is contained in:
C. Guy Yarvin 2015-03-19 12:58:54 -07:00
parent 2ad78d1f60
commit b65636a0bf
3 changed files with 8 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
main/app/dojo/core.hook
View File

@ -574,7 +574,7 @@
++ he-prom :: send prompt ++ he-prom :: send prompt
%- he-rush %- he-rush
:- %pro :- %pro
[& %$ (tuba (weld (scow %p our.hid) ":dojo> "))] [& %$ (weld (scow %p our.hid) ":dojo> ")]
:: ::
++ he-made :: result from ford ++ he-made :: result from ford
|= [pax=path rey=(each bead (list tank))] |= [pax=path rey=(each bead (list tank))]

13
main/app/seat/core.hook
View File

@ -476,16 +476,15 @@
?^ ris ?^ ris
%= $ %= $
ris ~ ris ~
cap.pom cad.pom
`(list ,@)`:(welp "(reverse-i-search)'" str.u.ris "': ") :(welp "(reverse-i-search)'" (tufa str.u.ris) "': ")
== ==
=- [(add pos.inp (lent p.vew)) (weld p.vew q.vew)] =- [(add pos.inp (lent p.vew)) (weld (tuba p.vew) q.vew)]
^= vew ^- (pair (list ,@c) (list ,@c)) ^= vew ^- (pair tape (list ,@c))
?: vis.pom [cap.pom buf.say.inp] ?: vis.pom [cad.pom buf.say.inp]
:- ;: welp :- ;: welp
cap.pom cad.pom
?~ buf.say.inp ~ ?~ buf.say.inp ~
%- tuba
;: welp ;: welp
"<" "<"
(scow %p (end 4 1 (sham buf.say.inp))) (scow %p (end 4 1 (sham buf.say.inp)))

2
main/sur/console/core.hook
View File

@ -80,7 +80,7 @@
++ console-prompt :: prompt definition ++ console-prompt :: prompt definition
$: vis=? :: command visible $: vis=? :: command visible
tag=term :: history mode tag=term :: history mode
cap=(list ,@c) :: caption cad=tape :: caption
== :: == ::
++ console-input tape :: prompt input ++ console-input tape :: prompt input
++ console-share :: symmetric state ++ console-share :: symmetric state