support for files with @ symbol in their name

This fixes the issue with 64x64@2 Icon files and others that contain the "@" symbol in them.

1 files changed, 2 insertions, 1 deletions

diff --git a/apt-mirror b/apt-mirror
index d00d79b..fd97a46 100755
--- a/apt-mirror
+++ b/apt-mirror
@@ -485,7 +485,8 @@ sub sanitise_uri
 {
     my $uri = shift;
     $uri =~ s[^(\w+)://][];
-    $uri =~ s/^([^@]+)?@?// if $uri =~ /@/;
+    #$uri =~ s/^([^@]+)?@?// if $uri =~ /@/;
+    $uri =~ s/^([^@]+)?@?// if (split '/',$uri)[0] =~ /@/;
     $uri =~ s&:\d+/&/&;                       # and port information
     $uri =~ s/~/\%7E/g if get_variable("_tilde");
     return $uri;