From 5d8225a4f8f033bf11b85c786b1434f63f67dcea Mon Sep 17 00:00:00 2001
From: Elizabeth Mattijsen <liz@dijkmat.nl>
Date: Wed, 23 Apr 2014 22:17:52 +0200
Subject: [PATCH] Pass on expires properly to Supply.uniq

---
 src/core/SupplyOperations.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/core/SupplyOperations.pm b/src/core/SupplyOperations.pm
index 34cc2828645..007cae39f9e 100644
--- a/src/core/SupplyOperations.pm
+++ b/src/core/SupplyOperations.pm
@@ -135,7 +135,7 @@ my class SupplyOperations is repr('Uninstantiable') {
             has &!with;
             has $!expires;
 
-            submethod BUILD(:$!source, :&!as, :&!with, :$expires) { }
+            submethod BUILD(:$!source, :&!as, :&!with, :$!expires) { }
             
             method tap(|c) {
                 my $source_tap;
@@ -255,7 +255,7 @@ my class SupplyOperations is repr('Uninstantiable') {
                 $sub
             }
         }
-        UniqSupply.new(:source($a), :&as, :&with);
+        UniqSupply.new(:source($a), :&as, :&with, :$expires);
     }
 
     method squish(Supply $a, :&as, :&with is copy) {