X-Git-Url: http://erislabs.net/gitweb/?p=liburi-template-perl.git;a=blobdiff_plain;f=lib%2FURI%2FTemplate.pm;fp=lib%2FURI%2FTemplate.pm;h=390f6a6ec94849050ee104c3231210f63bc7baeb;hp=79c944f95842d52bdcf8e3d13af6b87066382af0;hb=39817159a196a6acb7ce58266633ad6ea8490864;hpb=81c7f1b85cb98976fe96ad4f8a11037b2cb3de35

diff --git a/lib/URI/Template.pm b/lib/URI/Template.pm
index 79c944f..390f6a6 100644
--- a/lib/URI/Template.pm
+++ b/lib/URI/Template.pm
@@ -3,7 +3,7 @@ package URI::Template;
 use strict;
 use warnings;
 
-our $VERSION = '0.16';
+our $VERSION = '0.17';
 
 use URI;
 use URI::Escape        ();
@@ -123,7 +123,10 @@ sub _tostring_query {
     $join = '&' if $exp->{ op } =~ /[?&]/;
 
     if ( ref $value eq 'ARRAY' ) {
-        return unless @$value;
+        if( !@$value ) {
+            return if $var->{ explode };
+            return $var->{ name } . '=';
+        }
         if ( $var->{ explode } ) {
             return join( $join,
                 map { $var->{ name } . '=' . _quote( $_, $safe ) } @$value );
@@ -134,7 +137,10 @@ sub _tostring_query {
         }
     }
     elsif ( ref $value eq 'HASH' ) {
-        return unless keys %$value;
+        if( !keys %$value ) {
+            return if $var->{ explode };
+            return $var->{ name } . '=';
+        }
         if ( $var->{ explode } ) {
             return join(
                 $join,
@@ -387,7 +393,7 @@ URI object.
 
 =head1 COPYRIGHT AND LICENSE
 
-Copyright 2007-2012 by Brian Cassidy
+Copyright 2007-2013 by Brian Cassidy
 
 This library is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.