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

Last change on this file since 24903 was 18781, checked in by Dirk Stoecker, 10 years ago

somehow keys got josm on launchpad, so change it here as well, as keys was anyway a dumb name :-)

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