Deprecate |begin

This commit is contained in:
Raymond Pasco 2015-11-19 17:29:54 -05:00
parent abf1f95695
commit 874bf0ac58

View File

@ -13,9 +13,13 @@
[sole .]
:- %ask
|= $: [now=@da eny=@uvI bec=beak]
[arg=_(scug *@ ~[his=*@p tic=*@p]) ~]
[arg=_(scug *@ ~[his=*@p tic=*@p])]
safety=?(%on %off)
==
^- (sole-result (cask begs))
?. =(safety %off)
%+ sole-yo leaf/"|begin is deprecated, please use -w -t"
sole-no
=- ?~ arg -
=+ (fun.q.q his.arg)
?~ +.arg -