From b8f24f253527e1cb071785c3b2d677ed2f734ab1 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <eelco.dolstra@logicblox.com>
Date: Fri, 11 Jul 2014 14:27:17 +0200
Subject: [PATCH] Fix closure size display

---
 perl/lib/Nix/CopyClosure.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/lib/Nix/CopyClosure.pm b/perl/lib/Nix/CopyClosure.pm
index 8be4ead763..131f0b5a45 100644
--- a/perl/lib/Nix/CopyClosure.pm
+++ b/perl/lib/Nix/CopyClosure.pm
@@ -91,7 +91,7 @@ sub copyTo {
     $missingSize += (queryPathInfo($_, 1))[3] foreach @missing;
 
     printf STDERR "copying %d missing paths (%.2f MiB) to ‘$sshHost’...\n",
-        scalar(@missing), $missingSize / (1024.0^2);
+        scalar(@missing), $missingSize / (1024**2);
     return if $dryRun;
 
     # Send the "import paths" command.