When receiving a new circle configuration, print the description and filter rules.

Closes #467.
This commit is contained in:
Fang 2017-12-11 19:54:22 +01:00
parent 7ea1a0507a
commit 0243f1f276

View File

@ -1632,7 +1632,10 @@
^+ +>
?: (~(has in settings.she) %quiet) +>
?: ?=($full -.dif)
(sh-note (weld "new " (~(cr-show cr cir) ~)))
=. +>
(sh-note (weld "new " (~(cr-show cr cir) ~)))
=. +> $(dif [%caption cap.cof.dif])
$(dif [%filter fit.cof.dif])
?: ?=($remove -.dif)
(sh-note (weld "rip " (~(cr-show cr cir) ~)))
%- sh-note
@ -1644,7 +1647,7 @@
~(cr-full cr cir.src.dif)
::
$caption
"cap {(trip cap.dif)}"
"cap: {(trip cap.dif)}"
::
$filter
;: weld