|
Last change
on this file since 6540 was
6540,
checked in by Don-vip, 10 years ago
|
|
fix #9450 - Allow to build JOSM from a git mirror clone with ant -Dgit_revision=true
|
|
File size:
286 bytes
|
| Line | |
|---|
| 1 | #!perl -w |
|---|
| 2 | |
|---|
| 3 | $l=<>; |
|---|
| 4 | if ($l =~ /([-+: .\w]+)/) { |
|---|
| 5 | $date=$1; |
|---|
| 6 | } |
|---|
| 7 | |
|---|
| 8 | while (<>) { |
|---|
| 9 | if (/git-svn-id: [^@]*@([0-9]+)\s/) { |
|---|
| 10 | $rev=$1; |
|---|
| 11 | } |
|---|
| 12 | } |
|---|
| 13 | print "<info><entry><commit". ($rev?" revision=\"$rev\"":"") .">". ($date?"<date>$date</date>":"") ."</commit></entry></info>\n"; |
|---|
Note: See
TracBrowser
for help on using the repository browser.
