Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/moses-smt/mosesdecoder.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJeroen Vermeulen <jtv@precisiontranslationtools.com>2015-05-17 16:04:04 +0300
committerJeroen Vermeulen <jtv@precisiontranslationtools.com>2015-05-17 16:04:04 +0300
commita25193cc5da6a271c4676e843db80ee19221822a (patch)
treedb764696f2e663016a9ab87a95846501c585b4aa /scripts/analysis/perllib
parent108da163745699e724f581c3d33b1e8a5e26a9e9 (diff)
Fix a lot of lint, mostly trailing whitespace.
This is lint reported by the new lint-checking functionality in beautify.py. (We can change to a different lint checker if we have a better one, but it would probably still flag these same problems.) Lint checking can help a lot, but only if we get the lint under control.
Diffstat (limited to 'scripts/analysis/perllib')
-rw-r--r--scripts/analysis/perllib/Error.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/scripts/analysis/perllib/Error.pm b/scripts/analysis/perllib/Error.pm
index cc9edbb69..e62044eff 100644
--- a/scripts/analysis/perllib/Error.pm
+++ b/scripts/analysis/perllib/Error.pm
@@ -15,7 +15,7 @@ use strict;
use vars qw($VERSION);
use 5.004;
-$VERSION = "0.15";
+$VERSION = "0.15";
use overload (
'""' => 'stringify',
@@ -146,7 +146,7 @@ sub throw {
# if we are not rethrow-ing then create the object to throw
$self = $self->new(@_) unless ref($self);
-
+
die $Error::THROWN = $self;
}
@@ -429,7 +429,7 @@ sub except (&;$) {
my $code = shift;
my $clauses = shift || {};
my $catch = $clauses->{'catch'} ||= [];
-
+
my $sub = sub {
my $ref;
my(@array) = $code->($_[0]);
@@ -481,7 +481,7 @@ Error - Error/exception handling in an OO-ish way
record Error::Simple("A simple error")
and return;
}
-
+
unlink($file) or throw Error::Simple("$file: $!",$!);
try {