Bug#828084: Proposed patch to dak/debianqueued

[Ansgar Burchardt]

Hi,

Mathieu Parent  writes:
> See attached patch.
>
> This actually ignore files:
> - starting with a dot
> - containing a colon (See: #828084)

Thanks, I've applied your patch.

Ansgar

Bug#828084: Proposed patch to dak/debianqueued

[Mathieu Parent]

See attached patch.

This actually ignore files:
- starting with a dot
- containing a colon (See: #828084)

Regards
-- 
Mathieu Parent
From 1f5b0f6bf7dafb7816f7e1ad4f38ec8335215395 Mon Sep 17 00:00:00 2001
From: Mathieu Parent 
Date: Fri, 24 Jun 2016 22:10:52 +0200
Subject: [PATCH] Be more restrictive in accepted files

to match daklib/regexes.py (re_file_safe).

This actually ignore files:
- starting with a dot
- containing a colon (See: #828084)
---
 tools/debianqueued-0.9/debianqueued | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/debianqueued-0.9/debianqueued b/tools/debianqueued-0.9/debianqueued
index 7b02551..34b62b9 100755
--- a/tools/debianqueued-0.9/debianqueued
+++ b/tools/debianqueued-0.9/debianqueued
@@ -67,7 +67,7 @@ package main;
 ($main::hostname, undef, undef, undef, undef) = gethostbyname(hostname());
 
 my %packages = ();
-my $re_file_safe_prefix = qr/\A([a-zA-Z0-9.][a-zA-Z0-9_.:~+-]*)/s;
+my $re_file_safe_prefix = qr/\A([a-zA-Z0-9][a-zA-Z0-9_.~+-]*)/s;
 my $re_file_safe = qr/$re_file_safe_prefix\z/s;
 
 # extract -r and -k args
-- 
2.8.1