userdiff/perl: catch sub with brace on second line
commitea2ca4497bdb716977a3e2526780635cb6bac513
authorJonathan Nieder <jrnieder@gmail.com>
Sat, 21 May 2011 19:38:26 +0000 (21 14:38 -0500)
committerJunio C Hamano <gitster@pobox.com>
Sun, 22 May 2011 05:29:32 +0000 (21 22:29 -0700)
tree88503ab48c0fa26bdced5e199ca7c0b2653acfae
parent12f0967a8a1e3c11c678de181f77d1c7883b37cf
userdiff/perl: catch sub with brace on second line

Accept

sub foo
{
}

as an alternative to a more common style that introduces perl
functions with a brace on the first line (and likewise for BEGIN/END
blocks).  The new regex is a little hairy to avoid matching

# forward declaration
sub foo;

while continuing to match "sub foo($;@) {" and

sub foo { # This routine is interesting;
# in fact, the lines below explain how...

While at it, pay attention to Perl 5.14's "package foo {" syntax as an
alternative to the traditional "package foo;".

Requested-by: Ævar Arnfjörð Bjarmason <avarab@gmail.com>
Signed-off-by: Jonathan Nieder <jrnieder@gmail.com>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
t/t4018-diff-funcname.sh
userdiff.c