From: Matt S Trout <mst@shadowcat.co.uk>
Date: Wed, 16 Mar 2016 14:35:02 +0000 (+0000)
Subject: deparse steps
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cdf7d310e14e4e4354034400c35f574f0c2173c9;p=scpubgit%2FDX.git

deparse steps
---

diff --git a/lib/DX/Deparse.pm b/lib/DX/Deparse.pm
index 2d3b2ac..2df9a0f 100644
--- a/lib/DX/Deparse.pm
+++ b/lib/DX/Deparse.pm
@@ -181,4 +181,12 @@ sub _fmt_searchstate {
   ], $meta);
 }
 
+sub _fmt_step_normal {
+  my ($self, $step, $meta) = @_;
+  $self->_fmt_object([
+    [ actions => $step->actions ],
+    [ alternative_step => $step->alternative_step ],
+  ], $meta);
+}
+
 1;