# HG changeset patch # User Heiko Schlittermann (JUMPER) # Date 1397052926 -7200 # Node ID 30ae3312978787a273258cddee4012de6b70c85a # Parent 3639213547549ccdc55643baa90fe956ae1abaae continuation lines diff -r 363921354754 -r 30ae33129787 read-httpd-conf --- a/read-httpd-conf Wed Apr 09 16:15:12 2014 +0200 +++ b/read-httpd-conf Wed Apr 09 16:15:26 2014 +0200 @@ -18,7 +18,11 @@ $file = $+{file} =~ m{^/} ? $file : "$basedir/$file"; say "# $. $file INCLUDE $file"; read_file($_, $basedir) foreach (glob -d $file ? "$file/*" : $file); - next; + } + if (s{\\$}{}) { + chomp; + $_ .= <$fh>; + redo; } print; }