X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDX%2FVar.pm;h=a711f98e4a0dc2e18e0bacbc3bca63d1f405e10d;hb=b40d5c51f4c9706df66414a69695860b37fbaca0;hp=0017ffa6b99ce0a537c44e91e8cdfd019d0aa65c;hpb=46894e63502d110224f93c829892382559dfdd06;p=scpubgit%2FDKit.git

diff --git a/lib/DX/Var.pm b/lib/DX/Var.pm
index 0017ffa..a711f98 100644
--- a/lib/DX/Var.pm
+++ b/lib/DX/Var.pm
@@ -15,4 +15,9 @@ sub with_stream {
   $self->new(%$self, bound_stream => $stream);
 }
 
+sub with_value {
+  my ($self, $stream) = @_;
+  $self->new(%$self, bound_value => $stream);
+}
+
 1;