From: Matt S Trout <mst@shadowcat.co.uk>
Date: Wed, 16 Feb 2011 02:27:33 +0000 (+0000)
Subject: explain ref-printing in error (anti-stringify device)
X-Git-Tag: v0.001000~35
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a3e39afdc57da2632262e093a7bca8c9d7a76984;p=p5sagit%2FDistar.git

explain ref-printing in error (anti-stringify device)
---

diff --git a/lib/Distar.pm b/lib/Distar.pm
index c589150..824d294 100644
--- a/lib/Distar.pm
+++ b/lib/Distar.pm
@@ -39,6 +39,7 @@ sub write_manifest_skip {
         ? $spec
         : !ref($spec)
           ? ".*\Q${spec}\E"
+            # print ref as well as stringification in case of overload ""
           : die "spec must be string or regexp, was: ${spec} (${\ref $spec})");
     push @parts, $re;
   }