Correct %-.

This commit is contained in:
C. Guy Yarvin 2017-09-19 13:08:18 -07:00
parent d66cdad1f1
commit 115a8368be

View File

@ -1214,7 +1214,7 @@
$get /scar $get /scar
== ==
=+ gat=(slot 3 q.cay) =+ gat=(slot 3 q.cay)
:+ %cnhp (dy-silk-vase gat) :+ %call (dy-silk-vase gat)
:+ (dy-silk-vase !>([now=now.hid eny=eny.hid bec=he-beak])) :+ (dy-silk-vase !>([now=now.hid eny=eny.hid bec=he-beak]))
(dy-silk-sources p.cig) (dy-silk-sources p.cig)
:+ %mute (dy-silk-vase (fall (slew 27 gat) !>(~))) :+ %mute (dy-silk-vase (fall (slew 27 gat) !>(~)))
@ -1316,7 +1316,7 @@
$dv [/hand [%core he-beak (flop p.bil)]] $dv [/hand [%core he-beak (flop p.bil)]]
$ex [/hand (dy-mare p.bil)] $ex [/hand (dy-mare p.bil)]
$as [/hand [%cast p.bil [%$ (dy-cage p.q.bil)]]] $as [/hand [%cast p.bil [%$ (dy-cage p.q.bil)]]]
$do [/hand [%cnhp (dy-mare p.bil) [%$ (dy-cage p.q.bil)]]] $do [/hand [%call (dy-mare p.bil) [%$ (dy-cage p.q.bil)]]]
$tu :- /hand $tu :- /hand
:- %$ :- %$
:- %noun :- %noun