println() API function.

bin/auto

@@ -15,6 +15,7 @@ use FindBin qw($Bin);
 our $Bin = $Bin;
 unshift(@INC, "$Bin/../src");
 require API::Std;
+require API::Log;
 #require DB::Flatfile;
 require Parser::Config;
 require Parser::Lang;
@@ -35,6 +36,6 @@ our %SETTINGS = $CONF->parse;
 my @lclv = API::Std::conf_get("locale");
 our $LOCALE = $lclv[0][0];
 my @lang = split('_', $LOCALE);
-Parser::Lang::parse($lang[0]) or print ".\n" and exit;
+Parser::Lang::parse($lang[0]);
 undef @lang;
 undef @lclv;