diff options
| author | Célestin Matte <celestin.matte@ensimag.fr> | 2013-06-14 15:50:09 +0200 |
|---|---|---|
| committer | Junio C Hamano <gitster@pobox.com> | 2013-06-14 09:02:15 -0700 |
| commit | 05d4c7b1c46b7a6cbc8f4c0403a6e208aea1c63c (patch) | |
| tree | 4fe0c10cbb124eddb259c26538f7bf71cd17b881 /contrib | |
| parent | bdff0e3a374617dce784f801b97500d9ba2e4705 (diff) | |
| download | git-05d4c7b1c46b7a6cbc8f4c0403a6e208aea1c63c.tar.gz git-05d4c7b1c46b7a6cbc8f4c0403a6e208aea1c63c.tar.xz | |
git-remote-mediawiki: make a regexp clearer
Perl's split function takes a regex pattern argument. You can also
feed it an expression, which is then compiled into a regex at runtime.
It therefore works to pass your pattern via single quotes, but it is
much less obvious to a reader that the argument is meant to be a
regex, not a static string. Using the traditional slash-delimiters
makes this easier to read.
Signed-off-by: Célestin Matte <celestin.matte@ensimag.fr>
Signed-off-by: Matthieu Moy <matthieu.moy@grenoble-inp.fr>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 'contrib')
| -rwxr-xr-x | contrib/mw-to-git/git-remote-mediawiki.perl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/mw-to-git/git-remote-mediawiki.perl b/contrib/mw-to-git/git-remote-mediawiki.perl index 717387275..882da1b88 100755 --- a/contrib/mw-to-git/git-remote-mediawiki.perl +++ b/contrib/mw-to-git/git-remote-mediawiki.perl @@ -1170,7 +1170,7 @@ sub mw_push_revision { # history (linearized with --first-parent) print STDERR "Warning: no common ancestor, pushing complete history\n"; my $history = run_git("rev-list --first-parent --children $local"); - my @history = split('\n', $history); + my @history = split(/\n/, $history); @history = @history[1..$#history]; foreach my $line (reverse @history) { my @commit_info_split = split(/ |\n/, $line); |