diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Arctica/Core/ManageDirs.pm | 2 | ||||
| -rw-r--r-- | lib/Arctica/Core/eventInit.pm | 8 |
2 files changed, 5 insertions, 5 deletions
diff --git a/lib/Arctica/Core/ManageDirs.pm b/lib/Arctica/Core/ManageDirs.pm index 51d4e30..d17d22f 100644 --- a/lib/Arctica/Core/ManageDirs.pm +++ b/lib/Arctica/Core/ManageDirs.pm @@ -91,7 +91,7 @@ sub new { unless (-d $check_arctica_home) { mkdir($check_arctica_home) - or die("ManageDirs: Fail to create .arctica 'HOME' directory"); + or die("ManageDirs: Failed to create .arctica 'HOME' directory"); } permZealot($check_arctica_home); diff --git a/lib/Arctica/Core/eventInit.pm b/lib/Arctica/Core/eventInit.pm index c7e7b65..3a40b04 100644 --- a/lib/Arctica/Core/eventInit.pm +++ b/lib/Arctica/Core/eventInit.pm @@ -67,7 +67,7 @@ use Data::Dumper; use Glib 'TRUE', 'FALSE'; # Be very selective about what (if any) gets exported by default: our @EXPORT = qw(); -# And be mindfull of what we lett the caller request too: +# And be mindful of what we let the caller request, too: our @EXPORT_OK = qw( genARandom BugOUT BugOUT_dumpObjects ); $ENV{'PATH'} = ""; @@ -113,10 +113,10 @@ sub append_aobject { unless ($aco->{$to_append->{'aobject_name'}}) { $aco->{$to_append->{'aobject_name'}} = $to_append; } else { - die "Dont append an Arctica object more than once!"; + die "Don't append an Arctica object more than once!"; } } else { - die "Not an arctica object?!"; + die "Not an Arctica object?!"; } } @@ -131,7 +131,7 @@ sub return_self { sub doSelfTerminate { my $signal = $_[0]; my $ACF_self = $_[1]; - BugOUT(2,"Self Terminating... ($signal)"); + BugOUT(2,"Self-terminating... ($signal)"); $ACF_self->{'Glib'}{'MainLoop'}->quit; return 0; } |