From 33d229bbb4a02bf1f2880850c982307000fac5e2 Mon Sep 17 00:00:00 2001
From: Luke Dashjr <luke-jr+git@utopios.org>
Date: Mon, 10 Jan 2011 12:53:12 -0500
Subject: [PATCH] add query_form function from Perl URI

---
 lib/URI.js |   17 +++++++++++++++++
 1 files changed, 17 insertions(+), 0 deletions(-)

diff --git a/lib/URI.js b/lib/URI.js
index 828cada..8df2dfe 100644
--- a/lib/URI.js
+++ b/lib/URI.js
@@ -153,4 +153,21 @@ URI.prototype.toString = function () {
 
         return target;
     };
+
+    var query_decode = function(txt) {
+        return decodeURI(txt.replace(/\+/, ' '));
+    };
+
+    URI.prototype.query_form = function () {
+        var kvp = this.query.split(/[&;]/);
+        var rv = ({});
+        for (var i = 0; i < kvp.length; ++i)
+        {
+            var kva = kvp[i].split(/\=/);
+            var key = query_decode(kva[0]);
+            var val = query_decode(kva[1]);
+            rv[key] = val;
+        }
+        return rv;
+    };
 })();
-- 
1.7.2.2