source: subversion/applications/editors/josm/i18n/launchpad.pl @ 16879

Last change on this file since 16879 was 16400, checked in by Dirk Stoecker, 11 years ago

added launchpad support

  • Property svn:executable set to *
File size: 579 bytes
Line 
1#!/usr/bin/perl -w
2
3use strict;
4
5die "URL not given." if $#ARGV != 0;
6
7mkdir "new";
8die "Could not change into new data dir." if !chdir "new";
9system "wget $ARGV[0]";
10system "tar -xf laun*";
11chdir "..";
12foreach my $name (split("\n", `find new -name "*.po"`))
13{
14  my $a=$name;
15  $a =~ s/.*-//;
16  system "mv -v $name po/$a" if -f "po/$a";
17}
18system "ant";
19my $outdate = `date -u +"%Y-%m-%dT%H_%M_%S"`;
20chomp $outdate;
21mkdir "keys";
22system "cp po/*.po keys";
23system "cp po/josm.pot keys/keys.pot";
24system "tar -czf launchpad_upload_josm_$outdate.tgz keys";
25system "rm -rv keys new";
Note: See TracBrowser for help on using the repository browser.