From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 2 Feb 2011 10:04:50 +0000 (+0100)
Subject: Doppelpunkte in URLs escapen
X-Git-Tag: release-2.6.2~9^2
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=0b7df656e6257477c0ce936c4295c7be0565ab6d;p=kivitendo-erp.git

Doppelpunkte in URLs escapen
---

diff --git a/SL/Form.pm b/SL/Form.pm
index 6b1ee5009..f9dc3dd59 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -378,7 +378,7 @@ sub escape {
   my ($self, $str) = @_;
 
   $str =  Encode::encode('utf-8-strict', $str) if $::locale->is_utf8;
-  $str =~ s/([^a-zA-Z0-9_.-])/sprintf("%%%02x", ord($1))/ge;
+  $str =~ s/([^a-zA-Z0-9_.:-])/sprintf("%%%02x", ord($1))/ge;
 
   $main::lxdebug->leave_sub(2);