aboutsummaryrefslogtreecommitdiffstats
path: root/bin/gettext-nget-patch
diff options
context:
space:
mode:
authorMarius Halden <marius.h@lden.org>2017-05-28 21:31:42 +0200
committerMarius Halden <marius.h@lden.org>2017-05-28 21:31:42 +0200
commit987124b09a32248414faf4d0d6615d43b29ac6f6 (patch)
treea549db8af723c981d3b346e855f25d6fd5ff8aa7 /bin/gettext-nget-patch
parentdbf56159e44c1560a413022451bf1a1c4cb22a52 (diff)
parenta085b63ce09f87e83b75cda9b9cd08aadfe75d61 (diff)
Merge tag 'v2.0.4' into fiksgatami-dev
Diffstat (limited to 'bin/gettext-nget-patch')
-rwxr-xr-xbin/gettext-nget-patch10
1 files changed, 5 insertions, 5 deletions
diff --git a/bin/gettext-nget-patch b/bin/gettext-nget-patch
index 92b687552..67f98e319 100755
--- a/bin/gettext-nget-patch
+++ b/bin/gettext-nget-patch
@@ -18,19 +18,19 @@ find( sub {
do {
$text .= <FP>;
} until $text =~ /\)/;
- if ($text =~ /nget\(\s*"(.*?)"\s*,\s*"(.*?)"\s*,\s*(.*?)\s*\)/s) {
- $out{$1} = {
+ if ($text =~ /nget\(\s*(['"])(.*?)\1\s*,\s*(['"])(.*?)\3\s*,\s*(.*?)\s*\)/s) {
+ $out{$2} = {
file => $File::Find::name,
line => $line,
- s => $1,
- p => $2,
+ s => $2,
+ p => $4,
};
}
}
close FP;
}, 'templates', 'perllib');
-foreach (values %out) {
+foreach (sort { $a->{s} cmp $b->{s} } values %out) {
print <<EOF;
#: $_->{file}:$_->{line}