[libconfig-model-dpkg-perl] 05/05: Scanner: added much needed comment

[dod at debian.org]

This is an automated email from the git hooks/post-receive script.

dod pushed a commit to branch master
in repository libconfig-model-dpkg-perl.

commit cd3b6ffca105b2be9a9cba4627f1f12ae3ab1105
Author: Dominique Dumont <dod at debian.org>
Date:   Wed Jan 14 21:05:14 2015 +0100

    Scanner: added much needed comment
---
 lib/Dpkg/Copyright/Scanner.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib/Dpkg/Copyright/Scanner.pm b/lib/Dpkg/Copyright/Scanner.pm
index a041868..f785397 100644
--- a/lib/Dpkg/Copyright/Scanner.pm
+++ b/lib/Dpkg/Copyright/Scanner.pm
@@ -151,6 +151,8 @@ sub __pack_copyright ($r) {
 }
 
 #in each directory, pack files that have the same copyright/license information
+# traverse recursively %h (whose strcuture matches the scanned directory)
+# @path keeps track of the recursion depth to provide the file path
 sub __pack_files ($h, $pack, @path) {
     my $old_id ;
     foreach my $file (sort keys %$h) {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libconfig-model-dpkg-perl.git