Révision 17f78427
Whitespace cleanup
- remove trailing whitespace
- remove empty lines at the end of files
| plugins/other/earthquakes | ||
|---|---|---|
| 27 | 27 |
|
| 28 | 28 |
# place locations here separated by commas |
| 29 | 29 |
# names must match Region from the link below |
| 30 |
my @regions = ("Southern California",
|
|
| 31 |
"Central California",
|
|
| 32 |
"Northern California",
|
|
| 30 |
my @regions = ("Southern California",
|
|
| 31 |
"Central California", |
|
| 32 |
"Northern California", |
|
| 33 | 33 |
"Greater Los Angeles area"); |
| 34 | 34 |
|
| 35 | 35 |
my $url = "http://earthquake.usgs.gov/eqcenter/catalogs/eqs1hour-M1.txt"; |
| ... | ... | |
| 59 | 59 |
print "graph_args --base 1000\n"; |
| 60 | 60 |
print "graph_category other\n"; |
| 61 | 61 |
print "graph_info This graph shows earthquakes by region of magnitude 1.0 or greater.\n"; |
| 62 |
print "graph_vlabel Number of Earthquakes\n";
|
|
| 62 |
print "graph_vlabel Number of Earthquakes\n"; |
|
| 63 | 63 |
|
| 64 | 64 |
for my $locale (@regions) {
|
| 65 | 65 |
$locale =~ s/\s/_/g; # replace whitespace with underscores |
Formats disponibles : Unified diff