oops

yappo · Sep 4, 2009 · 9ac1872 · 9ac1872
1 parent 010c979
commit 9ac1872
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/lib/PSGIRef/Request.pm b/lib/PSGIRef/Request.pm
@@ -80,6 +80,14 @@ sub _parse_params {
     }
 }
 
+sub _parse_keywordlist {
+    my ( $self, $data ) = @_;
+    return () unless defined $data;
+    $data = URI::Escape::uri_unescape($data);
+    my @keywords = split /\s+/, $data;
+    return @keywords;
+}
+
 sub _add_param {
     my ( $self, $param, $value, $overwrite ) = @_;
     return () unless defined $param and defined $value;