urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-11-28 13:54:20 +03:00
Code Issues Packages Projects Releases Wiki Activity

tomb: remove |rm prompt

Browse Source 
if you're trying to tombstone at the head of the desk, you probably
don't know what you're doing. so we abort.

we keep the option to `|rm` any matching hashes in other desks since
this is something the tombstoner might not know exists in advance and is
actively blocking them from completing the desired tombstone operation.
This commit is contained in:
ryjm 2023-02-27 12:25:29 -05:00
parent 47ab7efb27
commit f218327986
1 changed files with 0 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
pkg/arvo/gen/hood/tomb.hoon
View File

@ -57,19 +57,6 @@
:: print out the paths blocking the tomb
%+ prints (snoc prat leaf+"tomb blocked by:")
:: prompt for deletion using |rm
%+ prompt
(prom %m "|rm {<pax>} from head ({<let.do>}) of {<dusk>} instead? (y/N)")
|= rm-hed=tape
?: |(=("y" rm-hed) =("Y" rm-hed) =("yes" rm-hed))
=/ paz=path (en-beam hed)
?: dry
(print (crip "dry run: would remove {<paths>} from {<dusk>}") no-product)
%+ produce %helm-pans
~[(rm paz)]
:: abort if no other desks using target
?~ used
(print (crip "aborting") no-product)
::
%+ prompt (prom %r "|rm from head of each desk instead (DANGER)? (y/N)")
|= rm-all=tape
?. |(=("y" rm-all) =("Y" rm-all) =("yes" rm-all))