[Bps-public-commit] PerlIO-via-dynamic branch, master, updated. 7de0db3269e56762e9c752de7d8267cb373de758

[Alex Vandiver]

The branch, master has been updated
       via  7de0db3269e56762e9c752de7d8267cb373de758 (commit)
       via  c673c9426688dbf66b8bd0d2f79f3b600de4337a (commit)
      from  52b0d25ddea752b557555d7909d4948359797bc4 (commit)

Summary of changes:
 CHANGES    | 4 ++++
 dynamic.pm | 6 +++---
 2 files changed, 7 insertions(+), 3 deletions(-)

- Log -----------------------------------------------------------------
commit c673c9426688dbf66b8bd0d2f79f3b600de4337a
Author: Alex Vandiver <alexmv at bestpractical.com>
Date:   Sat Nov 3 21:14:29 2012 -0400

    Update to work with 5.16 and above
    
    5.16 deprecated the 'defined @array' syntax; examine the typeglob instead

diff --git a/dynamic.pm b/dynamic.pm
index 37b6726..6fd5010 100644
--- a/dynamic.pm
+++ b/dynamic.pm
@@ -145,8 +145,8 @@ sub via {
 	return $via;
     }
     binmode ($fh, $via) or die $!;
-    if (defined ${*$fh}) {
-	if (defined @{*$fh}) {
+    if (defined *$fh{SCALAR}) {
+	if (defined *$fh{ARRAY}) {
 	    warn "handle $fh cannot hold references, namespace won't be cleaned";
 	    $self->{nogc} = 1;
 	}

commit 7de0db3269e56762e9c752de7d8267cb373de758
Author: Alex Vandiver <alexmv at bestpractical.com>
Date:   Sat Nov 3 21:16:32 2012 -0400

    Version bump to 0.14

diff --git a/CHANGES b/CHANGES
index d639307..47fa521 100644
--- a/CHANGES
+++ b/CHANGES
@@ -1,3 +1,7 @@
+[Changes for 0.14 - 3 Nov, 2012]
+
+* Update to not warn on perl 5.16 and above
+
 [Changes for 0.13 - 31 May, 2008]
 
 * Workaround a refcnt bug in Perl 5.10.0
diff --git a/dynamic.pm b/dynamic.pm
index 6fd5010..7d64290 100644
--- a/dynamic.pm
+++ b/dynamic.pm
@@ -1,6 +1,6 @@
 package PerlIO::via::dynamic;
 use strict;
-our $VERSION = '0.13';
+our $VERSION = '0.14';
 
 =head1 NAME
 

-----------------------------------------------------------------------