From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Thu, 13 Aug 2009 00:06:48 +0000 (+0000)
Subject: strict removal only of command-line params
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=3f0581c38df5bff41168d6ff36e77bd142e8ba25;p=pxelator

strict removal only of command-line params
---

diff --git a/lib/PXElator/CouchDB.pm b/lib/PXElator/CouchDB.pm
index 45bd314..7e012f2 100644
--- a/lib/PXElator/CouchDB.pm
+++ b/lib/PXElator/CouchDB.pm
@@ -99,7 +99,7 @@ sub audit {
 	my $data = pop @_;
 
 	my $url = join(' ', @_);
-	$url =~ s/-\S+//g;
+	$url =~ s/\s+-\S+//g;	# remove command line options
 	$url =~ s/\W+/-/g;
 
 	my ( $package, $file, $line, $sub ) = caller(1);