Changeset 490 for trunk


Ignore:
Timestamp:
Mar 15, 2007, 10:19:12 AM (13 years ago)
Author:
Nick Burch
Message:

Check we're in the right directory before uploading

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/npemap.org.uk/scripts/tile-processing/upload.pl

    r448 r490  
    88$servers{urchin} = "/srv/www/tile.npemap.org.uk/html/";
    99$servers{bitclean} = "/home/bitclean/public_html/";
     10$servers{openstreetmap} = "/home/dsheldon/npetiles/";
    1011
    1112# Allow restricting to just one server
     
    3132unless($scale == 1 || $scale == 3 || $scale == 6 || $scale eq 'm') {
    3233        die("Scale must be the 1st argument, and one of 1, 3, 6 or m\n");
     34}
     35
     36# Check they're in the right directory
     37my $curdir = `pwd`;
     38chomp $curdir;
     39print "$curdir\n";
     40if($scale eq "m") { $curdir =~ s/meta1$/scaledm/; }
     41unless($curdir =~ /scaled$scale$/) {
     42    die("Can't upload for scale $scale from directory $curdir\n");
    3343}
    3444
Note: See TracChangeset for help on using the changeset viewer.