Show full pathnames in filelist view

diff --git a/lib/Packages/DoFilelist.pm b/lib/Packages/DoFilelist.pm
index 20eb67fba6397010d133c4071a7bbb5ef4ac81bb..6bdfca7c52fe61a89aa5a67be2284cc9cfdee7e1 100644 (file)
--- a/lib/Packages/DoFilelist.pm
+++ b/lib/Packages/DoFilelist.pm
@@ -61,7 +61,7 @@ sub do_filelist {
                $$page_content .= '<div id="pfilelist"><pre>';
                for (my $i=0; $i<scalar @files;) {
                    $file = substr($file, 0, $files[$i++]).$files[$i++];
-                   $$page_content .= "$file\n";
+                   $$page_content .= "/$file\n";
                }
                $$page_content .= '</pre></div>';
            }